Searched refs:snest (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/is/ |
| H A D | matis.c | 827 Mat **nest, *snest, **rnest, lA, B; in MatConvert_Nest_IS() local
855 …PetscCall(PetscCalloc6(nr, &isrow, nc, &iscol, nr, &islrow, nc, &islcol, nr * nc, &snest, nr * nc,… in MatConvert_Nest_IS()
874 PetscCall(MatCreateTranspose(lT, &snest[ij])); in MatConvert_Nest_IS()
879 PetscCall(MatISGetLocalMat(nest[i][j], &snest[ij])); in MatConvert_Nest_IS()
885 PetscCall(MatGetSize(snest[ij], &l1, &l2)); in MatConvert_Nest_IS()
886 PetscCall(MatGetBlockSizes(snest[ij], &lb1, &lb2)); in MatConvert_Nest_IS()
894 if (rnest && !rnest[i][j] != !snest[ij]) lreuse = PETSC_FALSE; in MatConvert_Nest_IS()
1059 PetscCall(MatCreateNest(PETSC_COMM_SELF, nr, islrow, nc, islcol, snest, &lA)); in MatConvert_Nest_IS()
1062 if (istrans[i]) PetscCall(MatDestroy(&snest[i])); in MatConvert_Nest_IS()
1084 if (snest[i * nc + j]) { in MatConvert_Nest_IS()
[all …]
|