| /petsc/src/snes/tutorials/ |
| H A D | ex11.c | 244 DM plex, dmAux, cdm = NULL, coordDM; in SetupProblem() local 281 PetscCall(DMClone(dm, &dmAux)); in SetupProblem() 282 PetscCall(DMSetField(dmAux, 0, NULL, (PetscObject)fe_rhs)); in SetupProblem() 283 PetscCall(DMSetField(dmAux, 1, NULL, (PetscObject)fe_K)); in SetupProblem() 284 PetscCall(DMCreateDS(dmAux)); in SetupProblem() 287 PetscCall(DMCreateLocalVector(dmAux, &auxData)); in SetupProblem() 288 PetscCall(DMCreateGlobalVector(dmAux, &auxDataGlobal)); in SetupProblem() 319 PetscCall(DMGetDS(dmAux, &ds)); in SetupProblem() 320 PetscCall(DMProjectFunction(dmAux, 0.0, auxFuncs, auxCtxs, INSERT_ALL_VALUES, auxDataGlobal)); in SetupProblem() 327 PetscCall(DMPlexComputeIntegralFEM(dmAux, auxDataGlobal, vals, NULL)); in SetupProblem() [all …]
|
| H A D | ex77.c | 337 PetscErrorCode SetupMaterial(DM dm, DM dmAux, AppCtx *user) in SetupMaterial() argument 346 PetscCall(DMCreateLocalVector(dmAux, &A)); in SetupMaterial() 347 PetscCall(DMProjectFunctionLocal(dmAux, 0.0, matFuncs, ctxs, INSERT_ALL_VALUES, A)); in SetupMaterial() 373 DM dmAux, coordDM; in SetupAuxDM() local 380 PetscCall(DMClone(dm, &dmAux)); in SetupAuxDM() 381 PetscCall(DMSetCoordinateDM(dmAux, coordDM)); in SetupAuxDM() 382 for (f = 0; f < NfAux; ++f) PetscCall(DMSetField(dmAux, f, NULL, (PetscObject)feAux[f])); in SetupAuxDM() 383 PetscCall(DMCreateDS(dmAux)); in SetupAuxDM() 384 PetscCall(SetupMaterial(dm, dmAux, user)); in SetupAuxDM() 385 PetscCall(DMDestroy(&dmAux)); in SetupAuxDM()
|
| H A D | ex7.c | 62 DM dmAux, coordDM; in SetupAuxDiscretization() local 70 PetscCall(DMClone(dm, &dmAux)); in SetupAuxDiscretization() 71 PetscCall(DMSetCoordinateDM(dmAux, coordDM)); in SetupAuxDiscretization() 80 PetscCall(DMSetLocalSection(dmAux, s)); in SetupAuxDiscretization() 82 PetscCall(DMCreateLocalVector(dmAux, &gauge)); in SetupAuxDiscretization() 83 PetscCall(DMDestroy(&dmAux)); in SetupAuxDiscretization() 215 DM dmAux; in ComputeResidualLocal() local 230 PetscCall(VecGetDM(gauge, &dmAux)); in ComputeResidualLocal() 231 PetscCall(DMGetLocalSection(dmAux, &sGauge)); in ComputeResidualLocal()
|
| H A D | ex12.c | 663 static PetscErrorCode SetupMaterial(DM dm, DM dmAux, AppCtx *user) in SetupMaterial() argument 672 PetscCall(DMCreateLocalVector(dmAux, &nu)); in SetupMaterial() 674 PetscCall(DMProjectFunctionLocal(dmAux, 0.0, matFuncs, ctx, INSERT_ALL_VALUES, nu)); in SetupMaterial() 680 static PetscErrorCode SetupBC(DM dm, DM dmAux, AppCtx *user) in SetupBC() argument 690 PetscCall(DMCreateLocalVector(dmAux, &uexact)); in SetupBC() 691 PetscCall(DMProjectFunctionLocal(dmAux, 0.0, bcFuncs, NULL, INSERT_ALL_VALUES, uexact)); in SetupBC() 699 DM dmAux, coordDM; in SetupAuxDM() local 705 PetscCall(DMClone(dm, &dmAux)); in SetupAuxDM() 706 PetscCall(DMSetCoordinateDM(dmAux, coordDM)); in SetupAuxDM() 707 PetscCall(DMSetField(dmAux, 0, NULL, (PetscObject)feAux)); in SetupAuxDM() [all …]
|
| /petsc/src/ts/tutorials/ |
| H A D | ex47.c | 165 static PetscErrorCode SetupVelocity(DM dm, DM dmAux, AppCtx *user) in SetupVelocity() argument 171 PetscCall(DMCreateLocalVector(dmAux, &v)); in SetupVelocity() 172 PetscCall(DMProjectFunctionLocal(dmAux, 0.0, funcs, NULL, INSERT_ALL_VALUES, v)); in SetupVelocity() 180 DM dmAux, coordDM; in SetupAuxDM() local 186 PetscCall(DMClone(dm, &dmAux)); in SetupAuxDM() 187 PetscCall(DMSetCoordinateDM(dmAux, coordDM)); in SetupAuxDM() 188 PetscCall(DMSetField(dmAux, 0, NULL, (PetscObject)feAux)); in SetupAuxDM() 189 PetscCall(DMCreateDS(dmAux)); in SetupAuxDM() 190 PetscCall(SetupVelocity(dm, dmAux, user)); in SetupAuxDM() 191 PetscCall(DMDestroy(&dmAux)); in SetupAuxDM()
|
| H A D | ex30.c | 1281 DM dmAux; in ProjectAuxDM() local 1298 PetscCall(DMClone(dm, &dmAux)); in ProjectAuxDM() 1299 PetscCall(DMSetNumFields(dmAux, NUM_FIELDS + 1)); in ProjectAuxDM() 1302 PetscCall(DMSetField(dmAux, i, NULL, (PetscObject)field)); in ProjectAuxDM() 1309 PetscCall(DMSetField(dmAux, NUM_FIELDS, NULL, (PetscObject)field)); in ProjectAuxDM() 1311 PetscCall(DMCreateDS(dmAux)); in ProjectAuxDM() 1312 PetscCall(DMCreateSubDM(dmAux, NUM_FIELDS, fields, &is, NULL)); in ProjectAuxDM() 1314 PetscCall(DMGetGlobalVector(dmAux, &ta)); in ProjectAuxDM() 1317 PetscCall(DMRestoreGlobalVector(dmAux, &ta)); in ProjectAuxDM() 1318 PetscCall(PetscObjectCompose((PetscObject)dmAux, "scatterAux", (PetscObject)sctAux)); in ProjectAuxDM() [all …]
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexproject.c | 198 …ivate(DM dm, PetscDS ds, DM dmIn, DMEnclosureType encIn, PetscDS dsIn, DM dmAux, DMEnclosureType e… in DMProjectPoint_Field_Private() argument 252 if (dmAux) { in DMProjectPoint_Field_Private() 255 PetscCall(DMGetEnclosurePoint(dmAux, dm, encAux, p, &subp)); in DMProjectPoint_Field_Private() 257 PetscCall(DMGetLocalSection(dmAux, §ionAux)); in DMProjectPoint_Field_Private() 261 PetscCall(DMPlexVecGetClosure(dmAux, sectionAux, localA, subp, NULL, &coefficientsAux)); in DMProjectPoint_Field_Private() 352 …if (dmAux) PetscCall(DMPlexVecRestoreClosure(dmAux, sectionAux, localA, p, NULL, &coefficientsAux)… in DMProjectPoint_Field_Private() 357 …ivate(DM dm, PetscDS ds, DM dmIn, DMEnclosureType encIn, PetscDS dsIn, DM dmAux, DMEnclosureType e… in DMProjectPoint_BdField_Private() argument 411 if (dmAux) { in DMProjectPoint_BdField_Private() 414 PetscCall(DMGetEnclosurePoint(dmAux, dm, encAux, p, &subp)); in DMProjectPoint_BdField_Private() 416 PetscCall(DMGetLocalSection(dmAux, §ionAux)); in DMProjectPoint_BdField_Private() [all …]
|
| H A D | plexfem.c | 2403 DM dmAux = NULL, plexA = NULL; in DMPlexComputeIntegral_Internal() local 2448 PetscCall(VecGetDM(locA, &dmAux)); in DMPlexComputeIntegral_Internal() 2449 PetscCall(DMConvert(dmAux, DMPLEX, &plexA)); in DMPlexComputeIntegral_Internal() 2450 PetscCall(DMGetDS(dmAux, &probAux)); in DMPlexComputeIntegral_Internal() 2452 PetscCall(DMGetLocalSection(dmAux, §ionAux)); in DMPlexComputeIntegral_Internal() 2458 if (dmAux) PetscCall(PetscMalloc1(numCells * totDimAux, &a)); in DMPlexComputeIntegral_Internal() 2510 if (dmAux) { in DMPlexComputeIntegral_Internal() 2575 if (dmAux) PetscCall(PetscFree(a)); in DMPlexComputeIntegral_Internal() 2750 DM dmAux; in DMPlexComputeBdIntegral_Internal() local 2752 PetscCall(VecGetDM(locA, &dmAux)); in DMPlexComputeBdIntegral_Internal() [all …]
|
| H A D | plexdd.c | 14 DM dmAux, ocdm, odmAux; in DMTransferMaterialParameters() local 18 PetscCall(VecGetDM(A, &dmAux)); in DMTransferMaterialParameters() 22 PetscCall(DMCopyDisc(dmAux, odmAux)); in DMTransferMaterialParameters() 24 PetscCall(DMGetLocalSection(dmAux, &sec)); in DMTransferMaterialParameters() 28 PetscCall(DMPlexDistributeField(dmAux, sf, sec, A, osec, oAt)); in DMTransferMaterialParameters()
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex23.c | 175 static PetscErrorCode TestFunctionProjection(DM dm, DM dmAux, DMLabel label, Vec la, const char nam… in TestFunctionProjection() argument 184 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, la)); in TestFunctionProjection() 205 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, NULL)); in TestFunctionProjection() 209 static PetscErrorCode TestFieldProjection(DM dm, DM dmAux, DMLabel label, Vec la, const char name[]… in TestFieldProjection() argument 219 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, la)); in TestFieldProjection() 242 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, NULL)); in TestFieldProjection() 246 static PetscErrorCode TestFieldProjectionMultiple(DM dm, DM dmIn, DM dmAux, DMLabel label, Vec la, … in TestFieldProjectionMultiple() argument 256 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, la)); in TestFieldProjectionMultiple() 280 if (dmAux) PetscCall(DMSetAuxiliaryVec(dm, NULL, 0, 0, NULL)); in TestFieldProjectionMultiple()
|
| /petsc/src/dm/impls/plex/ftn-custom/ |
| H A D | zplexfemf90.c | 36 DM dmAux; in dmplexgetcellfields_() local 39 *ierr = VecGetDM(*locA, &dmAux); in dmplexgetcellfields_() 41 *ierr = DMGetDS(dmAux, &probAux); in dmplexgetcellfields_()
|