| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex25.c | 47 Vec locX, locX_t, locA; in test1() local
53 PetscCall(DMGetLocalVector(dm, &locX_t)); in test1()
55 PetscCall(DMPlexGetCellFields(dm, cells, locX, locX_t, locA, &u, &u_t, &a)); in test1()
56 PetscCall(DMPlexRestoreCellFields(dm, cells, locX, locX_t, locA, &u, &u_t, &a)); in test1()
58 PetscCall(DMRestoreLocalVector(dm, &locX_t)); in test1()
68 Vec locX, locX_t, locA; in test2() local
76 PetscCall(DMGetLocalVector(dm, &locX_t)); in test2()
78 PetscCall(DMPlexGetCellFields(dm, cells, locX, locX_t, locA, &u, &u_t, &a)); in test2()
79 PetscCall(DMPlexRestoreCellFields(dm, cells, locX, locX_t, locA, &u, &u_t, &a)); in test2()
81 PetscCall(DMRestoreLocalVector(dm, &locX_t)); in test2()
[all …]
|
| /petsc/src/ts/utils/ |
| H A D | dmlocalts.c | 50 Vec locX, locX_t, locF; in TSComputeIFunction_DMLocal() local
60 PetscCall(DMGetLocalVector(dm, &locX_t)); in TSComputeIFunction_DMLocal()
63 PetscCall(VecZeroEntries(locX_t)); in TSComputeIFunction_DMLocal()
64 …if (dmlocalts->boundarylocal) PetscCall((*dmlocalts->boundarylocal)(dm, time, locX, locX_t, dmloca… in TSComputeIFunction_DMLocal()
67 PetscCall(DMGlobalToLocalBegin(dm, X_t, INSERT_VALUES, locX_t)); in TSComputeIFunction_DMLocal()
68 PetscCall(DMGlobalToLocalEnd(dm, X_t, INSERT_VALUES, locX_t)); in TSComputeIFunction_DMLocal()
71 …PetscCall((*dmlocalts->ifunctionlocal)(dm, time, locX, locX_t, locF, dmlocalts->ifunctionlocalctx)… in TSComputeIFunction_DMLocal()
77 PetscCall(DMRestoreLocalVector(dm, &locX_t)); in TSComputeIFunction_DMLocal()
131 Vec locX, locX_t; in TSComputeIJacobian_DMLocal() local
138 PetscCall(DMGetLocalVector(dm, &locX_t)); in TSComputeIJacobian_DMLocal()
[all …]
|
| H A D | dmplexts.c | 88 PetscErrorCode DMPlexTSComputeBoundary(DM dm, PetscReal time, Vec locX, Vec locX_t, PetscCtx ctx) in DMPlexTSComputeBoundary() argument
97 if (!locX_t) { in DMPlexTSComputeBoundary()
112 …PetscCall(DMPlexInsertTimeDerivativeBoundaryValues(plex, PETSC_TRUE, locX_t, time, faceGeometryFVM… in DMPlexTSComputeBoundary()
134 PetscErrorCode DMPlexTSComputeIFunctionFEM(DM dm, PetscReal time, Vec locX, Vec locX_t, Vec locF, P… in DMPlexTSComputeIFunctionFEM() argument
164 PetscCall(DMPlexComputeResidualByKey(plex, key, cellIS, time, locX, locX_t, time, locF, ctx)); in DMPlexTSComputeIFunctionFEM()
191 PetscErrorCode DMPlexTSComputeIJacobianFEM(DM dm, PetscReal time, Vec locX, Vec locX_t, PetscReal X… in DMPlexTSComputeIJacobianFEM() argument
228 …PetscCall(DMPlexComputeJacobianByKey(plex, key, cellIS, time, X_tShift, locX, locX_t, Jac, JacP, c… in DMPlexTSComputeIJacobianFEM()
|
| /petsc/src/dm/impls/plex/ftn-custom/ |
| H A D | zplexfemf90.c | 21 PETSC_EXTERN void dmplexgetcellfields_(DM *dm, IS *cellIS, Vec *locX, Vec *locX_t, Vec *locA, F90Ar… in dmplexgetcellfields_() argument
29 *ierr = DMPlexGetCellFields(*dm, *cellIS, *locX, *locX_t, *locA, &u, &u_t, &a); in dmplexgetcellfields_()
48 …*ierr = F90Array1dCreate((void *)u_t, MPIU_SCALAR, 1, locX_t ? numCells * totDim : 0, utPtr PETSC_… in dmplexgetcellfields_()
53 PETSC_EXTERN void dmplexrestorecellfields_(DM *dm, IS *cellIS, Vec *locX, Vec *locX_t, Vec *locA, F… in dmplexrestorecellfields_() argument
73 …getfacefields_(DM *dm, PetscInt *fStart, PetscInt *fEnd, Vec *locX, Vec *locX_t, Vec *faceGeometry… in dmplexgetfacefields_() argument
79 …*ierr = DMPlexGetFaceFields(*dm, *fStart, *fEnd, *locX, *locX_t, *faceGeometry, *cellGeometry, *lo… in dmplexgetfacefields_()
91 …orefacefields_(DM *dm, PetscInt *fStart, PetscInt *fEnd, Vec *locX, Vec *locX_t, Vec *faceGeometry… in dmplexrestorefacefields_() argument
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexfem.c | 1350 …InsertTimeDerivativeBoundaryValues(DM dm, PetscBool insertEssential, Vec locX_t, PetscReal time, V… in DMPlexInsertTimeDerivativeBoundaryValues() argument
1354 if (locX_t) PetscValidHeaderSpecific(locX_t, VEC_CLASSID, 3); in DMPlexInsertTimeDerivativeBoundaryValues()
1358 …", (DM, PetscBool, Vec, PetscReal, Vec, Vec, Vec), (dm, insertEssential, locX_t, time, faceGeomFVM… in DMPlexInsertTimeDerivativeBoundaryValues()
3751 PetscErrorCode DMPlexGetCellFields(DM dm, IS cellIS, Vec locX, PeOp Vec locX_t, PeOp Vec locA, Pets… in DMPlexGetCellFields() argument
3763 if (locX_t) PetscValidHeaderSpecific(locX_t, VEC_CLASSID, 4); in DMPlexGetCellFields()
3786 if (locX_t) PetscCall(DMGetWorkArray(dm, numCells * totDim, MPIU_SCALAR, u_t)); in DMPlexGetCellFields()
3799 if (locX_t) { in DMPlexGetCellFields()
3800 PetscCall(DMPlexVecGetClosure(plex, section, locX_t, cell, NULL, &x_t)); in DMPlexGetCellFields()
3802 PetscCall(DMPlexVecRestoreClosure(plex, section, locX_t, cell, NULL, &x_t)); in DMPlexGetCellFields()
3837 PetscErrorCode DMPlexRestoreCellFields(DM dm, IS cellIS, Vec locX, PeOp Vec locX_t, PeOp Vec locA, … in DMPlexRestoreCellFields() argument
[all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex30.c | 1425 …DMPlexTSComputeIFunctionFEM_Private(DM dm, PetscReal time, Vec locX, Vec locX_t, Vec locF, void *u… in DMPlexTSComputeIFunctionFEM_Private() argument
1446 PetscCall(VecPointwiseMult(work, locX_t, local_lumped_mass)); in DMPlexTSComputeIFunctionFEM_Private()
1451 PetscCall(DMPlexTSComputeIFunctionFEM(dm, time, locX, locX_t, locF, user)); in DMPlexTSComputeIFunctionFEM_Private()
1456 …DMPlexTSComputeIJacobianFEM_Private(DM dm, PetscReal time, Vec locX, Vec locX_t, PetscReal X_tShif… in DMPlexTSComputeIJacobianFEM_Private() argument
1464 PetscCall(DMPlexTSComputeIJacobianFEM(dm, time, locX, locX_t, 0.0, Jac, JacP, user)); in DMPlexTSComputeIJacobianFEM_Private()
1471 PetscCall(DMPlexTSComputeIJacobianFEM(dm, time, locX, locX_t, X_tShift, Jac, JacP, user)); in DMPlexTSComputeIJacobianFEM_Private()
|