impls/telescope/telescope_dmda.c

529         PetscMPIInt rank_ijk_re, rank_reI[3];
535         PetscCall(_DMDADetermineRankFromGlobalIJK(3, i, j, k, ctx->Mp_re, ctx->Np_re, ctx->Pp_re, ctx->start_i_re, ctx->start_j_re, ctx->start_k_re, ctx->range_i_re, ctx->range_j_re, ctx->range_k_re, &rank_reI[0], &rank_reI[1], &rank_reI[2], &rank_ijk_re));
537         ii = i - ctx->start_i_re[rank_reI[0]];
539         jj = j - ctx->start_j_re[rank_reI[1]];
541         kk = k - ctx->start_k_re[rank_reI[2]];
543         lenI_re[0]   = ctx->range_i_re[rank_reI[0]];
544         lenI_re[1]   = ctx->range_j_re[rank_reI[1]];
545         lenI_re[2]   = ctx->range_k_re[rank_reI[2]];
596       PetscMPIInt rank_ijk_re, rank_reI[3];
602       PetscCall(_DMDADetermineRankFromGlobalIJK(2, i, j, 0, ctx->Mp_re, ctx->Np_re, ctx->Pp_re, ctx->start_i_re, ctx->start_j_re, ctx->start_k_re, ctx->range_i_re, ctx->range_j_re, ctx->range_k_re, &rank_reI[0], &rank_reI[1], NULL, &rank_ijk_re));
606       ii = i - ctx->start_i_re[rank_reI[0]];
608       jj = j - ctx->start_j_re[rank_reI[1]];
611       lenI_re[0]   = ctx->range_i_re[rank_reI[0]];
612       lenI_re[1]   = ctx->range_j_re[rank_reI[1]];