Searched refs:fwp (Results 1 – 4 of 4) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | e3source.f | 256 & fv1p, fv2p, stp, gp, fwp, rp, local
419 fwp = gp * tmp1 * saCw3P6 * tmp
420 if(abs(r).gt.7.0d0) fwp=zero
430 if(fwp .gt. zero) tmp=tmp-tmp1*SclrNN*fwp
|
| /phasta/phSolver/compressible/ |
| H A D | e3source.f | 282 & gp (npro), fwp (npro),
401 fwp = (saCw3**6)*fwog
402 fwp = fwp*gp/(g**6+saCw3**6)
409 & -saCw1*(fwp*sclrm**2 + 2*sclrm*fw)/dist2w**2
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fRHSonly | 256 & fv1p, fv2p, stp, gp, fwp, rp,
381 fwp = gp * tmp1 * saCw3P6 * tmp
382 if(abs(r).gt.7.0d0) fwp=zero
392 if(fwp .gt. zero) tmp=tmp-tmp1*SclrNN*fwp
|
| H A D | e3source.fimplicit | 256 & fv1p, fv2p, stp, gp, fwp, rp,
395 fwp = gp * tmp1 * saCw3P6 * tmp
396 if(abs(r).gt.7.0d0) fwp=zero
406 if(fwp .gt. zero) tmp=tmp-tmp1*SclrNN*fwp
|