Searched refs:refvel (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ts/tutorials/ |
| H A D | ex14.c | 256 PetscReal rate, exponent, refvel; member
446 …= 1.e-10 + (PetscSqr(vel->u) + PetscSqr(vel->v)) / PetscSqr(thi->erosion.refvel), rate = -thi->ero… in THIErosion()
453 …te->u = 0.5 * thi->erosion.exponent * rate / magref2 * 2. * vel->u / PetscSqr(thi->erosion.refvel); in THIErosion()
454 …te->v = 0.5 * thi->erosion.exponent * rate / magref2 * 2. * vel->v / PetscSqr(thi->erosion.refvel); in THIErosion()
534 thi->erosion.refvel = 1.; /* m/a */ in THICreate()
601 …rence sliding velocity for erosion (m/a)", NULL, thi->erosion.refvel, &thi->erosion.refvel, NULL)); in THICreate()
603 thi->erosion.refvel *= units->meter / units->year; in THICreate()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex48.c | 266 PetscReal irefgam, eps2, exponent, refvel, epsvel; member
362 … thi->friction.irefgam = 1. / (0.5 * PetscSqr(thi->friction.refvel * units->meter / units->year)); in THIFriction()
522 thi->friction.refvel = 100.; in THICreate()
525 …_refvel", "Reference velocity for sliding", "", thi->friction.refvel, &thi->friction.refvel, NULL)… in THICreate()
|