1 #define TAOSOLVER_DLL 2 3 #include <petsc-private/taosolverimpl.h> /*I "taosolver.h" I*/ 4 5 6 PETSC_EXTERN PetscErrorCode TaoCreate_LMVM(TaoSolver); 7 PETSC_EXTERN PetscErrorCode TaoCreate_NLS(TaoSolver); 8 PETSC_EXTERN PetscErrorCode TaoCreate_NTR(TaoSolver); 9 PETSC_EXTERN PetscErrorCode TaoCreate_NTL(TaoSolver); 10 PETSC_EXTERN PetscErrorCode TaoCreate_NM(TaoSolver); 11 PETSC_EXTERN PetscErrorCode TaoCreate_CG(TaoSolver); 12 PETSC_EXTERN PetscErrorCode TaoCreate_TRON(TaoSolver); 13 PETSC_EXTERN PetscErrorCode TaoCreate_OWLQN(TaoSolver); 14 PETSC_EXTERN PetscErrorCode TaoCreate_BMRM(TaoSolver); 15 PETSC_EXTERN PetscErrorCode TaoCreate_BLMVM(TaoSolver); 16 PETSC_EXTERN PetscErrorCode TaoCreate_GPCG(TaoSolver); 17 PETSC_EXTERN PetscErrorCode TaoCreate_BQPIP(TaoSolver); 18 PETSC_EXTERN PetscErrorCode TaoCreate_POUNDERS(TaoSolver); 19 PETSC_EXTERN PetscErrorCode TaoCreate_FD(TaoSolver); 20 PETSC_EXTERN PetscErrorCode TaoCreate_LCL(TaoSolver); 21 PETSC_EXTERN PetscErrorCode TaoCreate_SSILS(TaoSolver); 22 PETSC_EXTERN PetscErrorCode TaoCreate_SSFLS(TaoSolver); 23 PETSC_EXTERN PetscErrorCode TaoCreate_ASILS(TaoSolver); 24 PETSC_EXTERN PetscErrorCode TaoCreate_ASFLS(TaoSolver); 25 PETSC_EXTERN PetscErrorCode TaoCreate_IPM(TaoSolver); 26 27 /* 28 Offset the convergence reasons so negative number represent diverged and 29 positive represent converged. 30 */ 31 const char *TaoSolverTerminationReasons_Shifted[] = { 32 "DIVERGED_USER", 33 "DIVERGED_TR_REDUCTION", 34 "DIVERGED_LS_FAILURE", 35 "DIVERGED_MAXFCN", 36 "DIVERGED_NAN", 37 "DIVERGED_MAXITS", 38 "DIVERGED_FUNCTION_DOMAIN", 39 40 "CONTINUE_ITERATING", 41 42 "CONVERGED_FATOL", 43 "CONVERGED_FRTOL", 44 "CONVERGED_GATOL", 45 "CONVERGED_GRTOL", 46 "CONVERGED_GTTOL", 47 "CONVERGED_STEPTOL", 48 "CONVERGED_MINF", 49 "CONVERGED_USER" }; 50 const char **TaoSolverTerminationReasons = TaoSolverTerminationReasons_Shifted + 7; 51 extern PetscBool TaoSolverRegisterAllCalled; 52 53 #undef __FUNCT__ 54 #define __FUNCT__ "TaoSolverRegisterAll" 55 /*@C 56 TaoSolverRegisterAll - Registers all of the minimization methods in the TAO 57 package. 58 59 Not Collective 60 61 Level: developer 62 63 .seealso TaoSolverRegister(), TaoSolverRegisterDestroy() 64 @*/ 65 PetscErrorCode TaoSolverRegisterAll() 66 { 67 PetscErrorCode ierr; 68 69 PetscFunctionBegin; 70 TaoSolverRegisterAllCalled = PETSC_TRUE; 71 ierr = TaoSolverRegister("tao_lmvm",TaoCreate_LMVM);CHKERRQ(ierr); 72 ierr = TaoSolverRegister("tao_nls",TaoCreate_NLS);CHKERRQ(ierr); 73 ierr = TaoSolverRegister("tao_ntr",TaoCreate_NTR);CHKERRQ(ierr); 74 ierr = TaoSolverRegister("tao_ntl",TaoCreate_NTL);CHKERRQ(ierr); 75 ierr = TaoSolverRegister("tao_cg",TaoCreate_CG);CHKERRQ(ierr); 76 ierr = TaoSolverRegister("tao_tron",TaoCreate_TRON);CHKERRQ(ierr); 77 ierr = TaoSolverRegister("tao_owlqn",TaoCreate_OWLQN);CHKERRQ(ierr); 78 ierr = TaoSolverRegister("tao_bmrm",TaoCreate_BMRM);CHKERRQ(ierr); 79 ierr = TaoSolverRegister("tao_blmvm",TaoCreate_BLMVM);CHKERRQ(ierr); 80 ierr = TaoSolverRegister("tao_bqpip",TaoCreate_BQPIP);CHKERRQ(ierr); 81 ierr = TaoSolverRegister("tao_gpcg",TaoCreate_GPCG);CHKERRQ(ierr); 82 ierr = TaoSolverRegister("tao_nm",TaoCreate_NM);CHKERRQ(ierr); 83 ierr = TaoSolverRegister("tao_pounders",TaoCreate_POUNDERS);CHKERRQ(ierr); 84 ierr = TaoSolverRegister("tao_lcl",TaoCreate_LCL);CHKERRQ(ierr); 85 ierr = TaoSolverRegister("tao_ssils",TaoCreate_SSILS);CHKERRQ(ierr); 86 ierr = TaoSolverRegister("tao_ssfls",TaoCreate_SSFLS);CHKERRQ(ierr); 87 ierr = TaoSolverRegister("tao_asils",TaoCreate_ASILS);CHKERRQ(ierr); 88 ierr = TaoSolverRegister("tao_asfls",TaoCreate_ASFLS);CHKERRQ(ierr); 89 ierr = TaoSolverRegister("tao_ipm",TaoCreate_IPM);CHKERRQ(ierr); 90 ierr = TaoSolverRegister("tao_fd_test",TaoCreate_FD);CHKERRQ(ierr); 91 PetscFunctionReturn(0); 92 } 93 94 95