| /petsc/src/dm/impls/da/ |
| H A D | dagetarray.c | 45 PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof; in DMDAVecGetArray() local 52 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); in DMDAVecGetArray() 59 gym = ym; in DMDAVecGetArray() 64 …gym * gzm * dof, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Vector local size %" PetscInt_FMT " is no… in DMDAVecGetArray() 69 PetscCall(VecGetArray2d(vec, gym, gxm * dof, gys, gxs * dof, (PetscScalar ***)array)); in DMDAVecGetArray() 71 … PetscCall(VecGetArray3d(vec, gzm, gym, gxm * dof, gzs, gys, gxs * dof, (PetscScalar ****)array)); in DMDAVecGetArray() 94 PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof; in DMDAVecRestoreArray() local 101 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); in DMDAVecRestoreArray() 108 gym = ym; in DMDAVecRestoreArray() 113 …gym * gzm * dof, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Vector local size %" PetscInt_FMT " is no… in DMDAVecRestoreArray() [all …]
|
| H A D | dalocal.c | 137 …gym), PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Y index %" PetscInt_FMT " not in [%" PetscInt_FM… in DMDAGetCellPoint() 139 *point = i + (dim > 1 ? (j + (dim > 2 ? k * info.gym : 0)) * info.gxm : 0); in DMDAGetCellPoint()
|
| H A D | daview.c | 195 info->gym = (dd->Ye - dd->Ys); in DMDAGetLocalInfo()
|
| /petsc/src/dm/impls/da/ftn-custom/ |
| H A D | zda1f90.c | 68 PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof; in dmdavecgetarray1_() local 73 *ierr = DMDAGetGhostCorners(*da, &gxs, &gys, &gzs, &gxm, &gym, &gzm); in dmdavecgetarray1_() 83 gym = ym; in dmdavecgetarray1_() 88 } else if (N != gxm * gym * gzm * dof) { in dmdavecgetarray1_() 109 PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof; in dmdavecgetarray2_() local 114 *ierr = DMDAGetGhostCorners(*da, &gxs, &gys, &gzs, &gxm, &gym, &gzm); in dmdavecgetarray2_() 124 gym = ym; in dmdavecgetarray2_() 129 } else if (N != gxm * gym * gzm * dof) { in dmdavecgetarray2_() 135 gym = gxm; in dmdavecgetarray2_() 141 *ierr = F90Array2dCreate(aa, MPIU_SCALAR, gxs, gxm, gys, gym, a PETSC_F90_2PTR_PARAM(ptrd)); in dmdavecgetarray2_() [all …]
|
| /petsc/src/dm/impls/da/kokkos/ |
| H A D | dagetov.kokkos.cxx | 8 #define DMDA_VEC_GET_SHAPE(da, vec, xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, d… argument 11 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); \ 17 gym = ym; \ 22 …gym * gzm * dof, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Vector local size %" PetscInt_FMT " is no… 29 …PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, di… in DMDAVecGetKokkosOffsetView_Private() local 36 DMDA_VEC_GET_SHAPE(da, vec, xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof); in DMDAVecGetKokkosOffsetView_Private() 63 …PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, … in DMDAVecGetKokkosOffsetView() local 70 DMDA_VEC_GET_SHAPE(da, vec, xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof); in DMDAVecGetKokkosOffsetView() 95 …PetscInt xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, di… in DMDAVecGetKokkosOffsetView_Private() local 102 DMDA_VEC_GET_SHAPE(da, vec, xs, ys, zs, xm, ym, zm, gxs, gys, gzs, gxm, gym, gzm, N, dim, dof); in DMDAVecGetKokkosOffsetView_Private() [all …]
|
| /petsc/src/ts/tutorials/autodiff/ |
| H A D | adr_ex5adj_mf.cxx | 52 PetscInt gxm, gym; in main() local 109 PetscCall(DMDAGetGhostCorners(da, NULL, NULL, NULL, &gxm, &gym, NULL)); in main() 110 matctx.m = 2 * gxm * gym; in main() 111 matctx.n = 2 * gxm * gym; /* Number of dependent and independent variables */ in main() 291 PetscInt i, j, xs, ys, xm, ym, gxs, gys, gxm, gym; in IFunctionActive() local 312 gym = info.gym; in IFunctionActive() 337 u_c = new AField[info.gxm * info.gym]; in IFunctionActive() 338 f_c = new AField[info.gxm * info.gym]; in IFunctionActive() 341 u_a = new AField *[info.gym]; in IFunctionActive() 342 f_a = new AField *[info.gym]; in IFunctionActive() [all …]
|
| H A D | adr_ex5adj.cxx | 81 PetscInt gxm, gym, i, dofs = 2, ctrl[3] = {0, 0, 0}; in main() local 135 PetscCall(DMDAGetGhostCorners(da, NULL, NULL, NULL, &gxm, &gym, NULL)); in main() 136 adctx->m = dofs * gxm * gym; in main() 137 adctx->n = dofs * gxm * gym; /* Number of dependent and independent variables */ in main() 403 PetscInt i, j, xs, ys, xm, ym, gxs, gys, gxm, gym; in IFunctionActive() local 424 gym = info.gym; in IFunctionActive() 449 u_c = new AField[info.gxm * info.gym]; in IFunctionActive() 450 f_c = new AField[info.gxm * info.gym]; in IFunctionActive() 453 u_a = new AField *[info.gym]; in IFunctionActive() 454 f_a = new AField *[info.gym]; in IFunctionActive() [all …]
|
| /petsc/src/ts/tutorials/autodiff/adolc-utils/ |
| H A D | init.cxx | 111 PetscInt gxs, gys, gxm, gym; in GiveGhostPoints2d() local 114 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, NULL, &gxm, &gym, NULL)); in GiveGhostPoints2d() 115 for (PetscInt j = 0; j < gym; j++) (*a2d)[j] = cgs + j * gxm - gxs; in GiveGhostPoints2d()
|
| H A D | matfree.cxx | 60 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianVectorProduct() 76 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianVectorProduct() 142 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianVectorProductIDMass() 210 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianTransposeVectorProduct() 230 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianTransposeVectorProduct() 296 for (j = info.gys; j < info.gys + info.gym; j++) { in PetscAdolcIJacobianTransposeVectorProductIDMass()
|
| /petsc/src/dm/tests/ |
| H A D | ex2k.kokkos.cxx | 36 PetscInt xm, ym, zm, xs, ys, zs, gxm, gym, gzm, gxs, gys, gzs; in Update1() local 40 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); in Update1() 59 PetscInt xm, ym, zm, xs, ys, zs, gxm, gym, gzm, gxs, gys, gzs; in Update2() local 63 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); in Update2() 64 #define X2(k, j, i) x2[(k - gzs) * gym * gxm + (j - gys) * gxm + (i - gxs)] in Update2() 84 PetscInt xm, ym, zm, xs, ys, zs, gxm, gym, gzm, gxs, gys, gzs; in main() local 112 PetscCall(DMDAGetGhostCorners(da, &gxs, &gys, &gzs, &gxm, &gym, &gzm)); in main()
|
| H A D | ex43.c | 27 …ank %d portion (with ghosts, %" PetscInt_FMT " x %" PetscInt_FMT ")\n", rank, info.gxm, info.gym)); in PrintVecWithGhosts() 30 …for (j = info.gys; j < info.gys + info.gym; j++) PetscCall(PetscSynchronizedPrintf(com, "%g, ", (d… in PrintVecWithGhosts()
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | eptorsion2.c | 159 PetscInt xs, ys, xm, ym, gxm, gym, gxs, gys, xe, ye; in FormInitialGuess() local 165 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormInitialGuess() 201 PetscInt xs, ys, xm, ym, gxm, gym, gxs, gys; in FormFunctionGradient() local 229 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormFunctionGradient() 331 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym; in FormHessian() local 343 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormHessian() 372 if (j + 1 < gys + gym) { in FormHessian()
|
| H A D | eptorsion2f.F90 | 58 PetscInt gxm, gym, gxs, gys 67 …PetscCall(DMDAGetGhostCorners(dm, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 124 PetscInt gxs, gys, gxm, gym 146 …PetscCall(DMDAGetGhostCorners(dm, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 268 PetscInt ys, ym, gys, gym 276 …PetscCall(DMDAGetGhostCorners(dm, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 305 if (j + 1 < gys + gym) then
|
| H A D | minsurf2.c | 166 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym; in FormFunction() local 178 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormFunction() 210 if (j + 1 == gys + gym) { /* top side */ in FormFunction() 300 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym; in FormFunctionGradient() local 313 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormFunctionGradient() 350 if (j + 1 == gys + gym) { /* top side */ in FormFunctionGradient() 357 if (i > gxs && j + 1 < gys + gym) xlt = x[j + 1][i - 1]; in FormFunctionGradient() 506 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym; in QuadraticH() local 520 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in QuadraticH() 690 PetscInt xs, ys, xm, ym, gxs, gys, gxm, gym; in MSA_BoundaryConditions() local [all …]
|
| /petsc/src/tao/bound/tutorials/ |
| H A D | jbearing2.c | 175 PetscInt nx, ny, xs, xm, gxs, gxm, ys, ym, gys, gym; in ComputeB() local 192 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in ComputeB() 212 PetscInt col[5], row, nx, ny, xs, xm, gxs, gxm, ys, ym, gys, gym; in FormFunctionGradient() local 241 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormFunctionGradient() 292 if (j + 1 < gys + gym) { in FormFunctionGradient() 327 PetscInt col[5], row, nx, ny, xs, xm, gxs, gxm, ys, ym, gys, gym; in FormHessian() local 348 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormHessian() 398 if (j + 1 < gys + gym) { in FormHessian()
|
| H A D | plate2f.F90 | 69 PetscInt gys, gym 94 …PetscCall(DMDAGetGhostCorners(dm, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 144 if (j + 1 == gys + gym) then !top side 151 if ((i > gxs) .and. (j + 1 < gys + gym)) then 231 d1 = (x_v(1 + (gym - 1)*gxm + i - gxs) - top_v(1 + i - xs + 1))*rhy 303 PetscInt ys, ym, gys, gym 325 …PetscCall(DMDAGetGhostCorners(dm, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 383 if (j + 1 == gym + gys) then !top side 390 if ((i > gxs) .and. (j + 1 < gys + gym)) then 515 PetscInt ys, ym, gys, gym [all …]
|
| H A D | plate2.c | 202 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym; in FormFunctionGradient() local 215 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormFunctionGradient() 261 if (j + 1 == gys + gym) { /* top side */ in FormFunctionGradient() 268 if (i > gxs && j + 1 < gys + gym) xlt = x[row - 1 + gxm]; in FormFunctionGradient() 341 d1 = (x[(gym - 1) * gxm + i - gxs] - top[i - xs + 1]) * rhy; in FormFunctionGradient() 420 PetscInt xs, xm, gxs, gxm, ys, ym, gys, gym, col[7]; in FormHessian() local 440 PetscCall(DMDAGetGhostCorners(user->dm, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormHessian() 484 if (j + 1 == gys + gym) { in FormHessian() 491 if (i > gxs && j + 1 < gys + gym) xlt = x[row - 1 + gxm]; in FormHessian() 606 PetscInt xs, ys, xm, ym, gxs, gys, gxm, gym; in MSA_BoundaryConditions() local [all …]
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex14.c | 279 PetscInt i, j, row, mx, my, xs, ys, xm, ym, gxm, gym, gxs, gys; in FormInitialGuess() local 307 PetscCall(DMDAGetGhostCorners(user->da, &gxs, &gys, NULL, &gxm, &gym, NULL)); in FormInitialGuess() 343 PetscInt i, j, row, mx, my, xs, ys, xm, ym, gxs, gys, gxm, gym; in ComputeFunction() local 376 PetscCall(DMDAGetGhostCorners(user->da, &gxs, &gys, NULL, &gxm, &gym, NULL)); in ComputeFunction() 427 PetscInt xs, ys, xm, ym, gxs, gys, gxm, gym, grow; in ComputeJacobian() local 458 PetscCall(DMDAGetGhostCorners(user->da, &gxs, &gys, NULL, &gxm, &gym, NULL)); in ComputeJacobian()
|
| /petsc/include/ |
| H A D | petscdmdatypes.h | 65 PetscInt gxm, gym, gzm; /* number of grid points on this processor including ghosts */ member
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex14f.F90 | 147 PetscInt gys, gxm, gym 182 …PetscCall(DMDAGetGhostCorners(da, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr… 233 PetscInt gxs, gys, gxm, gym 270 …PetscCall(DMDAGetGhostCorners(da, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr…
|
| /petsc/src/binding/petsc4py/demo/legacy/wrap-f2py/ |
| H A D | Bratu2D.F90 | 29 PetscInt my, ys, ye, ym, gys, gye, gym 42 …PetscCall(DMDAGetGhostCorners(da, grd%gxs, grd%gys, PETSC_NULL_INTEGER, grd%gxm, grd%gym, PETSC_NU… 51 grd%gye = grd%gys + grd%gym - 1
|
| /petsc/src/snes/tutorials/ |
| H A D | ex5f.F90 | 40 PetscInt ys, ye, ym, gys, gye, gym 446 call DMDAGetGhostCorners(da, gxs, gys, PETSC_NULL_INTEGER, gxm, gym, PETSC_NULL_INTEGER, ierr) 459 gye = gys + gym - 1
|
| H A D | ex5f90t.F90 | 41 PetscInt ys, ye, ym, gys, gye, gym 525 …PetscCallA(DMDAGetGhostCorners(ctx%da, ctx%gxs, ctx%gys, PETSC_NULL_INTEGER, ctx%gxm, ctx%gym, PET… 536 ctx%gye = ctx%gys + ctx%gym - 1
|
| H A D | ex5f90.F90 | 41 PetscInt ys, ye, ym, gys, gye, gym 537 …PetscCallA(DMDAGetGhostCorners(da, ctx%gxs, ctx%gys, PETSC_NULL_INTEGER, ctx%gxm, ctx%gym, PETSC_N… 548 ctx%gye = ctx%gys + ctx%gym - 1
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | petscdmda.pxi | 217 cdef PetscInt gxm=0, gym=0, gzm=0 220 &gxm, &gym, &gzm)) 228 elif (n == gxm*gym*gzm*dof): 230 xm, ym, zm = gxm, gym, gzm
|