Searched refs:etaC (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/tutorials/ |
| H A D | ex30.c | 682 PetscScalar epsC = 0.0, etaC, TC, uE, uW, pC, z_scale; in XNormalStress() local
692 etaC = Viscosity(TC, epsC, dz * j, param); in XNormalStress()
703 etaC = Viscosity(TC, epsC, dz * (j + 0.5), param); in XNormalStress()
711 return 2.0 * etaC * (uE - uW) / dx - pC; in XNormalStress()
721 PetscScalar epsC = 0.0, etaC, TC; in ZNormalStress() local
732 etaC = Viscosity(TC, epsC, dz * j, param); in ZNormalStress()
742 etaC = Viscosity(TC, epsC, dz * (j + 0.5), param); in ZNormalStress()
749 return 2.0 * etaC * (wN - wS) / dz - pC; in ZNormalStress()
|