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_LMVM(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_VIENNACL) 50 PETSC_EXTERN PetscErrorCode PCCreate_CHOWILUVIENNACL(PC); 51 PETSC_EXTERN PetscErrorCode PCCreate_ROWSCALINGVIENNACL(PC); 52 PETSC_EXTERN PetscErrorCode PCCreate_SAVIENNACL(PC); 53 #endif 54 #if defined(PETSC_HAVE_PARMS) 55 PETSC_EXTERN PetscErrorCode PCCreate_PARMS(PC); 56 #endif 57 PETSC_EXTERN PetscErrorCode PCCreate_BDDC(PC); 58 59 /*@C 60 PCRegisterAll - Registers all of the preconditioners in the PC package. 61 62 Not Collective 63 64 Input Parameter: 65 . path - the library where the routines are to be found (optional) 66 67 Level: advanced 68 69 .keywords: PC, register, all 70 71 .seealso: PCRegister(), PCRegisterDestroy() 72 @*/ 73 PetscErrorCode PCRegisterAll(void) 74 { 75 PetscErrorCode ierr; 76 77 PetscFunctionBegin; 78 if (PCRegisterAllCalled) PetscFunctionReturn(0); 79 PCRegisterAllCalled = PETSC_TRUE; 80 81 ierr = PCRegister(PCNONE ,PCCreate_None);CHKERRQ(ierr); 82 ierr = PCRegister(PCJACOBI ,PCCreate_Jacobi);CHKERRQ(ierr); 83 ierr = PCRegister(PCPBJACOBI ,PCCreate_PBJacobi);CHKERRQ(ierr); 84 ierr = PCRegister(PCBJACOBI ,PCCreate_BJacobi);CHKERRQ(ierr); 85 ierr = PCRegister(PCSOR ,PCCreate_SOR);CHKERRQ(ierr); 86 ierr = PCRegister(PCLU ,PCCreate_LU);CHKERRQ(ierr); 87 ierr = PCRegister(PCSHELL ,PCCreate_Shell);CHKERRQ(ierr); 88 ierr = PCRegister(PCMG ,PCCreate_MG);CHKERRQ(ierr); 89 ierr = PCRegister(PCEISENSTAT ,PCCreate_Eisenstat);CHKERRQ(ierr); 90 ierr = PCRegister(PCILU ,PCCreate_ILU);CHKERRQ(ierr); 91 ierr = PCRegister(PCICC ,PCCreate_ICC);CHKERRQ(ierr); 92 ierr = PCRegister(PCCHOLESKY ,PCCreate_Cholesky);CHKERRQ(ierr); 93 ierr = PCRegister(PCASM ,PCCreate_ASM);CHKERRQ(ierr); 94 ierr = PCRegister(PCGASM ,PCCreate_GASM);CHKERRQ(ierr); 95 ierr = PCRegister(PCKSP ,PCCreate_KSP);CHKERRQ(ierr); 96 ierr = PCRegister(PCCOMPOSITE ,PCCreate_Composite);CHKERRQ(ierr); 97 ierr = PCRegister(PCREDUNDANT ,PCCreate_Redundant);CHKERRQ(ierr); 98 ierr = PCRegister(PCNN ,PCCreate_NN);CHKERRQ(ierr); 99 ierr = PCRegister(PCMAT ,PCCreate_Mat);CHKERRQ(ierr); 100 ierr = PCRegister(PCFIELDSPLIT ,PCCreate_FieldSplit);CHKERRQ(ierr); 101 ierr = PCRegister(PCGALERKIN ,PCCreate_Galerkin);CHKERRQ(ierr); 102 ierr = PCRegister(PCEXOTIC ,PCCreate_Exotic);CHKERRQ(ierr); 103 ierr = PCRegister(PCCP ,PCCreate_CP);CHKERRQ(ierr); 104 ierr = PCRegister(PCLSC ,PCCreate_LSC);CHKERRQ(ierr); 105 ierr = PCRegister(PCREDISTRIBUTE ,PCCreate_Redistribute);CHKERRQ(ierr); 106 ierr = PCRegister(PCSVD ,PCCreate_SVD);CHKERRQ(ierr); 107 ierr = PCRegister(PCGAMG ,PCCreate_GAMG);CHKERRQ(ierr); 108 ierr = PCRegister(PCKACZMARZ ,PCCreate_Kaczmarz);CHKERRQ(ierr); 109 ierr = PCRegister(PCTELESCOPE,PCCreate_Telescope);CHKERRQ(ierr); 110 #if defined(PETSC_HAVE_ML) 111 ierr = PCRegister(PCML ,PCCreate_ML);CHKERRQ(ierr); 112 #endif 113 #if defined(PETSC_HAVE_SPAI) 114 ierr = PCRegister(PCSPAI ,PCCreate_SPAI);CHKERRQ(ierr); 115 #endif 116 #if defined(PETSC_HAVE_HYPRE) 117 ierr = PCRegister(PCHYPRE ,PCCreate_HYPRE);CHKERRQ(ierr); 118 ierr = PCRegister(PCPFMG ,PCCreate_PFMG);CHKERRQ(ierr); 119 ierr = PCRegister(PCSYSPFMG ,PCCreate_SysPFMG);CHKERRQ(ierr); 120 #endif 121 #if !defined(PETSC_USE_COMPLEX) 122 ierr = PCRegister(PCTFS ,PCCreate_TFS);CHKERRQ(ierr); 123 #endif 124 #if defined(PETSC_HAVE_VIENNACL) 125 ierr = PCRegister(PCCHOWILUVIENNACL,PCCreate_CHOWILUVIENNACL);CHKERRQ(ierr); 126 ierr = PCRegister(PCROWSCALINGVIENNACL,PCCreate_ROWSCALINGVIENNACL);CHKERRQ(ierr); 127 ierr = PCRegister(PCSAVIENNACL ,PCCreate_SAVIENNACL);CHKERRQ(ierr); 128 #endif 129 #if defined(PETSC_HAVE_PARMS) 130 ierr = PCRegister(PCPARMS ,PCCreate_PARMS);CHKERRQ(ierr); 131 #endif 132 ierr = PCRegister(PCBDDC ,PCCreate_BDDC);CHKERRQ(ierr); 133 ierr = PCRegister(PCLMVM ,PCCreate_LMVM);CHKERRQ(ierr); 134 PetscFunctionReturn(0); 135 } 136