Lines Matching refs:m
50 …t_FMT " w %" PetscInt_FMT " s %" PetscInt_FMT "\n", rank, dd->M, dd->N, dd->m, dd->n, dd->w, dd->s… in DMView_DA_2d()
192 PetscMPIInt m, n; in DMSetUp_DA_2D() local
217 PetscCall(PetscMPIIntCast(dd->m, &m)); in DMSetUp_DA_2D()
224 if (m != PETSC_DECIDE) { in DMSetUp_DA_2D()
225 …PetscCheck(m >= 1, comm, PETSC_ERR_ARG_OUTOFRANGE, "Non-positive number of processors in X directi… in DMSetUp_DA_2D()
226 …PetscCheck(m <= size, comm, PETSC_ERR_ARG_OUTOFRANGE, "Too many processors in X direction: %d %d",… in DMSetUp_DA_2D()
233 if (m == PETSC_DECIDE || n == PETSC_DECIDE) { in DMSetUp_DA_2D()
235 m = size / n; in DMSetUp_DA_2D()
236 } else if (m != PETSC_DECIDE) { in DMSetUp_DA_2D()
237 n = size / m; in DMSetUp_DA_2D()
240 m = (PetscMPIInt)(0.5 + PetscSqrtReal(((PetscReal)M) * ((PetscReal)size) / ((PetscReal)N))); in DMSetUp_DA_2D()
241 if (!m) m = 1; in DMSetUp_DA_2D()
242 while (m > 0) { in DMSetUp_DA_2D()
243 n = size / m; in DMSetUp_DA_2D()
244 if (m * n == size) break; in DMSetUp_DA_2D()
245 m--; in DMSetUp_DA_2D()
247 if (M > N && m < n) { in DMSetUp_DA_2D()
248 PetscMPIInt _m = m; in DMSetUp_DA_2D()
249 m = n; in DMSetUp_DA_2D()
253 …PetscCheck(m * n == size, comm, PETSC_ERR_PLIB, "Unable to create partition, check the size of the… in DMSetUp_DA_2D()
254 } else PetscCheck(m * n == size, comm, PETSC_ERR_ARG_OUTOFRANGE, "Given Bad partition"); in DMSetUp_DA_2D()
256 …PetscCheck(M >= m, comm, PETSC_ERR_ARG_OUTOFRANGE, "Partition in x direction is too fine! %" Petsc… in DMSetUp_DA_2D()
264 PetscCall(PetscMalloc1(m, &dd->lx)); in DMSetUp_DA_2D()
266 for (i = 0; i < m; i++) lx[i] = M / m + ((M % m) > i); in DMSetUp_DA_2D()
268 x = lx[rank % m]; in DMSetUp_DA_2D()
270 for (i = 0; i < (rank % m); i++) xs += lx[i]; in DMSetUp_DA_2D()
273 for (i = (rank % m); i < m; i++) left += lx[i]; in DMSetUp_DA_2D()
286 y = ly[rank / m]; in DMSetUp_DA_2D()
288 for (i = 0; i < (rank / m); i++) ys += ly[i]; in DMSetUp_DA_2D()
291 for (i = (rank / m); i < n; i++) left += ly[i]; in DMSetUp_DA_2D()
299 …PetscCheck((x >= s) || ((m <= 1) && (bx != DM_BOUNDARY_PERIODIC)), PETSC_COMM_SELF, PETSC_ERR_ARG_… in DMSetUp_DA_2D()
440 n1 = rank - m; in DMSetUp_DA_2D()
441 if (rank % m) { in DMSetUp_DA_2D()
446 if ((rank + 1) % m) { in DMSetUp_DA_2D()
449 n8 = rank + m + 1; in DMSetUp_DA_2D()
450 if (n8 >= m * n) n8 = -1; in DMSetUp_DA_2D()
456 if (rank % m) { in DMSetUp_DA_2D()
458 n6 = n3 + m; in DMSetUp_DA_2D()
459 if (n6 >= m * n) n6 = -1; in DMSetUp_DA_2D()
464 n7 = rank + m; in DMSetUp_DA_2D()
465 if (n7 >= m * n) n7 = -1; in DMSetUp_DA_2D()
470 if ((n6 < 0) && (n7 < 0) && (n3 < 0)) n6 = m - 1; in DMSetUp_DA_2D()
472 if ((n2 < 0) && (n5 < 0) && (n1 < 0)) n2 = size - m; in DMSetUp_DA_2D()
476 if (n1 < 0) n1 = rank + m * (n - 1); in DMSetUp_DA_2D()
477 if (n7 < 0) n7 = rank - m * (n - 1); in DMSetUp_DA_2D()
478 if ((n3 >= 0) && (n0 < 0)) n0 = size - m + rank - 1; in DMSetUp_DA_2D()
479 if ((n3 >= 0) && (n6 < 0)) n6 = (rank % m) - 1; in DMSetUp_DA_2D()
480 if ((n5 >= 0) && (n2 < 0)) n2 = size - m + rank + 1; in DMSetUp_DA_2D()
481 if ((n5 >= 0) && (n8 < 0)) n8 = (rank % m) + 1; in DMSetUp_DA_2D()
484 if (n3 < 0) n3 = rank + (m - 1); in DMSetUp_DA_2D()
485 if (n5 < 0) n5 = rank - (m - 1); in DMSetUp_DA_2D()
487 if ((n1 >= 0) && (n2 < 0)) n2 = rank - 2 * m + 1; in DMSetUp_DA_2D()
488 if ((n7 >= 0) && (n6 < 0)) n6 = rank + 2 * m - 1; in DMSetUp_DA_2D()
491 if (n1 < 0) n1 = rank + m * (n - 1); in DMSetUp_DA_2D()
492 if (n7 < 0) n7 = rank - m * (n - 1); in DMSetUp_DA_2D()
493 if ((n3 >= 0) && (n0 < 0)) n0 = size - m + rank - 1; in DMSetUp_DA_2D()
494 if ((n3 >= 0) && (n6 < 0)) n6 = (rank % m) - 1; in DMSetUp_DA_2D()
495 if ((n5 >= 0) && (n2 < 0)) n2 = size - m + rank + 1; in DMSetUp_DA_2D()
496 if ((n5 >= 0) && (n8 < 0)) n8 = (rank % m) + 1; in DMSetUp_DA_2D()
498 if (n3 < 0) n3 = rank + (m - 1); in DMSetUp_DA_2D()
499 if (n5 < 0) n5 = rank - (m - 1); in DMSetUp_DA_2D()
501 if ((n1 >= 0) && (n2 < 0)) n2 = rank - 2 * m + 1; in DMSetUp_DA_2D()
502 if ((n7 >= 0) && (n6 < 0)) n6 = rank + 2 * m - 1; in DMSetUp_DA_2D()
533 x_t = lx[n0 % m]; in DMSetUp_DA_2D()
534 y_t = ly[n0 / m]; in DMSetUp_DA_2D()
541 y_t = ly[n1 / m]; in DMSetUp_DA_2D()
549 x_t = lx[n2 % m]; in DMSetUp_DA_2D()
550 y_t = ly[n2 / m]; in DMSetUp_DA_2D()
558 x_t = lx[n3 % m]; in DMSetUp_DA_2D()
569 x_t = lx[n5 % m]; in DMSetUp_DA_2D()
580 x_t = lx[n6 % m]; in DMSetUp_DA_2D()
596 x_t = lx[n8 % m]; in DMSetUp_DA_2D()
625 x_t = lx[n0 % m]; in DMSetUp_DA_2D()
626 y_t = ly[n0 / m]; in DMSetUp_DA_2D()
634 y_t = ly[n1 / m]; in DMSetUp_DA_2D()
645 x_t = lx[n2 % m]; in DMSetUp_DA_2D()
646 y_t = ly[n2 / m]; in DMSetUp_DA_2D()
656 x_t = lx[n3 % m]; in DMSetUp_DA_2D()
671 x_t = lx[n5 % m]; in DMSetUp_DA_2D()
686 x_t = lx[n6 % m]; in DMSetUp_DA_2D()
706 x_t = lx[n8 % m]; in DMSetUp_DA_2D()
722 dd->m = m; in DMSetUp_DA_2D()
810 …daryType by, DMDAStencilType stencil_type, PetscInt M, PetscInt N, PetscInt m, PetscInt n, PetscIn… in DMDACreate2d() argument
816 PetscCall(DMDASetNumProcs(*da, m, n, PETSC_DECIDE)); in DMDACreate2d()