| /phasta/phSolver/compressible/ |
| H A D | bc3res.f | 207 subroutine bc3ResSclr (y, iBC, BC, rest, argument
232 & rest(nshg), ilwork(nlwork),
240 rest(:) = zero
248 rest(i) = rest(i) + rest(j)
249 rest(j) = zero !changed
281 rest(isgbeg:isgend) = zero
|
| H A D | rstatCheck.f | 89 subroutine rstatCheckSclr (rest, ilwork,y,ac) argument
110 dimension rest(nshg)
126 rtmp = rtmp + rest**2
165 ac(:,5) = rest(:) ! T dot in 'ac' is filled with scl. res
|
| H A D | elmgmrpetsc.f | 305 & rest, rmest, argument
327 & rest(nshg), Diag(1),
366 rest = zero
406 & mmat(iblk)%p, rest,
473 & rest, rmest)
489 call commu (rest , ilwork, 1 , 'in ')
500 call bc3ResSclr (y, iBC, BC, rest, iper, ilwork)
502 call commu (rest , ilwork, 1 , 'out')
|
| H A D | asbmfg.f | 70 & BCB, rest, rmest)
87 & rest(nshg), rmest(nshg)
119 call local (rest, rtl, ienb, 1, 'scatter ')
|
| H A D | solgmr.f | 750 & rest, HBrg, eBrg,
795 & rest(nshg),
822 & rest,
845 call rstatCheckSclr(rest,ilwork,y,ac)
850 uBrgt(:,1) = rest
854 tempt = rest**2
895 tempt = rest - tempt
1057 call rstatSclr(rest, ilwork)
|
| H A D | asigmr.f | 126 & mater, rest, rmest, argument
145 & mater(npro), rest(nshg),
191 call local (rest, rtl, ien, 1, 'scatter ')
|
| H A D | elmgmr.f | 621 & rest, rmest, Diag, argument
643 & rest(nshg), Diag(nshg),
742 rest = zero
781 & mmat(iblk)%p, rest,
841 & rest, rmest)
857 call commu (rest , ilwork, 1 , 'in ')
869 call bc3ResSclr (y, iBC, BC, rest, iper, ilwork)
|
| H A D | rstat.f | 153 subroutine rstatSclr (rest, ilwork) argument
174 dimension rest(nshg)
187 rtmp = rtmp + rest**2
399 dimension rest(nshg)
|
| H A D | itrdrv.f | 52 & rest(nshg), solinc(nshg,ndof)
568 & shpb, shglb, rest,
579 & rest,
|