Searched refs:chi3 (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | settauw.f | 255 real*8 pt5,kappa,B,xmut,chi3,denom,cv1_3 local
268 chi3=savarw/rm
269 chi3=chi3*chi3*chi3
271 denom=chi3+cv1_3
273 f=savarw*chi3/denom - xmut
274 dfds=chi3*(chi3+4.0*cv1_3)/(denom**2)
|
| /phasta/phSolver/incompressible/ |
| H A D | getdiff.f | 162 real*8 pt5,kappa,B,xmut,chi3,denom,cv1_3 local
171 chi3=ev2sa/rm
172 chi3=chi3*chi3*chi3
174 denom=chi3+cv1_3
176 f=ev2sa*chi3/denom - xmut
177 dfds=chi3*(chi3+4.0*cv1_3)/(denom**2)
|