12 #define IndexSpaceGet(buf, nrow, ncol, irowm, icolm) \  argument
14     if (nrow + ncol > (PetscInt)PETSC_STATIC_ARRAY_LENGTH(buf)) { \
15       PetscCall(PetscMalloc2(nrow, &irowm, ncol, &icolm)); \
22 #define IndexSpaceRestore(buf, nrow, ncol, irowm, icolm) \  argument
24 … if (nrow + ncol > (PetscInt)PETSC_STATIC_ARRAY_LENGTH(buf)) PetscCall(PetscFree2(irowm, icolm)); \
35 …ocal_LocalRef_Block(Mat A, PetscInt nrow, const PetscInt irow[], PetscInt ncol, const PetscInt ico…  in MatSetValuesBlockedLocal_LocalRef_Block()  argument
41   if (!nrow || !ncol) PetscFunctionReturn(PETSC_SUCCESS);  in MatSetValuesBlockedLocal_LocalRef_Block()
42   IndexSpaceGet(buf, nrow, ncol, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Block()
44   PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol, icol, icolm));  in MatSetValuesBlockedLocal_LocalRef_Block()
45   PetscCall((*lr->SetValuesBlocked)(lr->Top, nrow, irowm, ncol, icolm, y, addv));  in MatSetValuesBlockedLocal_LocalRef_Block()
46   IndexSpaceRestore(buf, nrow, ncol, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Block()
50 …cal_LocalRef_Scalar(Mat A, PetscInt nrow, const PetscInt irow[], PetscInt ncol, const PetscInt ico…  in MatSetValuesBlockedLocal_LocalRef_Scalar()  argument
57   IndexSpaceGet(buf, nrow * rbs, ncol * cbs, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
59   BlockIndicesExpand(ncol, icol, cbs, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
61   PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol * cbs, icolm, icolm));  in MatSetValuesBlockedLocal_LocalRef_Scalar()
62   PetscCall((*lr->SetValues)(lr->Top, nrow * rbs, irowm, ncol * cbs, icolm, y, addv));  in MatSetValuesBlockedLocal_LocalRef_Scalar()
63   IndexSpaceRestore(buf, nrow * rbs, ncol * cbs, irowm, icolm);  in MatSetValuesBlockedLocal_LocalRef_Scalar()
67 …cal_LocalRef_Scalar(Mat A, PetscInt nrow, const PetscInt irow[], PetscInt ncol, const PetscInt ico…  in MatSetValuesLocal_LocalRef_Scalar()  argument
73   IndexSpaceGet(buf, nrow, ncol, irowm, icolm);  in MatSetValuesLocal_LocalRef_Scalar()
83     PetscCall(ISLocalToGlobalMappingApply(A->cmap->mapping, ncol, icol, icolm));  in MatSetValuesLocal_LocalRef_Scalar()
85     PetscCall(ISLocalToGlobalMappingApplyBlock(A->cmap->mapping, ncol, icol, icolm));  in MatSetValuesLocal_LocalRef_Scalar()
87   PetscCall((*lr->SetValues)(lr->Top, nrow, irowm, ncol, icolm, y, addv));  in MatSetValuesLocal_LocalRef_Scalar()
88   IndexSpaceRestore(buf, nrow, ncol, irowm, icolm);  in MatSetValuesLocal_LocalRef_Scalar()