fieldsplit.c (514bf10dab8e522ec43f5ccc117d5d97e4aaca18) fieldsplit.c (196cc216ae9548808fc2ef4c2e514bddc4813f7d)
1
2#include <petsc-private/pcimpl.h> /*I "petscpc.h" I*/
3#include <petscdmcomposite.h> /*I "petscdmcomposite.h" I*/
4
5const char *const PCFieldSplitSchurPreTypes[] = {"SELF","DIAG","USER","PCFieldSplitSchurPreType","PC_FIELDSPLIT_SCHUR_PRE_",0};
6const char *const PCFieldSplitSchurFactTypes[] = {"DIAG","LOWER","UPPER","FULL","PCFieldSplitSchurFactType","PC_FIELDSPLIT_SCHUR_FACT_",0};
7
8typedef struct _PC_FieldSplitLink *PC_FieldSplitLink;

--- 1329 unchanged lines hidden (view full) ---

1338- pc - the array of KSP contexts
1339
1340 Note:
1341 After PCFieldSplitGetSubKSP() the array of KSPs IS to be freed by the user
1342 (not the KSP just the array that contains them).
1343
1344 You must call KSPSetUp() before calling PCFieldSplitGetSubKSP().
1345
1
2#include <petsc-private/pcimpl.h> /*I "petscpc.h" I*/
3#include <petscdmcomposite.h> /*I "petscdmcomposite.h" I*/
4
5const char *const PCFieldSplitSchurPreTypes[] = {"SELF","DIAG","USER","PCFieldSplitSchurPreType","PC_FIELDSPLIT_SCHUR_PRE_",0};
6const char *const PCFieldSplitSchurFactTypes[] = {"DIAG","LOWER","UPPER","FULL","PCFieldSplitSchurFactType","PC_FIELDSPLIT_SCHUR_FACT_",0};
7
8typedef struct _PC_FieldSplitLink *PC_FieldSplitLink;

--- 1329 unchanged lines hidden (view full) ---

1338- pc - the array of KSP contexts
1339
1340 Note:
1341 After PCFieldSplitGetSubKSP() the array of KSPs IS to be freed by the user
1342 (not the KSP just the array that contains them).
1343
1344 You must call KSPSetUp() before calling PCFieldSplitGetSubKSP().
1345
1346 Fortran Usage: You must pass in a KSP array that is large enough to contain all the local KSPs.
1347 You can call PCFieldSplitGetSubKSP(pc,n,PETSC_NULL_OBJECT,ierr) to determine how large the
1348 KSP array must be.
1349
1350
1346 Level: advanced
1347
1348.seealso: PCFIELDSPLIT
1349@*/
1350PetscErrorCode PCFieldSplitGetSubKSP(PC pc,PetscInt *n,KSP *subksp[])
1351{
1352 PetscErrorCode ierr;
1353

--- 389 unchanged lines hidden --- 		1351 Level: advanced
1352
1353.seealso: PCFIELDSPLIT
1354@*/
1355PetscErrorCode PCFieldSplitGetSubKSP(PC pc,PetscInt *n,KSP *subksp[])
1356{
1357 PetscErrorCode ierr;
1358

--- 389 unchanged lines hidden ---