Searched refs:xden (Results 1 – 5 of 5) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | aveprep.f | 108 subroutine getxnut (fres, xden, xnum, ien, shp) argument
119 & xden(1), xnum(1)
192 xden(1) = xden(1) + xdenl(nel)
297 & xden(idim), xnum(idim),
363 xden = zero
376 call smagcoeff (fres(:,1:22), xden, xnum, mien(iblk)%p,
382 call drvAllreduce( xden, xdent, idim )
385 xdent = xden
448 subroutine smagcoeff (fres, xden, xnum, ien, shp, lfathe) argument
458 & xden(idim), xnum(idim),
[all …]
|
| H A D | getdmc.f | 23 & xnum(nshg), xden(nshg),
202 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
206 xden = two * xden
213 xden(j) = zero
234 xden(isgbeg:isgend) = zero
263 xnude(ifath(i),2) = xnude(ifath(i),2) + xden(i)
267 xnude(:,2)=xden(:)
|
| H A D | bardmc.f | 61 & xnum(nshg), xden(nshg),
374 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
378 xden = two * xden
385 xden(j) = zero
406 xden(isgbeg:isgend) = zero
433 xnude(ifath(i),2) = xnude(ifath(i),2) + xden(i)
437 xnude(:,2)=xden(:)
586 xmij(:,2)=xden(:)
|
| /phasta/phSolver/incompressible/ |
| H A D | advLES.f | 514 & xnum(nshg), xden(nshg),
722 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
726 xden = two * xden
734 xden(j) = zero
757 xden(isgbeg:isgend) = zero
783 xdenl = xdenl + xden(i)
799 xdent = xdent + xden(i)
851 xmij(:,2)=xden(:)
960 & xnum(nshg), xden(nshg),
1150 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
[all …]
|
| H A D | filters.f | 1662 & xnum(nshg), xden(nshg),
1838 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
1842 xden = two * xden
1875 xden(j) = zero
1901 xden(isgbeg:isgend) = zero
1940 xnude(ifath(i),2) = xnude(ifath(i),2) + xden(i)
2262 xmij(:,2)=xden(:)
2347 & xnum(nshg), xden(nshg),
2579 xden = xmij(:,1) * xmij(:,1) + xmij(:,2) * xmij(:,2)
2583 xden = two * xden
[all …]
|