Home
last modified time | relevance | path

Searched refs:cL (Results 1 – 4 of 4) sorted by relevance

/petsc/src/ts/tutorials/
H A Dex11.h173 PetscReal cL, cR, speed; in PhysicsRiemann_SW_Rusanov() local
217 cL = PetscSqrtReal(sw->gravity * uL->h); in PhysicsRiemann_SW_Rusanov()
219 …speed = PetscMax(PetscAbsReal(Dot2Real(uL->uh, nn) / uL->h) + cL, PetscAbsReal(Dot2Real(uR->uh, nn… in PhysicsRiemann_SW_Rusanov()
231 CeedScalar *cL = out[0], *cR = out[1]; in PhysicsRiemann_SW_Rusanov_CEED() local
256 cL[i + Q * j] = -flux[j] / geom[i + Q * 2]; in PhysicsRiemann_SW_Rusanov_CEED()
261 …for (CeedInt j = 0; j < DIM + 1; ++j) PetscPrintf(PETSC_COMM_SELF, " | %g | (%g)\n", cL[i + Q * j… in PhysicsRiemann_SW_Rusanov_CEED()
789 PetscReal cL, cR, speed, velL, velR, nn[DIM], s2; in PhysicsRiemann_Euler_Godunov() local
815 ierr = SpeedOfSound_PG(gamma, uL, &cL); in PhysicsRiemann_Euler_Godunov()
818 cL = zero / zero; in PhysicsRiemann_Euler_Godunov()
829 speed = PetscMax(velR + cR, velL + cL); in PhysicsRiemann_Euler_Godunov()
[all …]
H A Dex9.c1015 PetscScalar g = phys->gravity, ustar[2], cL, cR, c, cstar; in PhysicsRiemann_Shallow_Exact() local
1023 cL = PetscSqrtScalar(g * L.h); in PhysicsRiemann_Shallow_Exact()
1025 c = PetscMax(cL, cR); in PhysicsRiemann_Shallow_Exact()
1061 if (L.u - cL < 0 && 0 < star.u - cstar) { /* 1-wave is sonic rarefaction */ in PhysicsRiemann_Shallow_Exact()
1063 ufan[0] = 1 / g * PetscSqr(L.u / 3 + 2. / 3 * cL); in PhysicsRiemann_Shallow_Exact()
1082 *maxspeed = MaxAbs(MaxAbs(star.u - cstar, star.u + cstar), MaxAbs(L.u - cL, R.u + cR)); in PhysicsRiemann_Shallow_Exact()
/petsc/src/ts/tutorials/multirate/
H A Dex4.c162 PetscScalar g = phys->gravity, ustar[2], cL, cR, c, cstar; in PhysicsRiemann_Shallow_Exact() local
170 cL = PetscSqrtScalar(g * L.h); in PhysicsRiemann_Shallow_Exact()
172 c = PetscMax(cL, cR); in PhysicsRiemann_Shallow_Exact()
208 if (L.u - cL < 0 && 0 < star.u - cstar) { /* 1-wave is sonic rarefaction */ in PhysicsRiemann_Shallow_Exact()
210 ufan[0] = 1 / g * PetscSqr(L.u / 3 + 2. / 3 * cL); in PhysicsRiemann_Shallow_Exact()
229 *maxspeed = MaxAbs(MaxAbs(star.u - cstar, star.u + cstar), MaxAbs(L.u - cL, R.u + cR)); in PhysicsRiemann_Shallow_Exact()
/petsc/src/dm/impls/plex/
H A Dplexgeometry.c3036 PetscFVCellGeom *cL, *cR; in DMPlexComputeGeometryFVM() local
3040 PetscCall(DMPlexPointLocalRead(dmCell, cells[0], cgeom, &cL)); in DMPlexComputeGeometryFVM()
3041 lcentroid = cells[0] >= cEndInterior ? fg->centroid : cL->centroid; in DMPlexComputeGeometryFVM()
3060 DMPlex_WaxpyD_Internal(dim, -1, fg->centroid, cL->centroid, v); in DMPlexComputeGeometryFVM()