Actual source code: pcbddcprivateimpl.h
1: /* prototypes of all BDDC private functions */
2: #pragma once
4: #include <petsc/private/pcbddcstructsimpl.h>
6: /* main functions */
7: PETSC_EXTERN PetscErrorCode PCBDDCAnalyzeInterface(PC);
8: PETSC_EXTERN PetscErrorCode PCBDDCConstraintsSetUp(PC);
10: /* reset functions */
11: PETSC_EXTERN PetscErrorCode PCBDDCResetTopography(PC);
12: PETSC_EXTERN PetscErrorCode PCBDDCResetSolvers(PC);
13: PETSC_EXTERN PetscErrorCode PCBDDCResetCustomization(PC);
15: /* graph */
16: PETSC_EXTERN PetscErrorCode PCBDDCGraphCreate(PCBDDCGraph *);
17: PETSC_EXTERN PetscErrorCode PCBDDCGraphDestroy(PCBDDCGraph *);
18: PETSC_EXTERN PetscErrorCode PCBDDCGraphInit(PCBDDCGraph, ISLocalToGlobalMapping, PetscInt, PetscInt);
19: PETSC_EXTERN PetscErrorCode PCBDDCGraphReset(PCBDDCGraph);
20: PETSC_EXTERN PetscErrorCode PCBDDCGraphResetCSR(PCBDDCGraph);
21: PETSC_EXTERN PetscErrorCode PCBDDCGraphResetCoords(PCBDDCGraph);
22: PETSC_EXTERN PetscErrorCode PCBDDCGraphSetUp(PCBDDCGraph, PetscInt, IS, IS, PetscInt, IS[], IS);
23: PETSC_EXTERN PetscErrorCode PCBDDCGraphComputeConnectedComponents(PCBDDCGraph);
24: PETSC_EXTERN PetscErrorCode PCBDDCGraphComputeConnectedComponentsLocal(PCBDDCGraph);
25: PETSC_EXTERN PetscErrorCode PCBDDCGraphASCIIView(PCBDDCGraph, PetscInt, PetscViewer);
26: PETSC_EXTERN PetscErrorCode PCBDDCGraphGetCandidatesIS(PCBDDCGraph, PetscInt *, IS *[], PetscInt *, IS *[], IS *);
27: PETSC_EXTERN PetscErrorCode PCBDDCGraphRestoreCandidatesIS(PCBDDCGraph, PetscInt *, IS *[], PetscInt *, IS *[], IS *);
28: PETSC_EXTERN PetscErrorCode PCBDDCGraphGetDirichletDofs(PCBDDCGraph, IS *);
29: PETSC_EXTERN PetscErrorCode PCBDDCGraphGetDirichletDofsB(PCBDDCGraph, IS *);
30: PETSC_EXTERN PetscErrorCode PCBDDCDestroyGraphCandidatesIS(void *);
32: /* interface for scaling operator */
33: PETSC_EXTERN PetscErrorCode PCBDDCScalingSetUp(PC);
34: PETSC_EXTERN PetscErrorCode PCBDDCScalingDestroy(PC);
35: PETSC_EXTERN PetscErrorCode PCBDDCScalingRestriction(PC, Vec, Vec);
36: PETSC_EXTERN PetscErrorCode PCBDDCScalingExtension(PC, Vec, Vec);
38: /* nullspace correction */
39: PETSC_EXTERN PetscErrorCode PCBDDCNullSpaceAssembleCorrection(PC, PetscBool, PetscBool);
41: /* utils */
42: PETSC_EXTERN PetscErrorCode PCBDDCComputeLocalMatrix(PC, Mat);
43: PETSC_EXTERN PetscErrorCode PCBDDCSetUpLocalWorkVectors(PC);
44: PETSC_EXTERN PetscErrorCode PCBDDCSetUpSolvers(PC);
45: PETSC_EXTERN PetscErrorCode PCBDDCSetUpLocalScatters(PC);
46: PETSC_EXTERN PetscErrorCode PCBDDCSetUpLocalSolvers(PC, PetscBool, PetscBool);
47: PETSC_EXTERN PetscErrorCode PCBDDCSetUpCorrection(PC, PetscScalar **);
48: PETSC_EXTERN PetscErrorCode PCBDDCSetUpCoarseSolver(PC, PetscScalar *);
49: PETSC_EXTERN PetscErrorCode PCBDDCComputePrimalNumbering(PC, PetscInt *, PetscInt **);
50: PETSC_EXTERN PetscErrorCode PCBDDCScatterCoarseDataBegin(PC, InsertMode, ScatterMode);
51: PETSC_EXTERN PetscErrorCode PCBDDCScatterCoarseDataEnd(PC, InsertMode, ScatterMode);
52: PETSC_EXTERN PetscErrorCode PCBDDCApplyInterfacePreconditioner(PC, PetscBool);
53: PETSC_EXTERN PetscErrorCode PCBDDCOrthonormalizeVecs(PetscInt *, Vec[]);
54: PETSC_EXTERN PetscErrorCode PCBDDCSetUseExactDirichlet(PC, PetscBool);
55: PETSC_EXTERN PetscErrorCode PCBDDCSetLevel(PC, PetscInt);
56: PETSC_EXTERN PetscErrorCode PCBDDCGlobalToLocal(VecScatter, Vec, Vec, IS, IS *);
57: PETSC_EXTERN PetscErrorCode PCBDDCAdaptiveSelection(PC);
58: PETSC_EXTERN PetscErrorCode PCBDDCConsistencyCheckIS(PC, MPI_Op, IS *);
59: PETSC_EXTERN PetscErrorCode PCBDDCComputeLocalTopologyInfo(PC);
60: PETSC_EXTERN PetscErrorCode MatCreateSubMatrixUnsorted(Mat, IS, IS, Mat *);
61: PETSC_EXTERN PetscErrorCode PCBDDCDetectDisconnectedComponents(PC, PetscBool, PetscInt *, IS *[], IS *);
62: PETSC_EXTERN PetscErrorCode MatSeqAIJCompress(Mat, Mat *);
63: PETSC_EXTERN PetscErrorCode PCBDDCReuseSolversBenignAdapt(PCBDDCReuseSolvers, Vec, Vec, PetscBool, PetscBool);
64: PETSC_EXTERN PetscErrorCode PCBDDCComputeNoNetFlux(Mat, Mat, PetscBool, IS, PCBDDCGraph, MatNullSpace *);
65: PETSC_EXTERN PetscErrorCode PCBDDCNullSpaceCreate(MPI_Comm, PetscBool, PetscInt, Vec[], MatNullSpace *);
66: PETSC_EXTERN PetscErrorCode PCBDDCNedelecSupport(PC);
67: PETSC_EXTERN PetscErrorCode PCBDDCAddPrimalVerticesLocalIS(PC, IS);
68: PETSC_EXTERN PetscErrorCode PCBDDCComputeFakeChange(PC, PetscBool, PCBDDCGraph, PCBDDCSubSchurs, Mat *, IS *, IS *, PetscBool *);
70: /* benign subspace trick */
71: PETSC_EXTERN PetscErrorCode PCBDDCBenignPopOrPushB0(PC, PetscBool);
72: PETSC_EXTERN PetscErrorCode PCBDDCBenignGetOrSetP0(PC, Vec, PetscBool);
73: PETSC_EXTERN PetscErrorCode PCBDDCBenignDetectSaddlePoint(PC, PetscBool, IS *);
74: PETSC_EXTERN PetscErrorCode PCBDDCBenignCheck(PC, IS);
75: PETSC_EXTERN PetscErrorCode PCBDDCBenignShellMat(PC, PetscBool);
76: PETSC_EXTERN PetscErrorCode PCBDDCBenignRemoveInterior(PC, Vec, Vec);
78: /* feti-dp */
79: PETSC_EXTERN PetscErrorCode PCBDDCCreateFETIDPMatContext(PC, FETIDPMat_ctx *);
80: PETSC_EXTERN PetscErrorCode PCBDDCSetupFETIDPMatContext(FETIDPMat_ctx);
81: PETSC_EXTERN PetscErrorCode PCBDDCCreateFETIDPPCContext(PC, FETIDPPC_ctx *);
82: PETSC_EXTERN PetscErrorCode PCBDDCSetupFETIDPPCContext(Mat, FETIDPPC_ctx);
83: PETSC_EXTERN PetscErrorCode FETIDPPCApply(PC, Vec, Vec);
84: PETSC_EXTERN PetscErrorCode FETIDPPCApplyTranspose(PC, Vec, Vec);
85: PETSC_EXTERN PetscErrorCode FETIDPPCView(PC, PetscViewer);
86: PETSC_EXTERN PetscErrorCode PCBDDCDestroyFETIDPPC(PC);
87: PETSC_EXTERN PetscErrorCode FETIDPMatMult(Mat, Vec, Vec);
88: PETSC_EXTERN PetscErrorCode FETIDPMatMultTranspose(Mat, Vec, Vec);
90: PETSC_EXTERN PetscErrorCode PCBDDCDestroyFETIDPMat(Mat);
92: /* interface to SubSchurs */
93: PETSC_EXTERN PetscErrorCode PCBDDCInitSubSchurs(PC);
94: PETSC_EXTERN PetscErrorCode PCBDDCSetUpSubSchurs(PC);
96: /* sub schurs API */
97: PETSC_EXTERN PetscErrorCode PCBDDCSubSchursCreate(PCBDDCSubSchurs *);
98: PETSC_EXTERN PetscErrorCode PCBDDCSubSchursInit(PCBDDCSubSchurs, const char *, IS, IS, PCBDDCGraph, ISLocalToGlobalMapping, PetscBool, PetscBool);
99: PETSC_EXTERN PetscErrorCode PCBDDCSubSchursReset(PCBDDCSubSchurs);
100: PETSC_EXTERN PetscErrorCode PCBDDCSubSchursDestroy(PCBDDCSubSchurs *);
101: PETSC_EXTERN PetscErrorCode PCBDDCSubSchursSetUp(PCBDDCSubSchurs, Mat, Mat, PetscBool, PetscInt[], PetscInt[], PetscInt, Vec, PetscBool, PetscBool, PetscBool, PetscInt, PetscInt[], IS[], Mat, IS);