Lines Matching refs:cdim
46 PetscInt dim, mx, my, mz, cdim, bs, maxnnodes, maxbs, i, j, k; in DMDAVTKWriteAll_VTS() local
63 cdim = csize / (mx * my * mz); in DMDAVTKWriteAll_VTS()
64 …PetscCheck(cdim >= dim && cdim <= 3, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Coordinate vector size mism… in DMDAVTKWriteAll_VTS()
66 cdim = dim; in DMDAVTKWriteAll_VTS()
174 PetscCallMPI(MPIU_Recv(array, nnodes * cdim, MPIU_SCALAR, r, tag, comm, &status)); in DMDAVTKWriteAll_VTS()
176 PetscCheck(nn == nnodes * cdim, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Array size mismatch"); in DMDAVTKWriteAll_VTS()
177 } else PetscCall(PetscArraycpy(array, coords, nnodes * cdim)); in DMDAVTKWriteAll_VTS()
183 array2[Iloc * 3 + 0] = array[Iloc * cdim + 0]; in DMDAVTKWriteAll_VTS()
184 array2[Iloc * 3 + 1] = cdim > 1 ? array[Iloc * cdim + 1] : 0.0; in DMDAVTKWriteAll_VTS()
185 array2[Iloc * 3 + 2] = cdim > 2 ? array[Iloc * cdim + 2] : 0.0; in DMDAVTKWriteAll_VTS()
190 PetscCallMPI(MPIU_Send((void *)coords, nnodes * cdim, MPIU_SCALAR, 0, tag, comm)); in DMDAVTKWriteAll_VTS()