Lines Matching refs:rtmp
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)
130 resmaxl = maxval(rtmp)
146 nrsmax = maxloc(rtmp)