Lines Matching refs:xm
76 rloc[1] = info.xm; in DMDAVTKWriteAll_VTS()
88 PetscInt xs = -1, xm = -1, ys = -1, ym = -1, zs = -1, zm = -1, nnodes = 0; in DMDAVTKWriteAll_VTS() local
92 xm = grloc[r][1]; in DMDAVTKWriteAll_VTS()
97 nnodes = xm * ym * zm; in DMDAVTKWriteAll_VTS()
100 …MT " %" PetscInt_FMT " %" PetscInt_FMT " %" PetscInt_FMT "\">\n", xs, xs + xm - 1, ys, ys + ym - 1… in DMDAVTKWriteAll_VTS()
151 PetscInt xs = -1, xm = -1, ys = -1, ym = -1, zs = -1, zm = -1, nnodes = 0; in DMDAVTKWriteAll_VTS() local
155 xm = grloc[r][1]; in DMDAVTKWriteAll_VTS()
160 nnodes = xm * ym * zm; in DMDAVTKWriteAll_VTS()
162 nnodes = info.xm * info.ym * info.zm; in DMDAVTKWriteAll_VTS()
181 for (i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTS()
182 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTS()
196 for (i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTS()
197 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTS()
233 for (i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTS()
234 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTS()
290 rloc[1] = info.xm; in DMDAVTKWriteAll_VTR()
302 PetscInt xs = -1, xm = -1, ys = -1, ym = -1, zs = -1, zm = -1, nnodes = 0; in DMDAVTKWriteAll_VTR() local
306 xm = grloc[r][1]; in DMDAVTKWriteAll_VTR()
311 nnodes = xm * ym * zm; in DMDAVTKWriteAll_VTR()
314 …MT " %" PetscInt_FMT " %" PetscInt_FMT " %" PetscInt_FMT "\">\n", xs, xs + xm - 1, ys, ys + ym - 1… in DMDAVTKWriteAll_VTR()
317 boffset += xm * sizeof(PetscScalar) + sizeof(PetscInt64); in DMDAVTKWriteAll_VTR()
364 …cMalloc2(PetscMax(maxnnodes * maxbs, info.xm + info.ym + info.zm), &array, PetscMax(maxnnodes * ma… in DMDAVTKWriteAll_VTR()
367 PetscInt xs = -1, xm = -1, ys = -1, ym = -1, zs = -1, zm = -1, nnodes = 0; in DMDAVTKWriteAll_VTR() local
371 xm = grloc[r][1]; in DMDAVTKWriteAll_VTR()
376 nnodes = xm * ym * zm; in DMDAVTKWriteAll_VTR()
378 nnodes = info.xm * info.ym * info.zm; in DMDAVTKWriteAll_VTR()
391 PetscCallMPI(MPIU_Recv(array, xm + ym + zm, MPIU_SCALAR, r, tag, comm, &status)); in DMDAVTKWriteAll_VTR()
393 PetscCheck(nn == xm + ym + zm, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Array size mismatch"); in DMDAVTKWriteAll_VTR()
396 for (j = 0, k = 0, i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTR()
397 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
403 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
405 array[j + xm] = dim > 1 ? coords[Iloc * dim + 1] : 0; in DMDAVTKWriteAll_VTR()
409 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
411 array[k + xm + ym] = dim > 2 ? coords[Iloc * dim + 2] : 0; in DMDAVTKWriteAll_VTR()
415 xm = info.xm; in DMDAVTKWriteAll_VTR()
418 for (j = 0, k = 0, i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTR()
419 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
424 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
426 array2[j + xm] = dim > 1 ? coords[Iloc * dim + 1] : 0; in DMDAVTKWriteAll_VTR()
429 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()
431 array2[k + xm + ym] = dim > 2 ? coords[Iloc * dim + 2] : 0; in DMDAVTKWriteAll_VTR()
433 PetscCallMPI(MPIU_Send((void *)array2, xm + ym + zm, MPIU_SCALAR, 0, tag, comm)); in DMDAVTKWriteAll_VTR()
437 for (i = 0; i < xm; i++) array[i] = xs + i; in DMDAVTKWriteAll_VTR()
438 for (j = 0; j < ym; j++) array[j + xm] = ys + j; in DMDAVTKWriteAll_VTR()
439 for (k = 0; k < zm; k++) array[k + xm + ym] = zs + k; in DMDAVTKWriteAll_VTR()
442 PetscCall(PetscViewerVTKFWrite(viewer, fp, &array[0], xm, MPIU_SCALAR)); in DMDAVTKWriteAll_VTR()
443 PetscCall(PetscViewerVTKFWrite(viewer, fp, &array[xm], ym, MPIU_SCALAR)); in DMDAVTKWriteAll_VTR()
444 PetscCall(PetscViewerVTKFWrite(viewer, fp, &array[xm + ym], zm, MPIU_SCALAR)); in DMDAVTKWriteAll_VTR()
475 for (i = 0; i < xm; i++) { in DMDAVTKWriteAll_VTR()
476 PetscInt Iloc = i + xm * (j + ym * k); in DMDAVTKWriteAll_VTR()