| /petsc/src/dm/tutorials/ |
| H A D | ex3.c | 10 PetscScalar *coors, *coorslocal; in SetCoordinates1d() local 18 PetscCall(DMDAVecGetArray(cda, global, &coors)); in SetCoordinates1d() 22 if (i % 2) coors[i] = coorslocal[i - 1] + .1 * (coorslocal[i + 1] - coorslocal[i - 1]); in SetCoordinates1d() 24 PetscCall(DMDAVecRestoreArray(cda, global, &coors)); in SetCoordinates1d() 35 DMDACoor2d **coors, **coorslocal; in SetCoordinates2d() local 43 PetscCall(DMDAVecGetArray(cda, global, &coors)); in SetCoordinates2d() 48 …if (i % 2) coors[j][i].x = coorslocal[j][i - 1].x + .1 * (coorslocal[j][i + 1].x - coorslocal[j][i… in SetCoordinates2d() 49 …if (j % 2) coors[j][i].y = coorslocal[j - 1][i].y + .3 * (coorslocal[j + 1][i].y - coorslocal[j - … in SetCoordinates2d() 52 PetscCall(DMDAVecRestoreArray(cda, global, &coors)); in SetCoordinates2d() 64 DMDACoor3d ***coors, ***coorslocal; in SetCoordinates3d() local [all …]
|
| H A D | swarm_ex3.c | 171 Vec coors; in ex3_1() local 175 PetscCall(DMGetCoordinates(dmregular, &coors)); in ex3_1() 176 PetscCall(VecGetArrayRead(coors, &LA_coors)); in ex3_1() 201 PetscCall(VecRestoreArrayRead(coors, &LA_coors)); in ex3_1()
|
| /petsc/src/ts/tutorials/power_grid/ |
| H A D | ex7.c | 111 DMDACoor2d **coors; in PostStep() local 123 PetscCall(DMDAVecGetArrayRead(cda, gc, &coors)); in PostStep() 127 if (coors[j][i].y < 5) sum += p[j][i]; in PostStep() 130 PetscCall(DMDAVecRestoreArrayRead(cda, gc, &coors)); in PostStep() 144 DMDACoor2d **coors; in ini_bou() local 163 PetscCall(DMDAVecGetArray(cda, gc, &coors)); in ini_bou() 171 …mux = user->mux = coors[0][M / 2 + 10].x; /* For -pi < x < pi, this should be some angle between 0… in ini_bou() 175 xi = coors[j][i].x; in ini_bou() 176 yi = coors[j][i].y; in ini_bou() 185 xi = coors[j][i].x; in ini_bou() [all …]
|
| H A D | ex6.c | 126 DMDACoor2d **coors; in ini_bou() local 144 PetscCall(DMDAVecGetArray(cda, gc, &coors)); in ini_bou() 149 xi = coors[j][i].x; in ini_bou() 150 yi = coors[j][i].y; in ini_bou() 158 PetscCall(DMDAVecRestoreArray(cda, gc, &coors)); in ini_bou() 219 PetscErrorCode BoundaryConditions(PetscScalar **p, DMDACoor2d **coors, PetscInt i, PetscInt j, Pets… in BoundaryConditions() argument 222 PetscScalar w = coors[j][i].y, theta = coors[j][i].x; in BoundaryConditions() 255 DMDACoor2d **coors; in IFunction() local 277 PetscCall(DMDAVecGetArrayRead(cda, gc, &coors)); in IFunction() 286 PetscCall(BoundaryConditions(p, coors, i, j, M, N, f, user)); in IFunction() [all …]
|
| H A D | ex8.c | 141 DMDACoor2d **coors; in ini_bou() local 154 PetscCall(DMDAVecGetArrayRead(cda, gc, &coors)); in ini_bou() 165 PetscCall(DMDAVecRestoreArrayRead(cda, gc, &coors)); in ini_bou() 226 DMDACoor2d **coors; in IFunction() local 249 PetscCall(DMDAVecGetArrayRead(cda, gc, &coors)); in IFunction() 260 PetscCall(adv1(p, coors[j][i].y, i, j, M, &p_adv1, user)); in IFunction() 261 PetscCall(adv2(p, coors[j][i].x, coors[j][i].y, i, j, N, &p_adv2, user)); in IFunction() 271 PetscCall(DMDAVecRestoreArrayRead(cda, gc, &coors)); in IFunction() 279 DMDACoor2d **coors; in IJacobian() local 293 PetscCall(DMDAVecGetArrayRead(cda, gc, &coors)); in IJacobian() [all …]
|
| /petsc/src/dm/impls/da/ |
| H A D | gr1.c | 32 PetscScalar *coors; in DMDASetUniformCoordinates() local 50 PetscCall(VecGetArray(xcoor, &coors)); in DMDASetUniformCoordinates() 51 for (i = 0; i < isize; i++) coors[i] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() 52 PetscCall(VecRestoreArray(xcoor, &coors)); in DMDASetUniformCoordinates() 58 PetscCall(VecGetArray(xcoor, &coors)); in DMDASetUniformCoordinates() 62 coors[cnt++] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() 63 coors[cnt++] = ymin + hy * (j + jstart); in DMDASetUniformCoordinates() 66 PetscCall(VecRestoreArray(xcoor, &coors)); in DMDASetUniformCoordinates() 74 PetscCall(VecGetArray(xcoor, &coors)); in DMDASetUniformCoordinates() 79 coors[cnt++] = xmin + hx * (i + istart); in DMDASetUniformCoordinates() [all …]
|
| H A D | gr2.c | 121 PetscReal coors[4]; in VecView_MPI_Draw_DA2d() local 219 coors[0] = zctx.xmin - .05 * (zctx.xmax - zctx.xmin); in VecView_MPI_Draw_DA2d() 220 coors[1] = zctx.ymin - .05 * (zctx.ymax - zctx.ymin); in VecView_MPI_Draw_DA2d() 221 coors[2] = zctx.xmax + .05 * (zctx.xmax - zctx.xmin); in VecView_MPI_Draw_DA2d() 222 coors[3] = zctx.ymax + .05 * (zctx.ymax - zctx.ymin); in VecView_MPI_Draw_DA2d() 224 coors[0] = zctx.xmin; in VecView_MPI_Draw_DA2d() 225 coors[1] = zctx.ymin; in VecView_MPI_Draw_DA2d() 226 coors[2] = zctx.xmax; in VecView_MPI_Draw_DA2d() 227 coors[3] = zctx.ymax; in VecView_MPI_Draw_DA2d() 229 PetscCall(PetscOptionsGetRealArray(NULL, NULL, "-draw_coordinates", coors, &ncoors, NULL)); in VecView_MPI_Draw_DA2d() [all …]
|
| H A D | daview.c | 49 PetscBool coors = PETSC_FALSE; in DMView_DA_Binary() local 69 if (coordinates) coors = PETSC_TRUE; in DMView_DA_Binary() 70 PetscCall(PetscViewerBinaryWrite(viewer, &coors, 1, PETSC_BOOL)); in DMView_DA_Binary()
|
| H A D | dasub.c | 35 Vec coors; in DMDAGetLogicalCoordinate() local 51 PetscCall(DMGetCoordinates(da, &coors)); in DMDAGetLogicalCoordinate() 52 PetscCall(DMDAVecGetArrayRead(dacoors, coors, &c)); in DMDAGetLogicalCoordinate() 78 PetscCall(DMDAVecRestoreArrayRead(dacoors, coors, &c)); in DMDAGetLogicalCoordinate()
|
| H A D | dacreate.c | 126 PetscBool coors; in DMLoad_DA() local 149 PetscCall(PetscViewerBinaryRead(viewer, &coors, 1, NULL, PETSC_BOOL)); in DMLoad_DA() 150 if (coors) { in DMLoad_DA()
|
| H A D | da3.c | 63 const PetscReal *coors; in DMView_DA_3d() local 64 PetscCall(VecGetArrayRead(coordinates, &coors)); in DMView_DA_3d() 67 …ht %g %g %g\n", (double)coors[0], (double)coors[1], (double)coors[2], (double)coors[last], (double… in DMView_DA_3d() 68 PetscCall(VecRestoreArrayRead(coordinates, &coors)); in DMView_DA_3d()
|
| /petsc/src/dm/tests/ |
| H A D | ex11.c | 11 Vec local, global, coors; in main() local 44 PetscCall(DMGetCoordinates(da, &coors)); in main() 48 PetscCall(DMDAVecGetArrayDOFRead(dac, coors, &xy)); in main() 57 PetscCall(DMDAVecRestoreArrayDOFRead(dac, coors, &xy)); in main()
|
| /petsc/src/sys/classes/draw/utils/ |
| H A D | axisc.c | 253 PetscReal coors[4] = {0, 0, 0, 0}, tickloc[PETSC_DRAW_AXIS_MAX_SEGMENTS], sep, tw, th; in PetscDrawAxisDraw() local 380 PetscCall(PetscDrawGetCoordinates(draw, &coors[0], &coors[1], &coors[2], &coors[3])); in PetscDrawAxisDraw() 383 PetscCallMPI(MPI_Bcast(coors, 4, MPIU_REAL, 0, PetscObjectComm((PetscObject)draw))); in PetscDrawAxisDraw() 384 PetscCall(PetscDrawSetCoordinates(draw, coors[0], coors[1], coors[2], coors[3])); in PetscDrawAxisDraw()
|