Home
last modified time | relevance | path

Searched refs:rat (Results 1 – 4 of 4) sorted by relevance

/phasta/phSolver/common/
H A Dsettauw.f187 real*8 u,err,utau,yrmi,y,rm,yp,up,kup,f,dfds,rat,efac local
208 rat=f*utau/dfds ! this is -f/dfds but we did not do 1/(-utau) yet.
209 utau=utau+rat
210 if(abs(rat).le.err) goto 20
216 write(*,*) dfds,rat,utau
254 real*8 err,savarw,rm,up,cv1,f,dfds,rat,efac local
275 rat=-f/dfds
276 savarw=savarw+rat
277 if(abs(rat).le.err) goto 20
283 write(*,*) dfds,rat,savarw
H A Delm3keps.f133 & ss, mut, mut_k, mut_eps, rat, jac local
/phasta/phSolver/incompressible/
H A Dgetdiff.f161 real*8 err,ev2sa,rm,cv1,f,dfds,rat,efac local
178 rat=-f/dfds
179 ev2sa=ev2sa+rat
180 if(abs(rat).le.err) goto 20
184 write(*,*) dfds,rat,ev2sa,rm
/phasta/phSolver/compressible/
H A De3source.f40 & dxidx( npro, nsd, nsd), xfind( npro ), delta(npro), rat