1*421c37bdSBarry Smith /* $Id: pc.h,v 1.90 1999/03/17 23:25:44 bsmith 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 "mat.h" 9d03aef70SBarry Smith 10eec0b4cfSBarry Smith /* 11eec0b4cfSBarry Smith PCList contains the list of preconditioners currently registered 12eec0b4cfSBarry Smith These are added with the PCRegister() macro 13eec0b4cfSBarry Smith */ 14719b6502SBarry Smith extern FList PCList; 1582bf6240SBarry Smith typedef char *PCType; 1682bf6240SBarry Smith 17eec0b4cfSBarry Smith /* 18eec0b4cfSBarry Smith Standard PETSc preconditioners 19eec0b4cfSBarry Smith */ 2082bf6240SBarry Smith #define PCNONE "none" 2182bf6240SBarry Smith #define PCJACOBI "jacobi" 2282bf6240SBarry Smith #define PCSOR "sor" 2382bf6240SBarry Smith #define PCLU "lu" 2482bf6240SBarry Smith #define PCSHELL "shell" 2582bf6240SBarry Smith #define PCBJACOBI "bjacobi" 2682bf6240SBarry Smith #define PCMG "mg" 2782bf6240SBarry Smith #define PCEISENSTAT "eisenstat" 2882bf6240SBarry Smith #define PCILU "ilu" 2982bf6240SBarry Smith #define PCICC "icc" 3082bf6240SBarry Smith #define PCASM "asm" 3182bf6240SBarry Smith #define PCSLES "sles" 3282bf6240SBarry Smith #define PCCOMPOSITE "composite" 33*421c37bdSBarry Smith #define PCREDUNDANT "redundant" 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); 7215091d37SBarry Smith extern int PCSetTypeFromOptions(PC); 7382bf6240SBarry Smith extern int PCGetType(PC,PCType*); 7414c91fddSBarry Smith 75291315efSLois Curfman McInnes extern int PCGetFactoredMatrix(PC,Mat*); 761bffabb2SLois Curfman McInnes extern int PCSetModifySubMatrices(PC,int(*)(PC,int,IS*,IS*,Mat*,void*),void*); 771bffabb2SLois Curfman McInnes extern int PCModifySubMatrices(PC,int,IS*,IS*,Mat*,void*); 785b116368SBarry Smith 7996e03844SLois Curfman McInnes extern int PCSetOperators(PC,Mat,Mat,MatStructure); 804b0e389bSBarry Smith extern int PCGetOperators(PC,Mat*,Mat*,MatStructure*); 814b0e389bSBarry Smith 828ed539a5SBarry Smith extern int PCSetVector(PC,Vec); 8370083d40SBarry Smith extern int PCGetVector(PC,Vec*); 848ed539a5SBarry Smith extern int PCPrintHelp(PC); 85023758ceSLois Curfman McInnes extern int PCView(PC,Viewer); 867bc3d0afSSatish Balay 871eb62cbbSBarry Smith extern int PCSetOptionsPrefix(PC,char*); 880985bb82SSatish Balay extern int PCAppendOptionsPrefix(PC,char*); 890985bb82SSatish Balay extern int PCGetOptionsPrefix(PC,char**); 908ed539a5SBarry Smith 914b0e389bSBarry Smith extern int PCNullSpaceCreate(MPI_Comm,int,int,Vec *,PCNullSpace*); 924b0e389bSBarry Smith extern int PCNullSpaceDestroy(PCNullSpace); 934b0e389bSBarry Smith extern int PCNullSpaceRemove(PCNullSpace,Vec); 944b0e389bSBarry Smith 9584cb2905SBarry Smith /* ------------- options specific to particular preconditioners --------- */ 96ddda3453SLois Curfman McInnes extern int PCSORSetSymmetric(PC, MatSORType); 978ed539a5SBarry Smith extern int PCSORSetOmega(PC, double); 9820563c6bSBarry Smith extern int PCSORSetIterations(PC, int); 99d03aef70SBarry Smith 100*421c37bdSBarry Smith extern int PCEisenstatSetOmega(PC, double); 101*421c37bdSBarry Smith extern int PCEisenstatNoDiagonalScaling(PC); 102*421c37bdSBarry Smith 10315aa81f8SBarry Smith #define USE_PRECONDITIONER_MATRIX 0 10415aa81f8SBarry Smith #define USE_TRUE_MATRIX 1 10549c46530SBarry Smith extern int PCBJacobiSetUseTrueLocal(PC); 106905e6a2fSBarry Smith extern int PCBJacobiSetTotalBlocks(PC, int, int*); 107905e6a2fSBarry Smith extern int PCBJacobiSetLocalBlocks(PC, int, int*); 1081eb62cbbSBarry Smith 109981c4779SBarry Smith extern int PCSLESSetUseTrue(PC); 11014c91fddSBarry Smith extern int PCCompositeSetUseTrue(PC); 111981c4779SBarry Smith 112aabeff55SBarry Smith extern int PCShellSetApply(PC, int (*)(void*,Vec,Vec), void*); 113719b6502SBarry Smith extern int PCShellSetSetUp(PC, int (*)(void*)); 114f0479e8cSBarry Smith extern int PCShellSetApplyRichardson(PC,int (*)(void*,Vec,Vec,Vec,int),void*); 1155f789019SLois Curfman McInnes extern int PCShellSetName(PC,char*); 1165f789019SLois Curfman McInnes extern int PCShellGetName(PC,char**); 117aabeff55SBarry Smith 11891e9ee9fSBarry Smith extern int PCLUSetMatOrdering(PC,MatOrderingType); 11991e9ee9fSBarry Smith extern int PCLUSetReuseOrdering(PC,PetscTruth); 120719b6502SBarry Smith extern int PCLUSetReuseFill(PC,PetscTruth); 1210213d9f2SLois Curfman McInnes extern int PCLUSetUseInPlace(PC); 122c977d184SBarry Smith extern int PCLUSetFill(PC,double); 123*421c37bdSBarry Smith 124*421c37bdSBarry Smith extern int PCILUSetMatOrdering(PC,MatOrderingType); 1250213d9f2SLois Curfman McInnes extern int PCILUSetUseInPlace(PC); 126c977d184SBarry Smith extern int PCILUSetFill(PC,double); 1279e25ed09SBarry Smith extern int PCILUSetLevels(PC,int); 12891e9ee9fSBarry Smith extern int PCILUSetReuseOrdering(PC,PetscTruth); 129a2ce50c7SBarry Smith extern int PCILUSetUseDropTolerance(PC,double,int); 130a2ce50c7SBarry Smith extern int PCILUSetReuseFill(PC,PetscTruth); 1315ef9f2a5SBarry Smith extern int PCILUSetAllowDiagonalFill(PC); 132a2ce50c7SBarry Smith 1336d84be18SBarry Smith extern int PCASMSetLocalSubdomains(PC, int, IS *); 1346d84be18SBarry Smith extern int PCASMSetTotalSubdomains(PC, int, IS *); 135de55ef05SSatish Balay extern int PCASMSetOverlap(PC, int); 136d252947aSBarry Smith typedef enum {PC_ASM_BASIC = 3,PC_ASM_RESTRICT = 1,PC_ASM_INTERPOLATE = 2,PC_ASM_NONE = 0} PCASMType; 137d252947aSBarry Smith extern int PCASMSetType(PC,PCASMType); 13877c4ece6SBarry Smith extern int PCASMCreateSubdomains2D(int,int,int,int,int,int,int *,IS **); 139fe053781SSatish Balay extern int PCASMSetUseInPlace(PC); 140981c4779SBarry Smith 141981c4779SBarry Smith typedef enum {PC_COMPOSITE_ADDITIVE, PC_COMPOSITE_MULTIPLICATIVE} PCCompositeType; 142981c4779SBarry Smith extern int PCCompositeSetType(PC,PCCompositeType); 143981c4779SBarry Smith extern int PCCompositeAddPC(PC,PCType); 144584db8d4SSatish Balay extern int PCCompositeGetPC(PC pc,int n,PC *); 145981c4779SBarry Smith 146*421c37bdSBarry Smith extern int PCRedundantSetOperators(PC,Mat,Mat,MatStructure); 147*421c37bdSBarry Smith 148d03aef70SBarry Smith #endif 149da3a660dSBarry Smith 150981c4779SBarry Smith 151981c4779SBarry Smith 152981c4779SBarry Smith 153