Home
last modified time | relevance | path

Searched defs:e3LHSSclr (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/incompressible/
H A De3lhs.f270 subroutine e3LHSSclr ( uMod, giju, dcFct, subroutine
280 real*8 uMod(npro,nsd),
281 & Sclr(npro), Sdot(npro), gradS(npro,nsd),
282 & WdetJ(npro), rLS(npro), rho(npro),
283 & tauS(npro), shpfun(npro,nshl),
284 & srcL(npro), shg(npro,nshl,3),
285 & xSebe(npro,nshl,nshl)
287 real*8 diffus(npro), cp, kptmp(npro),tauSo(npro)
295 integer aa, b local
297 real*8 lhsFct, tsFct(npro)