1*4b9ad928SBarry Smith /*$Id: pcregis.c,v 1.66 2001/08/10 03:32:21 bsmith Exp $*/ 2*4b9ad928SBarry Smith 3*4b9ad928SBarry Smith #include "src/ksp/pc/pcimpl.h" /*I "petscpc.h" I*/ 4*4b9ad928SBarry Smith 5*4b9ad928SBarry Smith EXTERN_C_BEGIN 6*4b9ad928SBarry Smith EXTERN int PCCreate_Jacobi(PC); 7*4b9ad928SBarry Smith EXTERN int PCCreate_BJacobi(PC); 8*4b9ad928SBarry Smith EXTERN int PCCreate_PBJacobi(PC); 9*4b9ad928SBarry Smith EXTERN int PCCreate_ILU(PC); 10*4b9ad928SBarry Smith EXTERN int PCCreate_None(PC); 11*4b9ad928SBarry Smith EXTERN int PCCreate_LU(PC); 12*4b9ad928SBarry Smith EXTERN int PCCreate_SOR(PC); 13*4b9ad928SBarry Smith EXTERN int PCCreate_Shell(PC); 14*4b9ad928SBarry Smith EXTERN int PCCreate_MG(PC); 15*4b9ad928SBarry Smith EXTERN int PCCreate_Eisenstat(PC); 16*4b9ad928SBarry Smith EXTERN int PCCreate_ICC(PC); 17*4b9ad928SBarry Smith EXTERN int PCCreate_ASM(PC); 18*4b9ad928SBarry Smith EXTERN int PCCreate_KSP(PC); 19*4b9ad928SBarry Smith EXTERN int PCCreate_Composite(PC); 20*4b9ad928SBarry Smith EXTERN int PCCreate_Redundant(PC); 21*4b9ad928SBarry Smith EXTERN int PCCreate_NN(PC); 22*4b9ad928SBarry Smith EXTERN int PCCreate_Cholesky(PC); 23*4b9ad928SBarry Smith #if defined(PETSC_HAVE_SPAI) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 24*4b9ad928SBarry Smith EXTERN int PCCreate_SPAI(PC); 25*4b9ad928SBarry Smith #endif 26*4b9ad928SBarry Smith #if defined(PETSC_HAVE_RAMG) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 27*4b9ad928SBarry Smith EXTERN int PCCreate_RAMG(PC); 28*4b9ad928SBarry Smith #endif 29*4b9ad928SBarry Smith #if defined(PETSC_HAVE_SAMG) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 30*4b9ad928SBarry Smith EXTERN int PCCreate_SAMG(PC); 31*4b9ad928SBarry Smith #endif 32*4b9ad928SBarry Smith EXTERN int PCCreate_mILU(PC); 33*4b9ad928SBarry Smith EXTERN int PCCreate_PetscESI(PC); 34*4b9ad928SBarry Smith EXTERN int PCCreate_ESI(PC); 35*4b9ad928SBarry Smith EXTERN int PCCreate_Mat(PC); 36*4b9ad928SBarry Smith #if defined(PETSC_HAVE_HYPRE) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 37*4b9ad928SBarry Smith EXTERN int PCCreate_HYPRE(PC); 38*4b9ad928SBarry Smith #endif 39*4b9ad928SBarry Smith EXTERN_C_END 40*4b9ad928SBarry Smith 41*4b9ad928SBarry Smith #undef __FUNCT__ 42*4b9ad928SBarry Smith #define __FUNCT__ "PCRegisterAll" 43*4b9ad928SBarry Smith /*@C 44*4b9ad928SBarry Smith PCRegisterAll - Registers all of the preconditioners in the PC package. 45*4b9ad928SBarry Smith 46*4b9ad928SBarry Smith Not Collective 47*4b9ad928SBarry Smith 48*4b9ad928SBarry Smith Input Parameter: 49*4b9ad928SBarry Smith . path - the library where the routines are to be found (optional) 50*4b9ad928SBarry Smith 51*4b9ad928SBarry Smith Level: advanced 52*4b9ad928SBarry Smith 53*4b9ad928SBarry Smith .keywords: PC, register, all 54*4b9ad928SBarry Smith 55*4b9ad928SBarry Smith .seealso: PCRegisterDynamic(), PCRegisterDestroy() 56*4b9ad928SBarry Smith @*/ 57*4b9ad928SBarry Smith int PCRegisterAll(const char path[]) 58*4b9ad928SBarry Smith { 59*4b9ad928SBarry Smith int ierr; 60*4b9ad928SBarry Smith 61*4b9ad928SBarry Smith PetscFunctionBegin; 62*4b9ad928SBarry Smith PCRegisterAllCalled = PETSC_TRUE; 63*4b9ad928SBarry Smith 64*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCNONE ,path,"PCCreate_None",PCCreate_None);CHKERRQ(ierr); 65*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCJACOBI ,path,"PCCreate_Jacobi",PCCreate_Jacobi);CHKERRQ(ierr); 66*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCPBJACOBI ,path,"PCCreate_PBJacobi",PCCreate_PBJacobi);CHKERRQ(ierr); 67*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCBJACOBI ,path,"PCCreate_BJacobi",PCCreate_BJacobi);CHKERRQ(ierr); 68*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCSOR ,path,"PCCreate_SOR",PCCreate_SOR);CHKERRQ(ierr); 69*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCLU ,path,"PCCreate_LU",PCCreate_LU);CHKERRQ(ierr); 70*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCSHELL ,path,"PCCreate_Shell",PCCreate_Shell);CHKERRQ(ierr); 71*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCMG ,path,"PCCreate_MG",PCCreate_MG);CHKERRQ(ierr); 72*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCEISENSTAT ,path,"PCCreate_Eisenstat",PCCreate_Eisenstat);CHKERRQ(ierr); 73*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCILU ,path,"PCCreate_ILU",PCCreate_ILU);CHKERRQ(ierr); 74*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCICC ,path,"PCCreate_ICC",PCCreate_ICC);CHKERRQ(ierr); 75*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCCHOLESKY ,path,"PCCreate_Cholesky",PCCreate_Cholesky);CHKERRQ(ierr); 76*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCASM ,path,"PCCreate_ASM",PCCreate_ASM);CHKERRQ(ierr); 77*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCKSP ,path,"PCCreate_KSP",PCCreate_KSP);CHKERRQ(ierr); 78*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCCOMPOSITE ,path,"PCCreate_Composite",PCCreate_Composite);CHKERRQ(ierr); 79*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCREDUNDANT ,path,"PCCreate_Redundant",PCCreate_Redundant);CHKERRQ(ierr); 80*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCNN ,path,"PCCreate_NN",PCCreate_NN);CHKERRQ(ierr); 81*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCMAT ,path,"PCCreate_Mat",PCCreate_Mat);CHKERRQ(ierr); 82*4b9ad928SBarry Smith #if defined(PETSC_HAVE_SPAI) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 83*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCSPAI ,path,"PCCreate_SPAI",PCCreate_SPAI);CHKERRQ(ierr); 84*4b9ad928SBarry Smith #endif 85*4b9ad928SBarry Smith #if defined(PETSC_HAVE_RAMG) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 86*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCRAMG ,path,"PCCreate_RAMG",PCCreate_RAMG);CHKERRQ(ierr); 87*4b9ad928SBarry Smith #endif 88*4b9ad928SBarry Smith #if defined(PETSC_HAVE_SAMG) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 89*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCSAMG ,path,"PCCreate_SAMG",PCCreate_SAMG);CHKERRQ(ierr); 90*4b9ad928SBarry Smith #endif 91*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCMILU ,path,"PCCreate_mILU",PCCreate_mILU);CHKERRQ(ierr); 92*4b9ad928SBarry Smith #if defined(__cplusplus) && !defined(PETSC_USE_SINGLE) && !defined (PETSC_USE_COMPLEX) && defined(PETSC_HAVE_CXX_NAMESPACE) 93*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCESI ,path,"PCCreate_ESI",PCCreate_ESI);CHKERRQ(ierr); 94*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCPETSCESI ,path,"PCCreate_PetscESI",PCCreate_PetscESI);CHKERRQ(ierr); 95*4b9ad928SBarry Smith #endif 96*4b9ad928SBarry Smith #if defined(PETSC_HAVE_HYPRE) && !defined(PETSC_USE_COMPLEX) && !defined(PETSC_USE_SINGLE) 97*4b9ad928SBarry Smith ierr = PCRegisterDynamic(PCHYPRE ,path,"PCCreate_HYPRE",PCCreate_HYPRE);CHKERRQ(ierr); 98*4b9ad928SBarry Smith #endif 99*4b9ad928SBarry Smith PetscFunctionReturn(0); 100*4b9ad928SBarry Smith } 101*4b9ad928SBarry Smith 102*4b9ad928SBarry Smith 103*4b9ad928SBarry Smith 104*4b9ad928SBarry Smith 105