Searched refs:stabdis (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | itrdrv.f | 870 real*8, allocatable, dimension(:) :: stabdis,cdelsq1 local 880 allocate (stabdis(nfath)) 897 & iBC, BC, stabdis, xavegt3) 956 & xavegt2, stabdis) 997 deallocate (stabdis)
|
| H A D | advLES.f | 1273 & iBC, BC, stabdis, xavegt) argument 1305 & xavegr(nfath,12), stabdis(nfath), 1563 stabdis(:) = xavegr(:,10) 1575 stabdis(:) = xaveg(:,10) 1609 & xavegt, stabdis) argument 1640 & xavegr(nfath,12), stabdis(nfath), 2038 if (stabdis(i) .gt. zero) then 2039 cdel(i) = (two*xavegr(i,11)-stabdis(i))/xavegr(i,12) 2040 xnume(i) = two*xavegr(i,11)-stabdis(i) 2049 if (stabdis(i) .gt. zero) then [all …]
|