Lines Matching refs:nr
302 for (i = 0; i < lf->nr; i++) PetscCall(ISDestroy(&lf->rf[i])); in MatISContainerDestroyFields_Private()
668 PetscInt nr, nc; in MatConvert_XAIJ_IS() local
674 PetscCall(ISLocalToGlobalMappingGetSize(rl2g, &nr)); in MatConvert_XAIJ_IS()
678 PetscCall(ISCreateBlock(comm, rbs, nr / rbs, ridx, PETSC_USE_POINTER, &rows)); in MatConvert_XAIJ_IS()
832 PetscInt i, j, nr, nc, rbs, cbs; in MatConvert_Nest_IS() local
837 PetscCall(MatNestGetSubMats(A, &nr, &nc, &nest)); in MatConvert_Nest_IS()
849 lreuse = (PetscBool)(i == nr && j == nc); in MatConvert_Nest_IS()
854 PetscCall(PetscCalloc2(nr, &lr, nc, &lc)); in MatConvert_Nest_IS()
855 …PetscCall(PetscCalloc6(nr, &isrow, nc, &iscol, nr, &islrow, nc, &islcol, nr * nc, &snest, nr * nc,… in MatConvert_Nest_IS()
857 for (i = 0; i < nr; i++) { in MatConvert_Nest_IS()
900 for (i = 0; i < nr; i++) { in MatConvert_Nest_IS()
936 for (j = 0; j < nr; j++) { in MatConvert_Nest_IS()
974 for (i = 0, stl = 0; i < nr; i++) stl += lr[i]; in MatConvert_Nest_IS()
976 for (i = 0, stl = 0; i < nr; i++) { in MatConvert_Nest_IS()
1023 while (!usedmat && j < nr - 1) usedmat = nest[++j][i]; in MatConvert_Nest_IS()
1059 PetscCall(MatCreateNest(PETSC_COMM_SELF, nr, islrow, nc, islcol, snest, &lA)); in MatConvert_Nest_IS()
1061 for (i = 0; i < nr * nc; i++) { in MatConvert_Nest_IS()
1082 for (i = 0; i < nr; i++) { in MatConvert_Nest_IS()
1092 for (i = 0, stl = 0; i < nr; i++) { in MatConvert_Nest_IS()
1100 PetscCall(MatCreateNest(PETSC_COMM_SELF, nr, islrow, nc, islcol, snest, &lA)); in MatConvert_Nest_IS()
1101 for (i = 0; i < nr * nc; i++) { in MatConvert_Nest_IS()
1125 PetscCall(PetscMalloc2(nr, &lf->rf, nc, &lf->cf)); in MatConvert_Nest_IS()
1126 for (i = 0; i < nr; i++) { in MatConvert_Nest_IS()
1140 lf->nr = nr; in MatConvert_Nest_IS()
1146 for (i = 0; i < nr; i++) PetscCall(ISDestroy(&islrow[i])); in MatConvert_Nest_IS()
1961 PetscInt nr, nc; in MatConvert_IS_XAIJ() local
1963 PetscCall(MatGetSize(local_mat, &nr, &nc)); in MatConvert_IS_XAIJ()
1964 ncoo = nr * nc; in MatConvert_IS_XAIJ()
1967 for (PetscInt i = 0; i < nr; i++) { in MatConvert_IS_XAIJ()
1968 coo_i[j * nr + i] = i; in MatConvert_IS_XAIJ()
1969 coo_j[j * nr + i] = j; in MatConvert_IS_XAIJ()
1974 PetscInt nr; in MatConvert_IS_XAIJ() local
1977 PetscCall(MatGetRowIJ(local_mat, 0, PETSC_FALSE, PETSC_FALSE, &nr, &ii, &jj, &done)); in MatConvert_IS_XAIJ()
1979 ncoo = ii[nr]; in MatConvert_IS_XAIJ()
1982 for (PetscInt i = 0; i < nr; i++) { in MatConvert_IS_XAIJ()
1985 PetscCall(MatRestoreRowIJ(local_mat, 0, PETSC_FALSE, PETSC_FALSE, &nr, &ii, &jj, &done)); in MatConvert_IS_XAIJ()
2269 PetscInt tr[6], nr, nc, lsize = 0; in MatView_IS() local
2311 PetscCall(MatGetSize(a->A, &nr, &nc)); in MatView_IS()
2312 … PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)viewer), 1, &nr, PETSC_USE_POINTER, &is)); in MatView_IS()
2335 PetscInt nr, nc; in MatView_IS() local
2348 PetscCall(MatGetSize(lA, &nr, &nc)); in MatView_IS()
2349 PetscCall(MatSetSizes(B, nr, nc, PETSC_DECIDE, PETSC_DECIDE)); in MatView_IS()
2411 PetscInt tr[6], M, N, nr, nc, Asize, isn; in MatLoad_IS() local
2466 nr = 0; in MatLoad_IS()
2467 for (PetscInt i = 0; i < isn; i++) nr += idx[i]; in MatLoad_IS()
2483 PetscCall(MatSetSizes(dA, nr, nc, PETSC_DECIDE, PETSC_DECIDE)); in MatLoad_IS()
2548 PetscInt nr, rbs, nc, cbs; in MatISSetUpScatters_Private() local
2552 PetscCall(ISLocalToGlobalMappingGetSize(is->rmapping, &nr)); in MatISSetUpScatters_Private()
2569 …PetscCall(ISCreateBlock(PetscObjectComm((PetscObject)A), rbs, nr / rbs, garray, PETSC_USE_POINTER,… in MatISSetUpScatters_Private()
2665 PetscInt nr, rbs, nc, cbs; in MatSetLocalToGlobalMapping_IS() local
2732 PetscCall(ISLocalToGlobalMappingGetSize(is->rmapping, &nr)); in MatSetLocalToGlobalMapping_IS()
2738 if (nr == nc && cbs == rbs) { in MatSetLocalToGlobalMapping_IS()
2743 PetscCall(PetscArraycmp(idxs1, idxs2, nr / rbs, &same)); in MatSetLocalToGlobalMapping_IS()
2766 PetscCall(MatSetSizes(is->A, nr, nc, nr, nc)); in MatSetLocalToGlobalMapping_IS()
2885 PetscInt nr, nl, len; in MatZeroRowsColumns_Private_IS() local
2920 nr = 0; in MatZeroRowsColumns_Private_IS()
2922 if (matis->sf_leafdata[i]) lrows[nr++] = i; in MatZeroRowsColumns_Private_IS()
2923 PetscCall(MatISZeroRowsColumnsLocal_Private(A, nr, lrows, diag, columns)); in MatZeroRowsColumns_Private_IS()
2963 PetscInt nr, nc, nnzr, nnzc; in MatAssemblyEnd_IS() local
2966 PetscCall(MatGetSize(is->A, &nr, &nc)); in MatAssemblyEnd_IS()
2968 if (!nzr) PetscCall(ISCreateStride(PetscObjectComm((PetscObject)is->A), nr, 0, 1, &nzr)); in MatAssemblyEnd_IS()
2973 if (nnzr != nr || nnzc != nc) { /* need new global l2g map */ in MatAssemblyEnd_IS()
2992 PetscCall(ISComplement(nzr, 0, nr, &zr)); in MatAssemblyEnd_IS()
2994 PetscCall(PetscMalloc1(PetscMax(nr, nc), &nidxs)); in MatAssemblyEnd_IS()
3002 PetscCall(PetscArraycpy(nidxs, ridxs, nr)); in MatAssemblyEnd_IS()
3004 …PetscCall(ISLocalToGlobalMappingCreate(PetscObjectComm((PetscObject)A), 1, nr, nidxs, PETSC_COPY_V… in MatAssemblyEnd_IS()