Home
last modified time | relevance | path

Searched refs:tksp (Results 1 – 4 of 4) sorted by relevance

/petsc/src/ksp/pc/impls/fieldsplit/ftn-custom/
H A Dzfieldsplitf.c18 KSP *tksp; in pcfieldsplitschurgetsubksp_() local
21 *ierr = PCFieldSplitSchurGetSubKSP(*pc, &nloc, &tksp); in pcfieldsplitschurgetsubksp_()
24 *ierr = F90Array1dCreate(tksp, MPIU_FORTRANADDR, 1, nloc, ksp PETSC_F90_2PTR_PARAM(ptrd)); in pcfieldsplitschurgetsubksp_()
29 KSP *tksp; in pcfieldsplitgetsubksp_() local
32 *ierr = PCFieldSplitGetSubKSP(*pc, &nloc, &tksp); in pcfieldsplitgetsubksp_()
35 *ierr = F90Array1dCreate(tksp, MPIU_FORTRANADDR, 1, nloc, ksp PETSC_F90_2PTR_PARAM(ptrd)); in pcfieldsplitgetsubksp_()
/petsc/src/ksp/pc/impls/bjacobi/ftn-custom/
H A Dzbjacobif.c14 KSP *tksp; in pcbjacobigetsubksp_() local
19 *ierr = PCBJacobiGetSubKSP(*pc, &nloc, &flocal, &tksp); in pcbjacobigetsubksp_()
22 *ierr = F90Array1dCreate(tksp, MPIU_FORTRANADDR, 1, nloc, ksp PETSC_F90_2PTR_PARAM(ptrd)); in pcbjacobigetsubksp_()
/petsc/src/ksp/pc/impls/gasm/ftn-custom/
H A Dzgasmf.c44 KSP *tksp; in pcgasmgetsubksp_() local
49 *ierr = PCGASMGetSubKSP(*pc, &nloc, &flocal, &tksp); in pcgasmgetsubksp_()
52 *ierr = F90Array1dCreate(tksp, MPIU_FORTRANADDR, 1, nloc, ksp PETSC_F90_2PTR_PARAM(ptrd)); in pcgasmgetsubksp_()
/petsc/src/ksp/pc/impls/asm/ftn-custom/
H A Dzasmf.c91 KSP *tksp; in pcasmgetsubksp_() local
96 *ierr = PCASMGetSubKSP(*pc, &nloc, &flocal, &tksp); in pcasmgetsubksp_()
99 *ierr = F90Array1dCreate(tksp, MPIU_FORTRANADDR, 1, nloc, ksp PETSC_F90_2PTR_PARAM(ptrd)); in pcasmgetsubksp_()