Home
last modified time | relevance | path

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

/petsc/src/ksp/pc/impls/mg/
H A Dgdsw.c10 PC_IS *ipcis; in PCMGGDSWSetUp() local
81 ipcis = (PC_IS *)pcbddc->data; in PCMGGDSWSetUp()
83 PetscCall(PetscObjectReference((PetscObject)ipcis->A_IB)); in PCMGGDSWSetUp()
84 PetscCall(PetscObjectReference((PetscObject)ipcis->is_I_global)); in PCMGGDSWSetUp()
85 PetscCall(PetscObjectReference((PetscObject)ipcis->is_B_global)); in PCMGGDSWSetUp()
86 sA_IG[0] = ipcis->A_IB; in PCMGGDSWSetUp()
87 sI[0] = ipcis->is_I_global; in PCMGGDSWSetUp()
88 sG[0] = ipcis->is_B_global; in PCMGGDSWSetUp()
90 PetscCall(KSPCreate(PetscObjectComm((PetscObject)ipcis->A_II), &sksp[0])); in PCMGGDSWSetUp()
92 PetscCall(KSPSetOperators(sksp[0], ipcis->A_II, ipcis->pA_II)); in PCMGGDSWSetUp()
[all …]