1 #define PETSCKSP_DLL 2 3 #include "private/pcimpl.h" /*I "petscpc.h" I*/ 4 5 EXTERN_C_BEGIN 6 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Jacobi(PC); 7 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_BJacobi(PC); 8 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_PBJacobi(PC); 9 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_ILU(PC); 10 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_None(PC); 11 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_LU(PC); 12 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_SOR(PC); 13 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Shell(PC); 14 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_MG(PC); 15 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Eisenstat(PC); 16 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_ICC(PC); 17 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_ASM(PC); 18 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_KSP(PC); 19 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Composite(PC); 20 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Redundant(PC); 21 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_NN(PC); 22 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Cholesky(PC); 23 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_FieldSplit(PC); 24 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Galerkin(PC); 25 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_OpenMP(PC); 26 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Exotic(PC); 27 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_ASA(PC); 28 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_CP(PC); 29 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_BFBt(PC); 30 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_LSC(PC); 31 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Redistribute(PC); 32 33 #if defined(PETSC_HAVE_BOOST) && defined(PETSC_CLANGUAGE_CXX) 34 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_SupportGraph(PC); 35 #endif 36 #if defined(PETSC_HAVE_ML) 37 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_ML(PC); 38 #endif 39 #if defined(PETSC_HAVE_SPAI) 40 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_SPAI(PC); 41 #endif 42 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Mat(PC); 43 #if defined(PETSC_HAVE_HYPRE) 44 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_HYPRE(PC); 45 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_PFMG(PC); 46 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_SysPFMG(PC); 47 #endif 48 #if !defined(PETSC_USE_COMPLEX) 49 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_TFS(PC); 50 #endif 51 #if defined(PETSC_HAVE_PROMETHEUS) 52 EXTERN PetscErrorCode PETSCKSP_DLLEXPORT PCCreate_Prometheus(PC); 53 #endif 54 55 EXTERN_C_END 56 57 #undef __FUNCT__ 58 #define __FUNCT__ "PCRegisterAll" 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: PCRegisterDynamic(), PCRegisterDestroy() 72 @*/ 73 PetscErrorCode PETSCKSP_DLLEXPORT PCRegisterAll(const char path[]) 74 { 75 PetscErrorCode ierr; 76 77 PetscFunctionBegin; 78 PCRegisterAllCalled = PETSC_TRUE; 79 80 ierr = PCRegisterDynamic(PCNONE ,path,"PCCreate_None",PCCreate_None);CHKERRQ(ierr); 81 ierr = PCRegisterDynamic(PCJACOBI ,path,"PCCreate_Jacobi",PCCreate_Jacobi);CHKERRQ(ierr); 82 ierr = PCRegisterDynamic(PCPBJACOBI ,path,"PCCreate_PBJacobi",PCCreate_PBJacobi);CHKERRQ(ierr); 83 ierr = PCRegisterDynamic(PCBJACOBI ,path,"PCCreate_BJacobi",PCCreate_BJacobi);CHKERRQ(ierr); 84 ierr = PCRegisterDynamic(PCSOR ,path,"PCCreate_SOR",PCCreate_SOR);CHKERRQ(ierr); 85 ierr = PCRegisterDynamic(PCLU ,path,"PCCreate_LU",PCCreate_LU);CHKERRQ(ierr); 86 ierr = PCRegisterDynamic(PCSHELL ,path,"PCCreate_Shell",PCCreate_Shell);CHKERRQ(ierr); 87 ierr = PCRegisterDynamic(PCMG ,path,"PCCreate_MG",PCCreate_MG);CHKERRQ(ierr); 88 ierr = PCRegisterDynamic(PCEISENSTAT ,path,"PCCreate_Eisenstat",PCCreate_Eisenstat);CHKERRQ(ierr); 89 ierr = PCRegisterDynamic(PCILU ,path,"PCCreate_ILU",PCCreate_ILU);CHKERRQ(ierr); 90 ierr = PCRegisterDynamic(PCICC ,path,"PCCreate_ICC",PCCreate_ICC);CHKERRQ(ierr); 91 ierr = PCRegisterDynamic(PCCHOLESKY ,path,"PCCreate_Cholesky",PCCreate_Cholesky);CHKERRQ(ierr); 92 ierr = PCRegisterDynamic(PCASM ,path,"PCCreate_ASM",PCCreate_ASM);CHKERRQ(ierr); 93 ierr = PCRegisterDynamic(PCKSP ,path,"PCCreate_KSP",PCCreate_KSP);CHKERRQ(ierr); 94 ierr = PCRegisterDynamic(PCCOMPOSITE ,path,"PCCreate_Composite",PCCreate_Composite);CHKERRQ(ierr); 95 ierr = PCRegisterDynamic(PCREDUNDANT ,path,"PCCreate_Redundant",PCCreate_Redundant);CHKERRQ(ierr); 96 ierr = PCRegisterDynamic(PCNN ,path,"PCCreate_NN",PCCreate_NN);CHKERRQ(ierr); 97 ierr = PCRegisterDynamic(PCMAT ,path,"PCCreate_Mat",PCCreate_Mat);CHKERRQ(ierr); 98 ierr = PCRegisterDynamic(PCFIELDSPLIT ,path,"PCCreate_FieldSplit",PCCreate_FieldSplit);CHKERRQ(ierr); 99 ierr = PCRegisterDynamic(PCGALERKIN ,path,"PCCreate_Galerkin",PCCreate_Galerkin);CHKERRQ(ierr); 100 ierr = PCRegisterDynamic(PCEXOTIC ,path,"PCCreate_Exotic",PCCreate_Exotic);CHKERRQ(ierr); 101 ierr = PCRegisterDynamic(PCOPENMP ,path,"PCCreate_OpenMP",PCCreate_OpenMP);CHKERRQ(ierr); 102 ierr = PCRegisterDynamic(PCASA ,path,"PCCreate_ASA",PCCreate_ASA);CHKERRQ(ierr); 103 ierr = PCRegisterDynamic(PCCP ,path,"PCCreate_CP",PCCreate_CP);CHKERRQ(ierr); 104 ierr = PCRegisterDynamic(PCBFBT ,path,"PCCreate_BFBt",PCCreate_BFBt);CHKERRQ(ierr); 105 ierr = PCRegisterDynamic(PCLSC ,path,"PCCreate_LSC",PCCreate_LSC);CHKERRQ(ierr); 106 ierr = PCRegisterDynamic(PCREDISTRIBUTE ,path,"PCCreate_Redistribute",PCCreate_Redistribute);CHKERRQ(ierr); 107 #if defined(PETSC_HAVE_BOOST) && defined(PETSC_CLANGUAGE_CXX) 108 ierr = PCRegisterDynamic(PCSUPPORTGRAPH ,path,"PCCreate_SupportGraph",PCCreate_SupportGraph);CHKERRQ(ierr); 109 #endif 110 #if defined(PETSC_HAVE_ML) 111 ierr = PCRegisterDynamic(PCML ,path,"PCCreate_ML",PCCreate_ML);CHKERRQ(ierr); 112 #endif 113 #if defined(PETSC_HAVE_SPAI) 114 ierr = PCRegisterDynamic(PCSPAI ,path,"PCCreate_SPAI",PCCreate_SPAI);CHKERRQ(ierr); 115 #endif 116 #if defined(PETSC_HAVE_HYPRE) 117 ierr = PCRegisterDynamic(PCHYPRE ,path,"PCCreate_HYPRE",PCCreate_HYPRE);CHKERRQ(ierr); 118 ierr = PCRegisterDynamic(PCPFMG ,path,"PCCreate_PFMG",PCCreate_PFMG);CHKERRQ(ierr); 119 ierr = PCRegisterDynamic(PCSYSPFMG ,path,"PCCreate_SysPFMG",PCCreate_SysPFMG);CHKERRQ(ierr); 120 #endif 121 #if !defined(PETSC_USE_COMPLEX) 122 ierr = PCRegisterDynamic(PCTFS ,path,"PCCreate_TFS",PCCreate_TFS);CHKERRQ(ierr); 123 #endif 124 #if defined(PETSC_HAVE_PROMETHEUS) 125 ierr = PCRegisterDynamic(PCPROMETHEUS ,path,"PCCreate_Prometheus",PCCreate_Prometheus);CHKERRQ(ierr); 126 #endif 127 128 PetscFunctionReturn(0); 129 } 130