| /phasta/phSolver/common/ |
| H A D | sonfath.f | 1 subroutine sonfath (ncorp, vnumnpl, ifath, nsons, tfath, argument
12 & nsons(tfath),dummy(numnp),iper(numnp), vnumnpl(numpe) local
61 nsons(i) = n3m-nsoncor
89 nsons(i) = n1m*n3m - (n1m+n3m-1)
138 nsons(tfath) = itmp
139 write(*,*)'nsons(1)=',nsons(1)
148 nsons=1
|
| H A D | getvel.f | 2 & nsons, ifath, velbar) argument
10 dimension nsons(nfath), rinvsons(nfath),
26 nsonmax=maxval(nsons)
99 rinvsons = one/nsons ! division is expensive
|
| H A D | genini.f | 2 & ifath, velbar, nsons,x, argument
46 & nsons(nfath)
73 & nsons, ifath, velbar)
|
| H A D | gendat.f | 4 & ifath, velbar, nsons ) argument
41 dimension ifath(numnp), velbar(nfath,nflow), nsons(nfath)
229 & nsons, x,
|
| H A D | getdmc.f | 3 & nsons, ifath, x) argument
26 & nsons(nfath),
217 if (numpe.gt.1 .and. nsons(1).gt.1) then
258 if(maxval(nsons).eq.1) ihomog=0
|
| H A D | bardmc.f | 42 & nsons, ifath, x) argument
65 & nsons(nfath),
389 if (numpe.gt.1 .and. nsons(1).gt.1) then
429 if(nsons(1) .gt. 1) then
446 if(numpe .gt. 1 .and. nsons(1).ne.1 )then
|
| H A D | input.f | 17 integer, allocatable :: nsons(:) local
|
| /phasta/phSolver/incompressible/ |
| H A D | advLES.f | 524 & nsons(nshg), iBC(nshg),
942 & nsons, ifath, x, cdelsq1) argument
963 & nsons(nshg),
1272 & nsons, ifath, x, argument
1296 & ifath(nshg), nsons(nshg),
1552 xavegr(:,m) = xavegr(:,m)/nsons(:)
1568 xaveg(:,m) = xaveg(:,m)/nsons(:)
1607 & nsons, ifath, x, argument
1631 & ifath(nshg), nsons(nshg),
1988 xavegr(:,m) = xavegr(:,m)/nsons(:)
[all …]
|
| H A D | filters.f | 973 & nsons, ifath, x, argument
997 & ifath(nshg), nsons(nshg),
1185 xavegr(:,m) = xavegr(:,m)/nsons(:)
1199 xaveg(:,m) = xaveg(:,m)/nsons(:)
1641 & nsons, ifath, x) argument
1672 & nsons(nshg),
2017 xnuder(:,1) = xnuder(:,1) / nsons(:)
2018 xnuder(:,2) = xnuder(:,2) / nsons(:)
2021 ynuder(:,m) = ynuder(:,m)/nsons(:)
2024 xmr(:,m) = xmr(:,m)/nsons(:)
[all …]
|
| H A D | itrdrv.f | 6 & ifath, velbar, nsons ) argument
83 dimension ifath(numnp), velbar(nfath,ndof), nsons(nfath)
342 & nsons, ifath, x,
605 & nsons, ifath, velbar)
610 & nsons)
851 & nsons, ifath, x, argument
867 dimension ifath(numnp), nsons(nfath)
896 & nsons, ifath, x,
909 & iper, ilwork, nsons,
913 & iper, ilwork, nsons,
[all …]
|
| /phasta/M2N/src/ |
| H A D | input.f | 17 integer, allocatable :: nsons(:) local
|
| /phasta/M2NFixBnd/src/ |
| H A D | input.f | 17 integer, allocatable :: nsons(:) local
|
| /phasta/AcuStat/src/ |
| H A D | input.f | 17 integer, allocatable :: nsons(:) local
|
| /phasta/phSolver/compressible/ |
| H A D | itrdrv.f | 5 & ifath, velbar, nsons ) argument
60 dimension ifath(numnp), velbar(nfath,ndof), nsons(nfath)
370 & iper, ilwork, nsons,
377 & nsons, ifath, x)
|
| /phasta/phSolver/ |
| H A D | CHANGES | 615 K1) bardmc.f and getdmc.f nsons(nshg)->nsons(nfath)
|