Searched refs:kappa (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | settauw.f | 188 real*8 kup2,kup3,pt5,sxth,kappa local
197 kappa=0.4
203 kup=kappa*up
255 real*8 pt5,kappa,B,xmut,chi3,denom,cv1_3 local
262 kappa=0.4
265 xmut=rm*kappa*efac*(exp(kappa*up)-1.0-kappa*up
266 & -pt5*(kappa**2)*(up**2))
|
| /phasta/phSolver/incompressible/ |
| H A D | getdiff.f | 162 real*8 pt5,kappa,B,xmut,chi3,denom,cv1_3 local
167 kappa=0.4
|