1 2 #include <petsc/private/pcimpl.h> /*I "petscpc.h" I*/ 3 4 PETSC_EXTERN PetscErrorCode PCCreate_Jacobi(PC); 5 PETSC_EXTERN PetscErrorCode PCCreate_BJacobi(PC); 6 PETSC_EXTERN PetscErrorCode PCCreate_PBJacobi(PC); 7 PETSC_EXTERN PetscErrorCode PCCreate_ILU(PC); 8 PETSC_EXTERN PetscErrorCode PCCreate_None(PC); 9 PETSC_EXTERN PetscErrorCode PCCreate_LU(PC); 10 PETSC_EXTERN PetscErrorCode PCCreate_SOR(PC); 11 PETSC_EXTERN PetscErrorCode PCCreate_Shell(PC); 12 PETSC_EXTERN PetscErrorCode PCCreate_MG(PC); 13 PETSC_EXTERN PetscErrorCode PCCreate_Eisenstat(PC); 14 PETSC_EXTERN PetscErrorCode PCCreate_ICC(PC); 15 PETSC_EXTERN PetscErrorCode PCCreate_ASM(PC); 16 PETSC_EXTERN PetscErrorCode PCCreate_GASM(PC); 17 PETSC_EXTERN PetscErrorCode PCCreate_KSP(PC); 18 PETSC_EXTERN PetscErrorCode PCCreate_Composite(PC); 19 PETSC_EXTERN PetscErrorCode PCCreate_Redundant(PC); 20 PETSC_EXTERN PetscErrorCode PCCreate_NN(PC); 21 PETSC_EXTERN PetscErrorCode PCCreate_Cholesky(PC); 22 PETSC_EXTERN PetscErrorCode PCCreate_FieldSplit(PC); 23 PETSC_EXTERN PetscErrorCode PCCreate_Galerkin(PC); 24 PETSC_EXTERN PetscErrorCode PCCreate_Exotic(PC); 25 PETSC_EXTERN PetscErrorCode PCCreate_CP(PC); 26 PETSC_EXTERN PetscErrorCode PCCreate_LSC(PC); 27 PETSC_EXTERN PetscErrorCode PCCreate_Redistribute(PC); 28 PETSC_EXTERN PetscErrorCode PCCreate_SVD(PC); 29 PETSC_EXTERN PetscErrorCode PCCreate_GAMG(PC); 30 PETSC_EXTERN PetscErrorCode PCCreate_Kaczmarz(PC); 31 PETSC_EXTERN PetscErrorCode PCCreate_Telescope(PC); 32 PETSC_EXTERN PetscErrorCode PCCreate_Patch(PC); 33 34 #if defined(PETSC_HAVE_ML) 35 PETSC_EXTERN PetscErrorCode PCCreate_ML(PC); 36 #endif 37 #if defined(PETSC_HAVE_SPAI) 38 PETSC_EXTERN PetscErrorCode PCCreate_SPAI(PC); 39 #endif 40 PETSC_EXTERN PetscErrorCode PCCreate_Mat(PC); 41 #if defined(PETSC_HAVE_HYPRE) 42 PETSC_EXTERN PetscErrorCode PCCreate_HYPRE(PC); 43 PETSC_EXTERN PetscErrorCode PCCreate_PFMG(PC); 44 PETSC_EXTERN PetscErrorCode PCCreate_SysPFMG(PC); 45 #endif 46 #if !defined(PETSC_USE_COMPLEX) 47 PETSC_EXTERN PetscErrorCode PCCreate_TFS(PC); 48 #endif 49 #if defined(PETSC_HAVE_CUSP) 50 PETSC_EXTERN PetscErrorCode PCCreate_SACUSP(PC); 51 PETSC_EXTERN PetscErrorCode PCCreate_SACUSPPoly(PC); 52 PETSC_EXTERN PetscErrorCode PCCreate_BiCGStabCUSP(PC); 53 PETSC_EXTERN PetscErrorCode PCCreate_AINVCUSP(PC); 54 #endif 55 #if defined(PETSC_HAVE_VIENNACL) 56 PETSC_EXTERN PetscErrorCode PCCreate_CHOWILUVIENNACL(PC); 57 PETSC_EXTERN PetscErrorCode PCCreate_ROWSCALINGVIENNACL(PC); 58 PETSC_EXTERN PetscErrorCode PCCreate_SAVIENNACL(PC); 59 #endif 60 #if defined(PETSC_HAVE_PARMS) 61 PETSC_EXTERN PetscErrorCode PCCreate_PARMS(PC); 62 #endif 63 PETSC_EXTERN PetscErrorCode PCCreate_BDDC(PC); 64 65 /*@C 66 PCRegisterAll - Registers all of the preconditioners in the PC package. 67 68 Not Collective 69 70 Input Parameter: 71 . path - the library where the routines are to be found (optional) 72 73 Level: advanced 74 75 .keywords: PC, register, all 76 77 .seealso: PCRegister(), PCRegisterDestroy() 78 @*/ 79 PetscErrorCode PCRegisterAll(void) 80 { 81 PetscErrorCode ierr; 82 83 PetscFunctionBegin; 84 if (PCRegisterAllCalled) PetscFunctionReturn(0); 85 PCRegisterAllCalled = PETSC_TRUE; 86 87 ierr = PCRegister(PCNONE ,PCCreate_None);CHKERRQ(ierr); 88 ierr = PCRegister(PCJACOBI ,PCCreate_Jacobi);CHKERRQ(ierr); 89 ierr = PCRegister(PCPBJACOBI ,PCCreate_PBJacobi);CHKERRQ(ierr); 90 ierr = PCRegister(PCBJACOBI ,PCCreate_BJacobi);CHKERRQ(ierr); 91 ierr = PCRegister(PCSOR ,PCCreate_SOR);CHKERRQ(ierr); 92 ierr = PCRegister(PCLU ,PCCreate_LU);CHKERRQ(ierr); 93 ierr = PCRegister(PCSHELL ,PCCreate_Shell);CHKERRQ(ierr); 94 ierr = PCRegister(PCMG ,PCCreate_MG);CHKERRQ(ierr); 95 ierr = PCRegister(PCEISENSTAT ,PCCreate_Eisenstat);CHKERRQ(ierr); 96 ierr = PCRegister(PCILU ,PCCreate_ILU);CHKERRQ(ierr); 97 ierr = PCRegister(PCICC ,PCCreate_ICC);CHKERRQ(ierr); 98 ierr = PCRegister(PCCHOLESKY ,PCCreate_Cholesky);CHKERRQ(ierr); 99 ierr = PCRegister(PCASM ,PCCreate_ASM);CHKERRQ(ierr); 100 ierr = PCRegister(PCGASM ,PCCreate_GASM);CHKERRQ(ierr); 101 ierr = PCRegister(PCKSP ,PCCreate_KSP);CHKERRQ(ierr); 102 ierr = PCRegister(PCCOMPOSITE ,PCCreate_Composite);CHKERRQ(ierr); 103 ierr = PCRegister(PCREDUNDANT ,PCCreate_Redundant);CHKERRQ(ierr); 104 ierr = PCRegister(PCNN ,PCCreate_NN);CHKERRQ(ierr); 105 ierr = PCRegister(PCMAT ,PCCreate_Mat);CHKERRQ(ierr); 106 ierr = PCRegister(PCFIELDSPLIT ,PCCreate_FieldSplit);CHKERRQ(ierr); 107 ierr = PCRegister(PCGALERKIN ,PCCreate_Galerkin);CHKERRQ(ierr); 108 ierr = PCRegister(PCEXOTIC ,PCCreate_Exotic);CHKERRQ(ierr); 109 ierr = PCRegister(PCCP ,PCCreate_CP);CHKERRQ(ierr); 110 ierr = PCRegister(PCLSC ,PCCreate_LSC);CHKERRQ(ierr); 111 ierr = PCRegister(PCREDISTRIBUTE ,PCCreate_Redistribute);CHKERRQ(ierr); 112 ierr = PCRegister(PCSVD ,PCCreate_SVD);CHKERRQ(ierr); 113 ierr = PCRegister(PCGAMG ,PCCreate_GAMG);CHKERRQ(ierr); 114 ierr = PCRegister(PCKACZMARZ ,PCCreate_Kaczmarz);CHKERRQ(ierr); 115 ierr = PCRegister(PCTELESCOPE ,PCCreate_Telescope);CHKERRQ(ierr); 116 ierr = PCRegister(PCPATCH ,PCCreate_Patch);CHKERRQ(ierr); 117 #if defined(PETSC_HAVE_ML) 118 ierr = PCRegister(PCML ,PCCreate_ML);CHKERRQ(ierr); 119 #endif 120 #if defined(PETSC_HAVE_SPAI) 121 ierr = PCRegister(PCSPAI ,PCCreate_SPAI);CHKERRQ(ierr); 122 #endif 123 #if defined(PETSC_HAVE_HYPRE) 124 ierr = PCRegister(PCHYPRE ,PCCreate_HYPRE);CHKERRQ(ierr); 125 ierr = PCRegister(PCPFMG ,PCCreate_PFMG);CHKERRQ(ierr); 126 ierr = PCRegister(PCSYSPFMG ,PCCreate_SysPFMG);CHKERRQ(ierr); 127 #endif 128 #if !defined(PETSC_USE_COMPLEX) 129 ierr = PCRegister(PCTFS ,PCCreate_TFS);CHKERRQ(ierr); 130 #endif 131 #if defined(PETSC_HAVE_CUSP) 132 ierr = PCRegister(PCSACUSP ,PCCreate_SACUSP);CHKERRQ(ierr); 133 ierr = PCRegister(PCAINVCUSP ,PCCreate_AINVCUSP);CHKERRQ(ierr); 134 ierr = PCRegister(PCBICGSTABCUSP ,PCCreate_BiCGStabCUSP);CHKERRQ(ierr); 135 ierr = PCRegister(PCSACUSPPOLY ,PCCreate_SACUSPPoly);CHKERRQ(ierr); 136 #endif 137 #if defined(PETSC_HAVE_VIENNACL) 138 ierr = PCRegister(PCCHOWILUVIENNACL,PCCreate_CHOWILUVIENNACL);CHKERRQ(ierr); 139 ierr = PCRegister(PCROWSCALINGVIENNACL,PCCreate_ROWSCALINGVIENNACL);CHKERRQ(ierr); 140 ierr = PCRegister(PCSAVIENNACL ,PCCreate_SAVIENNACL);CHKERRQ(ierr); 141 #endif 142 #if defined(PETSC_HAVE_PARMS) 143 ierr = PCRegister(PCPARMS ,PCCreate_PARMS);CHKERRQ(ierr); 144 #endif 145 ierr = PCRegister(PCBDDC ,PCCreate_BDDC);CHKERRQ(ierr); 146 PetscFunctionReturn(0); 147 } 148