Searched refs:epsInv (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | elm3keps.f | 132 real*8 k, kInv, kq, eps, y, epsInv, epsP2, local
202 epsInv = 0
209 epsInv = 1. / eps
210 epsP2Inv = epsInv*epsInv
228 Ret = kk * epsInv * nuInv
236 Ret_k = 2. * k * epsInv * nuInv
272 T1st = k * epsInv ! 1st time scale
290 Tscale_k= epsInv ! Acusolve's choice
356 srcRat(e,2) = -epsInv*(
|
| /phasta/phSolver/incompressible/ |
| H A D | getdiff.f | 352 double precision epsInv, Rey, Ret, RetInv, tmp1, fmuKE
366 epsInv = 0
368 epsInv = 1. / abs(epsilon)
372 Ret = kay*kay * epsInv * rho(e) / rmu(e)
378 eviscKE=rho(e)*ke_C_mu*fmuKE*kay*kay*epsInv
|