Searched refs:xnd (Results 1 – 3 of 3) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | filtprep.f | 10 real*8, allocatable :: xnd(:,:) variable
64 allocate ( xnd(70,2) )
|
| /phasta/phSolver/incompressible/ |
| H A D | filters.f | 1697 xnd = zero
2049 xnd(:,1) = xnd(:,1) + xnuder(:,1)
2050 xnd(:,2) = xnd(:,2) + xnuder(:,2)
2109 xnd(:,1) = xnd(:,1)+xnude(:,1)
2110 xnd(:,2) = xnd(:,2)+xnude(:,2)
2170 write(374,*)xnd(i,1),xnd(i,2),scomp(i)
2390 xnd = zero
2791 xnd(:,1) = xnd(:,1) + xnuder(:,1)
2792 xnd(:,2) = xnd(:,2) + xnuder(:,2)
2850 xnd(:,1) = xnd(:,1)+xnude(:,1)
[all …]
|
| H A D | advLES.f | 2517 xnd = zero
2864 xnd(:,1) = xnd(:,1) + xnuder(:,1)
2865 xnd(:,2) = xnd(:,2) + xnuder(:,2)
2924 xnd(:,1) = xnd(:,1)+xnude(:,1)
2925 xnd(:,2) = xnd(:,2)+xnude(:,2)
2985 write(374,*)xnd(i,1),xnd(i,2),scomp(i)
3208 xnd = zero
3611 xnd(:,1) = xnd(:,1) + xnuder(:,1)
3612 xnd(:,2) = xnd(:,2) + xnuder(:,2)
3670 xnd(:,1) = xnd(:,1)+xnude(:,1)
[all …]
|