1 #define TAO_DLL 2 3 #include <petsc/private/taoimpl.h> /*I "petsctao.h" I*/ 4 5 PETSC_EXTERN PetscErrorCode TaoCreate_LMVM(Tao); 6 PETSC_EXTERN PetscErrorCode TaoCreate_NLS(Tao); 7 PETSC_EXTERN PetscErrorCode TaoCreate_NTR(Tao); 8 PETSC_EXTERN PetscErrorCode TaoCreate_NTL(Tao); 9 PETSC_EXTERN PetscErrorCode TaoCreate_NM(Tao); 10 PETSC_EXTERN PetscErrorCode TaoCreate_CG(Tao); 11 PETSC_EXTERN PetscErrorCode TaoCreate_TRON(Tao); 12 PETSC_EXTERN PetscErrorCode TaoCreate_OWLQN(Tao); 13 PETSC_EXTERN PetscErrorCode TaoCreate_BMRM(Tao); 14 PETSC_EXTERN PetscErrorCode TaoCreate_BLMVM(Tao); 15 PETSC_EXTERN PetscErrorCode TaoCreate_BQNLS(Tao); 16 PETSC_EXTERN PetscErrorCode TaoCreate_BNCG(Tao); 17 PETSC_EXTERN PetscErrorCode TaoCreate_BNLS(Tao); 18 PETSC_EXTERN PetscErrorCode TaoCreate_BNTR(Tao); 19 PETSC_EXTERN PetscErrorCode TaoCreate_BNTL(Tao); 20 PETSC_EXTERN PetscErrorCode TaoCreate_BQNKLS(Tao); 21 PETSC_EXTERN PetscErrorCode TaoCreate_BQNKTR(Tao); 22 PETSC_EXTERN PetscErrorCode TaoCreate_BQNKTL(Tao); 23 PETSC_EXTERN PetscErrorCode TaoCreate_GPCG(Tao); 24 PETSC_EXTERN PetscErrorCode TaoCreate_BQPIP(Tao); 25 PETSC_EXTERN PetscErrorCode TaoCreate_POUNDERS(Tao); 26 PETSC_EXTERN PetscErrorCode TaoCreate_BRGN(Tao); 27 PETSC_EXTERN PetscErrorCode TaoCreate_LCL(Tao); 28 PETSC_EXTERN PetscErrorCode TaoCreate_SSILS(Tao); 29 PETSC_EXTERN PetscErrorCode TaoCreate_SSFLS(Tao); 30 PETSC_EXTERN PetscErrorCode TaoCreate_ASILS(Tao); 31 PETSC_EXTERN PetscErrorCode TaoCreate_ASFLS(Tao); 32 PETSC_EXTERN PetscErrorCode TaoCreate_IPM(Tao); 33 PETSC_EXTERN PetscErrorCode TaoCreate_PDIPM(Tao); 34 PETSC_EXTERN PetscErrorCode TaoCreate_ADMM(Tao); 35 PETSC_EXTERN PetscErrorCode TaoCreate_ALMM(Tao); 36 PETSC_EXTERN PetscErrorCode TaoCreate_Shell(Tao); 37 38 /* 39 Offset the convergence reasons so negative number represent diverged and 40 positive represent converged. 41 */ 42 const char *TaoConvergedReasons_Shifted[] = { 43 "DIVERGED_USER", 44 "DIVERGED_TR_REDUCTION", 45 "DIVERGED_LS_FAILURE", 46 "DIVERGED_MAXFCN", 47 "DIVERGED_NAN", 48 "", 49 "DIVERGED_MAXITS", 50 "DIVERGED_FUNCTION_DOMAIN", 51 52 "CONTINUE_ITERATING", 53 54 "", 55 "", 56 "CONVERGED_GATOL", 57 "CONVERGED_GRTOL", 58 "CONVERGED_GTTOL", 59 "CONVERGED_STEPTOL", 60 "CONVERGED_MINF", 61 "CONVERGED_USER" }; 62 const char **TaoConvergedReasons = TaoConvergedReasons_Shifted - TAO_DIVERGED_USER; 63 64 /*@C 65 TaoRegisterAll - Registers all of the minimization methods in the TAO 66 package. 67 68 Not Collective 69 70 Level: developer 71 72 .seealso TaoRegister(), TaoRegisterDestroy() 73 @*/ 74 PetscErrorCode TaoRegisterAll(void) 75 { 76 #if !defined(PETSC_USE_COMPLEX) 77 PetscErrorCode ierr; 78 #endif 79 80 PetscFunctionBegin; 81 if (TaoRegisterAllCalled) PetscFunctionReturn(0); 82 TaoRegisterAllCalled = PETSC_TRUE; 83 #if !defined(PETSC_USE_COMPLEX) 84 ierr = TaoRegister(TAOLMVM,TaoCreate_LMVM);CHKERRQ(ierr); 85 ierr = TaoRegister(TAONLS,TaoCreate_NLS);CHKERRQ(ierr); 86 ierr = TaoRegister(TAONTR,TaoCreate_NTR);CHKERRQ(ierr); 87 ierr = TaoRegister(TAONTL,TaoCreate_NTL);CHKERRQ(ierr); 88 ierr = TaoRegister(TAOCG,TaoCreate_CG);CHKERRQ(ierr); 89 ierr = TaoRegister(TAOTRON,TaoCreate_TRON);CHKERRQ(ierr); 90 ierr = TaoRegister(TAOOWLQN,TaoCreate_OWLQN);CHKERRQ(ierr); 91 ierr = TaoRegister(TAOBMRM,TaoCreate_BMRM);CHKERRQ(ierr); 92 ierr = TaoRegister(TAOBLMVM,TaoCreate_BLMVM);CHKERRQ(ierr); 93 ierr = TaoRegister(TAOBQNLS,TaoCreate_BQNLS);CHKERRQ(ierr); 94 ierr = TaoRegister(TAOBNCG,TaoCreate_BNCG);CHKERRQ(ierr); 95 ierr = TaoRegister(TAOBNLS,TaoCreate_BNLS);CHKERRQ(ierr); 96 ierr = TaoRegister(TAOBNTR,TaoCreate_BNTR);CHKERRQ(ierr); 97 ierr = TaoRegister(TAOBNTL,TaoCreate_BNTL);CHKERRQ(ierr); 98 ierr = TaoRegister(TAOBQNKLS,TaoCreate_BQNKLS);CHKERRQ(ierr); 99 ierr = TaoRegister(TAOBQNKTR,TaoCreate_BQNKTR);CHKERRQ(ierr); 100 ierr = TaoRegister(TAOBQNKTL,TaoCreate_BQNKTL);CHKERRQ(ierr); 101 ierr = TaoRegister(TAOBQPIP,TaoCreate_BQPIP);CHKERRQ(ierr); 102 ierr = TaoRegister(TAOGPCG,TaoCreate_GPCG);CHKERRQ(ierr); 103 ierr = TaoRegister(TAONM,TaoCreate_NM);CHKERRQ(ierr); 104 ierr = TaoRegister(TAOPOUNDERS,TaoCreate_POUNDERS);CHKERRQ(ierr); 105 ierr = TaoRegister(TAOBRGN,TaoCreate_BRGN);CHKERRQ(ierr); 106 ierr = TaoRegister(TAOLCL,TaoCreate_LCL);CHKERRQ(ierr); 107 ierr = TaoRegister(TAOSSILS,TaoCreate_SSILS);CHKERRQ(ierr); 108 ierr = TaoRegister(TAOSSFLS,TaoCreate_SSFLS);CHKERRQ(ierr); 109 ierr = TaoRegister(TAOASILS,TaoCreate_ASILS);CHKERRQ(ierr); 110 ierr = TaoRegister(TAOASFLS,TaoCreate_ASFLS);CHKERRQ(ierr); 111 ierr = TaoRegister(TAOIPM,TaoCreate_IPM);CHKERRQ(ierr); 112 ierr = TaoRegister(TAOPDIPM,TaoCreate_PDIPM);CHKERRQ(ierr); 113 ierr = TaoRegister(TAOSHELL,TaoCreate_Shell);CHKERRQ(ierr); 114 ierr = TaoRegister(TAOADMM,TaoCreate_ADMM);CHKERRQ(ierr); 115 ierr = TaoRegister(TAOALMM,TaoCreate_ALMM);CHKERRQ(ierr); 116 #endif 117 PetscFunctionReturn(0); 118 } 119