1*5ef9f2a5SBarry Smith /* $Id: pc.h,v 1.85 1998/11/19 20:15:26 balay Exp bsmith $ */ 2d03aef70SBarry Smith 3d03aef70SBarry Smith /* 437f753daSBarry Smith Preconditioner module. 5d03aef70SBarry Smith */ 688d459dfSBarry Smith #if !defined(__PC_H) 788d459dfSBarry Smith #define __PC_H 8d03aef70SBarry Smith #include "petsc.h" 9d03aef70SBarry Smith #include "mat.h" 10d03aef70SBarry Smith 11eec0b4cfSBarry Smith /* 12eec0b4cfSBarry Smith PCList contains the list of preconditioners currently registered 13eec0b4cfSBarry Smith These are added with the PCRegister() macro 14eec0b4cfSBarry Smith */ 15719b6502SBarry Smith extern FList PCList; 1682bf6240SBarry Smith typedef char *PCType; 1782bf6240SBarry Smith 18eec0b4cfSBarry Smith /* 19eec0b4cfSBarry Smith Standard PETSc preconditioners 20eec0b4cfSBarry Smith */ 2182bf6240SBarry Smith #define PCNONE "none" 2282bf6240SBarry Smith #define PCJACOBI "jacobi" 2382bf6240SBarry Smith #define PCSOR "sor" 2482bf6240SBarry Smith #define PCLU "lu" 2582bf6240SBarry Smith #define PCSHELL "shell" 2682bf6240SBarry Smith #define PCBJACOBI "bjacobi" 2782bf6240SBarry Smith #define PCMG "mg" 2882bf6240SBarry Smith #define PCEISENSTAT "eisenstat" 2982bf6240SBarry Smith #define PCILU "ilu" 3082bf6240SBarry Smith #define PCICC "icc" 3182bf6240SBarry Smith #define PCASM "asm" 3282bf6240SBarry Smith #define PCSLES "sles" 3382bf6240SBarry Smith #define PCCOMPOSITE "composite" 34d03aef70SBarry Smith 353e5c7decSSatish Balay typedef struct _p_PC* PC; 369e25ed09SBarry Smith #define PC_COOKIE PETSC_COOKIE+9 37d03aef70SBarry Smith 383f1d51d7SBarry Smith /* 393f1d51d7SBarry Smith Null space code is not yet developed 403f1d51d7SBarry Smith */ 41f09e8eb9SSatish Balay typedef struct _p_PCNullSpace* PCNullSpace; 4221e95762SBarry Smith #define PCNULLSPACE_COOKIE PETSC_COOKIE+17 4321e95762SBarry Smith 44aad2872bSLois Curfman McInnes typedef enum { PC_LEFT, PC_RIGHT, PC_SYMMETRIC } PCSide; 4572b7852fSLois Curfman McInnes 466b5873e3SBarry Smith extern int PCCreate(MPI_Comm,PC*); 474b0e389bSBarry Smith extern int PCSetType(PC,PCType); 488ed539a5SBarry Smith extern int PCSetUp(PC); 496d84be18SBarry Smith extern int PCSetUpOnBlocks(PC); 50aabeff55SBarry Smith extern int PCApply(PC,Vec,Vec); 5177c4ece6SBarry Smith extern int PCApplySymmetricLeft(PC,Vec,Vec); 5277c4ece6SBarry Smith extern int PCApplySymmetricRight(PC,Vec,Vec); 53aad2872bSLois Curfman McInnes extern int PCApplyBAorAB(PC,PCSide,Vec,Vec,Vec); 54aabeff55SBarry Smith extern int PCApplyTrans(PC,Vec,Vec); 55aad2872bSLois Curfman McInnes extern int PCApplyBAorABTrans(PC,PCSide,Vec,Vec,Vec); 56aabeff55SBarry Smith extern int PCApplyRichardson(PC,Vec,Vec,Vec,int); 5777c4ece6SBarry Smith extern int PCApplyRichardsonExists(PC,PetscTruth*); 5884cb2905SBarry Smith 59cf256101SBarry Smith extern int PCRegisterDestroy(void); 6082bf6240SBarry Smith extern int PCRegisterAll(char*); 6184cb2905SBarry Smith extern int PCRegisterAllCalled; 6284cb2905SBarry Smith 636df38c32SLois Curfman McInnes extern int PCRegister_Private(char*,char*,char*,int(*)(PC)); 646df38c32SLois Curfman McInnes #if defined(USE_DYNAMIC_LIBRARIES) 656df38c32SLois Curfman McInnes #define PCRegister(a,b,c,d) PCRegister_Private(a,b,c,0) 666df38c32SLois Curfman McInnes #else 676df38c32SLois Curfman McInnes #define PCRegister(a,b,c,d) PCRegister_Private(a,b,c,d) 686df38c32SLois Curfman McInnes #endif 696df38c32SLois Curfman McInnes 708ed539a5SBarry Smith extern int PCDestroy(PC); 718ed539a5SBarry Smith extern int PCSetFromOptions(PC); 7282bf6240SBarry Smith extern int PCGetType(PC,PCType*); 7314c91fddSBarry Smith 74291315efSLois Curfman McInnes extern int PCGetFactoredMatrix(PC,Mat*); 751bffabb2SLois Curfman McInnes extern int PCSetModifySubMatrices(PC,int(*)(PC,int,IS*,IS*,Mat*,void*),void*); 761bffabb2SLois Curfman McInnes extern int PCModifySubMatrices(PC,int,IS*,IS*,Mat*,void*); 775b116368SBarry Smith 7896e03844SLois Curfman McInnes extern int PCSetOperators(PC,Mat,Mat,MatStructure); 794b0e389bSBarry Smith extern int PCGetOperators(PC,Mat*,Mat*,MatStructure*); 804b0e389bSBarry Smith 818ed539a5SBarry Smith extern int PCSetVector(PC,Vec); 8270083d40SBarry Smith extern int PCGetVector(PC,Vec*); 838ed539a5SBarry Smith extern int PCPrintHelp(PC); 84023758ceSLois Curfman McInnes extern int PCView(PC,Viewer); 857bc3d0afSSatish Balay 861eb62cbbSBarry Smith extern int PCSetOptionsPrefix(PC,char*); 870985bb82SSatish Balay extern int PCAppendOptionsPrefix(PC,char*); 880985bb82SSatish Balay extern int PCGetOptionsPrefix(PC,char**); 898ed539a5SBarry Smith 904b0e389bSBarry Smith extern int PCNullSpaceCreate(MPI_Comm,int,int,Vec *,PCNullSpace*); 914b0e389bSBarry Smith extern int PCNullSpaceDestroy(PCNullSpace); 924b0e389bSBarry Smith extern int PCNullSpaceRemove(PCNullSpace,Vec); 934b0e389bSBarry Smith 9484cb2905SBarry Smith /* ------------- options specific to particular preconditioners --------- */ 95ddda3453SLois Curfman McInnes extern int PCSORSetSymmetric(PC, MatSORType); 968ed539a5SBarry Smith extern int PCSORSetOmega(PC, double); 975b116368SBarry Smith extern int PCEisenstatSetOmega(PC, double); 9820563c6bSBarry Smith extern int PCSORSetIterations(PC, int); 99d03aef70SBarry Smith 10015aa81f8SBarry Smith #define USE_PRECONDITIONER_MATRIX 0 10115aa81f8SBarry Smith #define USE_TRUE_MATRIX 1 10249c46530SBarry Smith extern int PCBJacobiSetUseTrueLocal(PC); 103905e6a2fSBarry Smith extern int PCBJacobiSetTotalBlocks(PC, int, int*); 104905e6a2fSBarry Smith extern int PCBJacobiSetLocalBlocks(PC, int, int*); 1051eb62cbbSBarry Smith 106981c4779SBarry Smith extern int PCSLESSetUseTrue(PC); 10714c91fddSBarry Smith extern int PCCompositeSetUseTrue(PC); 108981c4779SBarry Smith 109aabeff55SBarry Smith extern int PCShellSetApply(PC, int (*)(void*,Vec,Vec), void*); 110719b6502SBarry Smith extern int PCShellSetSetUp(PC, int (*)(void*)); 111f0479e8cSBarry Smith extern int PCShellSetApplyRichardson(PC,int (*)(void*,Vec,Vec,Vec,int),void*); 1125f789019SLois Curfman McInnes extern int PCShellSetName(PC,char*); 1135f789019SLois Curfman McInnes extern int PCShellGetName(PC,char**); 114aabeff55SBarry Smith 115ca161407SBarry Smith extern int PCLUSetMatReordering(PC,MatReorderingType); 116719b6502SBarry Smith extern int PCLUSetReuseReordering(PC,PetscTruth); 117719b6502SBarry Smith extern int PCLUSetReuseFill(PC,PetscTruth); 118719b6502SBarry Smith 119ca161407SBarry Smith extern int PCILUSetMatReordering(PC,MatReorderingType); 1200213d9f2SLois Curfman McInnes extern int PCLUSetUseInPlace(PC); 121c977d184SBarry Smith extern int PCLUSetFill(PC,double); 1220213d9f2SLois Curfman McInnes extern int PCILUSetUseInPlace(PC); 123c977d184SBarry Smith extern int PCILUSetFill(PC,double); 1249e25ed09SBarry Smith extern int PCILUSetLevels(PC,int); 125a2ce50c7SBarry Smith extern int PCILUSetReuseReordering(PC,PetscTruth); 126a2ce50c7SBarry Smith extern int PCILUSetUseDropTolerance(PC,double,int); 127a2ce50c7SBarry Smith extern int PCILUSetReuseFill(PC,PetscTruth); 128*5ef9f2a5SBarry Smith extern int PCILUSetAllowDiagonalFill(PC); 129a2ce50c7SBarry Smith 13024a74354SBarry Smith extern int PCEisenstatUseDiagonalScaling(PC); 1319e25ed09SBarry Smith 1326d84be18SBarry Smith extern int PCASMSetLocalSubdomains(PC, int, IS *); 1336d84be18SBarry Smith extern int PCASMSetTotalSubdomains(PC, int, IS *); 134de55ef05SSatish Balay extern int PCASMSetOverlap(PC, int); 135d252947aSBarry Smith typedef enum {PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1,PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0} PCASMType; 136d252947aSBarry Smith extern int PCASMSetType(PC,PCASMType); 13777c4ece6SBarry Smith extern int PCASMCreateSubdomains2D(int,int,int,int,int,int,int *,IS **); 138fe053781SSatish Balay extern int PCASMSetUseInPlace(PC); 139981c4779SBarry Smith 140981c4779SBarry Smith typedef enum {PC_COMPOSITE_ADDITIVE, PC_COMPOSITE_MULTIPLICATIVE} PCCompositeType; 141981c4779SBarry Smith extern int PCCompositeSetType(PC,PCCompositeType); 142981c4779SBarry Smith extern int PCCompositeAddPC(PC,PCType); 143981c4779SBarry Smith 144d03aef70SBarry Smith #endif 145da3a660dSBarry Smith 146981c4779SBarry Smith 147981c4779SBarry Smith 148981c4779SBarry Smith 149