18   PetscInt  M, N, K, reg;  member
168   if (user->reg == 1) {  in FullObjGrad()
279   user->reg    = 2;  in InitializeUserData()
283 …eg", "Regularization scheme for z solver (1,2)", "tomographyADMM.c", user->reg, &user->reg, NULL));  in InitializeUserData()
320   Tao         tao, misfit, reg;  in main()  local
347   if (user->reg == 1) {  in main()
351   } else if (user->reg == 2) {  in main()
357 …} else PetscCheck(user->reg == 3, PETSC_COMM_WORLD, PETSC_ERR_ARG_UNKNOWN_TYPE, "Incorrect Reg typ…  in main()
361   PetscCall(TaoADMMGetRegularizationSubsolver(tao, &reg));  in main()
363   if (user->reg == 3) {  in main()
364     PetscCall(TaoSetType(reg, TAOSHELL));  in main()
365     PetscCall(TaoShellSetContext(reg, (void *)user));  in main()
366     PetscCall(TaoShellSetSolve(reg, TaoShellSolve_SoftThreshold));  in main()
368     PetscCall(TaoSetType(reg, TAONLS));  in main()