Lines Matching refs:rtmp
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 ')
132 rtmp = (( rtmp - two * rmes ) / epsM)**2
134 call sumgat (rtmp, nflow, summed, ilwork)
197 dimension ytmp(nshg,ndof), rtmp(nshg,nflow)
201 rtmp = zero
212 & shglb, wghtb, rtmp,
218 rtmp = rtmp**2
219 call sumgat (rtmp, nflow, summed, ilwork)
230 rtmp = zero
238 & shglb, wghtb, rtmp,
250 & shglb, wghtb, rtmp,
256 rtmp = (( rtmp - two * rmes ) / epsM)**2
258 call sumgat (rtmp, nflow, summed, ilwork)