Searched defs:e3StabSclr (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | e3stab.f | 489 subroutine e3StabSclr (uMod, dxidx, tauT, diffus, srcR, giju, subroutine
495 real*8 rho(npro), uMod(npro,nsd),
496 & dxidx(npro,nsd,nsd), diffus(npro),
497 & tauT(npro), srcR(npro)
500 real*8 gijd(npro,6), giju(npro,6),
501 & tmp1(npro), tmp2(npro),
502 & tmp3(npro), fact(npro),
503 & srcRat(npro)
505 real*8 fff
|