1 2 #include <petsc-private/snesimpl.h> /*I "petscsnes.h" I*/ 3 4 PETSC_EXTERN PetscErrorCode SNESCreate_NEWTONLS(SNES); 5 PETSC_EXTERN PetscErrorCode SNESCreate_NEWTONTR(SNES); 6 PETSC_EXTERN PetscErrorCode SNESCreate_Test(SNES); 7 PETSC_EXTERN PetscErrorCode SNESCreate_NRichardson(SNES); 8 PETSC_EXTERN PetscErrorCode SNESCreate_KSPONLY(SNES); 9 PETSC_EXTERN PetscErrorCode SNESCreate_VINEWTONRSLS(SNES); 10 PETSC_EXTERN PetscErrorCode SNESCreate_VINEWTONSSLS(SNES); 11 PETSC_EXTERN PetscErrorCode SNESCreate_NGMRES(SNES); 12 PETSC_EXTERN PetscErrorCode SNESCreate_QN(SNES); 13 PETSC_EXTERN PetscErrorCode SNESCreate_Shell(SNES); 14 PETSC_EXTERN PetscErrorCode SNESCreate_GS(SNES); 15 PETSC_EXTERN PetscErrorCode SNESCreate_NCG(SNES); 16 PETSC_EXTERN PetscErrorCode SNESCreate_FAS(SNES); 17 PETSC_EXTERN PetscErrorCode SNESCreate_MS(SNES); 18 PETSC_EXTERN PetscErrorCode SNESCreate_NASM(SNES); 19 PETSC_EXTERN PetscErrorCode SNESCreate_Anderson(SNES); 20 PETSC_EXTERN PetscErrorCode SNESCreate_ASPIN(SNES); 21 PETSC_EXTERN PetscErrorCode SNESCreate_Composite(SNES); 22 23 const char *SNESConvergedReasons_Shifted[] = {" "," ","DIVERGED_LOCAL_MIN","DIVERGED_INNER","DIVERGED_LINE_SEARCH","DIVERGED_MAX_IT", 24 "DIVERGED_FNORM_NAN","DIVERGED_LINEAR_SOLVE","DIVERGED_FUNCTION_COUNT","DIVERGED_FUNCTION_DOMAIN", 25 "CONVERGED_ITERATING"," ","CONVERGED_FNORM_ABS","CONVERGED_FNORM_RELATIVE", 26 "CONVERGED_SNORM_RELATIVE","CONVERGED_ITS"," ","CONVERGED_TR_DELTA","SNESConvergedReason","",0}; 27 const char *const *SNESConvergedReasons = SNESConvergedReasons_Shifted + 10; 28 29 const char *SNESNormTypes_Shifted[] = {"DEFAULT","NONE","FUNCTION","INITIALONLY","FINALONLY","INITIALFINALONLY","SNESNormType","SNES_NORM_",0}; 30 const char *const *const SNESNormTypes = SNESNormTypes_Shifted + 1; 31 32 /* 33 This is used by SNESSetType() to make sure that at least one 34 SNESRegisterAll() is called. In general, if there is more than one 35 DLL then SNESRegisterAll() may be called several times. 36 */ 37 extern PetscBool SNESRegisterAllCalled; 38 39 #undef __FUNCT__ 40 #define __FUNCT__ "SNESRegisterAll" 41 /*@C 42 SNESRegisterAll - Registers all of the nonlinear solver methods in the SNES package. 43 44 Not Collective 45 46 Level: advanced 47 48 .keywords: SNES, register, all 49 50 .seealso: SNESRegisterDestroy() 51 @*/ 52 PetscErrorCode SNESRegisterAll(void) 53 { 54 PetscErrorCode ierr; 55 56 PetscFunctionBegin; 57 SNESRegisterAllCalled = PETSC_TRUE; 58 59 ierr = SNESRegister(SNESNEWTONLS, SNESCreate_NEWTONLS);CHKERRQ(ierr); 60 ierr = SNESRegister(SNESNEWTONTR, SNESCreate_NEWTONTR);CHKERRQ(ierr); 61 ierr = SNESRegister(SNESTEST, SNESCreate_Test);CHKERRQ(ierr); 62 ierr = SNESRegister(SNESNRICHARDSON, SNESCreate_NRichardson);CHKERRQ(ierr); 63 ierr = SNESRegister(SNESKSPONLY, SNESCreate_KSPONLY);CHKERRQ(ierr); 64 ierr = SNESRegister(SNESVINEWTONRSLS, SNESCreate_VINEWTONRSLS);CHKERRQ(ierr); 65 ierr = SNESRegister(SNESVINEWTONSSLS, SNESCreate_VINEWTONSSLS);CHKERRQ(ierr); 66 ierr = SNESRegister(SNESNGMRES, SNESCreate_NGMRES);CHKERRQ(ierr); 67 ierr = SNESRegister(SNESQN, SNESCreate_QN);CHKERRQ(ierr); 68 ierr = SNESRegister(SNESSHELL, SNESCreate_Shell);CHKERRQ(ierr); 69 ierr = SNESRegister(SNESGS, SNESCreate_GS);CHKERRQ(ierr); 70 ierr = SNESRegister(SNESNCG, SNESCreate_NCG);CHKERRQ(ierr); 71 ierr = SNESRegister(SNESFAS, SNESCreate_FAS);CHKERRQ(ierr); 72 ierr = SNESRegister(SNESMS, SNESCreate_MS);CHKERRQ(ierr); 73 ierr = SNESRegister(SNESNASM, SNESCreate_NASM);CHKERRQ(ierr); 74 ierr = SNESRegister(SNESANDERSON, SNESCreate_Anderson);CHKERRQ(ierr); 75 ierr = SNESRegister(SNESASPIN, SNESCreate_ASPIN);CHKERRQ(ierr); 76 ierr = SNESRegister(SNESCOMPOSITE, SNESCreate_Composite);CHKERRQ(ierr); 77 PetscFunctionReturn(0); 78 } 79