Searched refs:rtmp (Results 1 – 6 of 6) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | itrfdi.f | 47 dimension ytmp(nshg,nflow), rtmp(nshg,nflow) 57 rtmp = zero 73 & shglb, rtmp, 79 call i3LU (BDiag, rtmp, 'forward ') 81 rtmp = rtmp**2 82 call sumgat (rtmp, nflow, summed, ilwork) 93 rtmp = zero 107 & shglb, rtmp, 124 & shglb, rtmp, 128 call i3LU (BDiag, rtmp, 'forward ') [all …]
|
| H A D | rstatCheck.f | 23 dimension rtmp(nshg), nrsmax(1), ilwork(nlwork) 36 rtmp = zero 38 rtmp = rtmp + res(:,i)**2 41 call sumgat (rtmp, 1, resnrm, ilwork) 43 resmaxl = maxval(rtmp) 57 nrsmax = maxloc(rtmp) 111 dimension rtmp(nshg), nrsmax(1), ilwork(nlwork) 125 rtmp = zero 126 rtmp = rtmp + rest**2 128 call sumgat (rtmp, 1, resnrm, ilwork) [all …]
|
| H A D | rstat.f | 24 dimension rtmp(nshg,2), nrsmax(1), ilwork(nlwork) 95 rtmp = zero 97 rtmp(:,1) = rtmp(:,1) + res(:,i)**2 98 rtmp(:,2) = rtmp(:,2) + b(:,i)**2 101 eachproc(1)=sum(rtmp(:,1)) 102 eachproc(2)=sum(rtmp(:,2)) 175 dimension rtmp(nshg), nrsmax(1), ilwork(nlwork) 186 rtmp = zero 187 rtmp = rtmp + rest**2 189 call sumgat (rtmp, 1, resnrm, ilwork) [all …]
|
| /phasta/phSolver/incompressible/ |
| H A D | rstatic.f | 24 dimension rtmp(nshg), nrsmax(1) 62 rtmp = zero 65 rtmp = rtmp + res(:,i)**2 ! only add continuity and momentum 69 call sumgat (rtmp, 1, resnrm) 71 resmaxl = maxval(rtmp) 95 nrsmax = maxloc(rtmp) 140 nrsmax = maxloc(rtmp) 222 dimension rtmp(nshg) 244 rtmp = zero 245 rtmp = rtmp + res**2 ! add temperature also [all …]
|
| H A D | bflux.f | 43 & temp(nshg), rtmp(nshg,ndof), local 147 & rtmp) 266 wallssVec=rtmp(:,1:ndofwss) 269 rtmp=zero 313 rtmp = zero 318 rtmp(i,2:4) = flxres(i,1:3) !viscous flux
|
| H A D | solfar.f | 108 real*8 rerr(nshg,10), rtmp(nshg,4),rtemp local 244 rtmp = res(:,1:4) 246 & atemp, rtmp, solinc, 270 rtmp = res(:,1:4) 272 & atemp, rtmp, solinc,
|