| /petsc/src/vec/vec/tutorials/ |
| H A D | ex9.c | 25 Vec lx, gx, gxs; in main() local
99 PetscCall(VecDuplicate(gxs, &gx)); in main()
105 PetscCall(VecGhostGetLocalForm(gx, &lx)); in main()
110 PetscCall(VecGetOwnershipRange(gx, &rstart, &rend)); in main()
113 PetscCall(VecSetValues(gx, 1, &i, &value, INSERT_VALUES)); in main()
115 PetscCall(VecAssemblyBegin(gx)); in main()
116 PetscCall(VecAssemblyEnd(gx)); in main()
118 PetscCall(VecGhostUpdateBegin(gx, INSERT_VALUES, SCATTER_FORWARD)); in main()
119 PetscCall(VecGhostUpdateEnd(gx, INSERT_VALUES, SCATTER_FORWARD)); in main()
128 PetscCall(VecGhostRestoreLocalForm(gx, &lx)); in main()
[all …]
|
| H A D | ex14f.F90 | 23 Vec lx, gx, gxs
78 PetscCallA(VecDuplicate(gxs, gx, ierr))
83 PetscCallA(VecGhostGetLocalForm(gx, lx, ierr))
87 PetscCallA(VecGetOwnershipRange(gx, rstart, rend, ierr))
92 PetscCallA(VecSetValues(gx, ione, [i], [value], INSERT_VALUES, ierr))
95 PetscCallA(VecAssemblyBegin(gx, ierr))
96 PetscCallA(VecAssemblyEnd(gx, ierr))
98 PetscCallA(VecGhostUpdateBegin(gx, INSERT_VALUES, SCATTER_FORWARD, ierr))
99 PetscCallA(VecGhostUpdateEnd(gx, INSERT_VALUES, SCATTER_FORWARD, ierr))
107 PetscCallA(VecGhostRestoreLocalForm(gx, lx, ierr))
[all …]
|
| H A D | ex9f.F90 | 23 Vec lx, gx, gxs
76 PetscCallA(VecDuplicate(gxs, gx, ierr))
81 PetscCallA(VecGhostGetLocalForm(gx, lx, ierr))
85 PetscCallA(VecGetOwnershipRange(gx, rstart, rend, ierr))
90 PetscCallA(VecSetValues(gx, ione, [i], [value], INSERT_VALUES, ierr))
93 PetscCallA(VecAssemblyBegin(gx, ierr))
94 PetscCallA(VecAssemblyEnd(gx, ierr))
96 PetscCallA(VecGhostUpdateBegin(gx, INSERT_VALUES, SCATTER_FORWARD, ierr))
97 PetscCallA(VecGhostUpdateEnd(gx, INSERT_VALUES, SCATTER_FORWARD, ierr))
105 PetscCallA(VecGhostRestoreLocalForm(gx, lx, ierr))
[all …]
|
| /petsc/src/ts/characteristic/impls/da/ |
| H A D | slda.c | 94 PetscInt dim, gx, gy; in DMDAMapCoordsToPeriodicDomain() local
97 …PetscCall(DMDAGetInfo(da, &dim, &gx, &gy, NULL, NULL, NULL, NULL, NULL, NULL, &bx, &by, NULL, NULL… in DMDAMapCoordsToPeriodicDomain()
100 while (*x >= (PetscScalar)gx) *x -= (PetscScalar)gx; in DMDAMapCoordsToPeriodicDomain()
101 while (*x < 0.0) *x += (PetscScalar)gx; in DMDAMapCoordsToPeriodicDomain()
|
| /petsc/src/dm/impls/da/ftn-custom/ |
| H A D | zdaf.c | 37 const PetscInt *gx, *gy, *gz; in dmdagetownershipranges_() local
42 *ierr = DMDAGetOwnershipRanges(*da, &gx, &gy, &gz); in dmdagetownershipranges_()
45 *ierr = F90Array1dCreate((PetscInt *)gx, MPIU_INT, 1, M, lx PETSC_F90_2PTR_PARAM(lxd)); in dmdagetownershipranges_()
|
| /petsc/src/dm/tests/ |
| H A D | ex50.c | 56 PetscInt nel, dof = 3, nex, ney, nez, gx = 0, gy = 0, gz = 0; in test_3d() local
80 PetscCall(DMDAGetElementsCorners(dm, &gx, &gy, &gz)); in test_3d()
91 for (i = gx; i < gx + nex; i++) { in test_3d()
|
| /petsc/src/ksp/pc/impls/gasm/ |
| H A D | gasm.c | 28 Vec gx, gy; /* Merged work vectors */ member
431 PetscCall(VecCreateMPI(PetscObjectComm((PetscObject)pc), on, PETSC_DECIDE, &osm->gx)); in PCSetUp_GASM()
432 PetscCall(VecDuplicate(osm->gx, &osm->gy)); in PCSetUp_GASM()
433 PetscCall(VecGetOwnershipRange(osm->gx, &gostart, NULL)); in PCSetUp_GASM()
436 PetscCall(VecScatterCreate(x, gois, osm->gx, goid, &osm->gorestriction)); in PCSetUp_GASM()
501 PetscCall(VecGetArray(osm->gx, &gxarray)); in PCSetUp_GASM()
511 PetscCall(VecRestoreArray(osm->gx, &gxarray)); in PCSetUp_GASM()
623 PetscCall(VecZeroEntries(osm->gx)); in PCApply_GASM()
624 PetscCall(VecScatterBegin(osm->girestriction, x, osm->gx, INSERT_VALUES, forward)); in PCApply_GASM()
626 PetscCall(VecScatterBegin(osm->gorestriction, x, osm->gx, INSERT_VALUES, forward)); in PCApply_GASM()
[all …]
|
| /petsc/src/dm/impls/da/ |
| H A D | dagetelem.c | 200 PetscErrorCode DMDAGetElementsCorners(DM da, PeOp PetscInt *gx, PeOp PetscInt *gy, PeOp PetscInt *g… in DMDAGetElementsCorners() argument
209 if (gx) PetscAssertPointer(gx, 2); in DMDAGetElementsCorners()
219 if (gx) *gx = xs; in DMDAGetElementsCorners()
|
| /petsc/src/ts/characteristic/interface/ |
| H A D | characteristic.c | 339 PetscInt gx, gy; in CharacteristicSolve() local
349 …PetscCall(DMDAGetInfo(da, &dim, &gx, &gy, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NU… in CharacteristicSolve()
|