Searched refs:same_fields (Results 1 – 1 of 1) sorted by relevance
621 PetscBool same_fields = PETSC_TRUE; in PCSetUp_FieldSplit() local624 if (ilink->fields[k] != ilink->fields_col[k]) same_fields = PETSC_FALSE; in PCSetUp_FieldSplit()631 if (!same_fields) PetscCall(PetscMalloc1(ilink->nfields * nslots, &jj)); in PCSetUp_FieldSplit()635 if (!same_fields) jj[nfields * j + k] = rstart + bs * j + fields_col[k]; in PCSetUp_FieldSplit()639 …if (!same_fields) PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)pc), nslots * nfields, jj… in PCSetUp_FieldSplit()648 …if (!same_fields) PetscCall(ISCreateStride(PetscObjectComm((PetscObject)pc), nslots, rstart + ilin… in PCSetUp_FieldSplit()