Lines Matching refs:impistat

44       if(impistat.gt.0) rDelIRecv = zero
45       if(impistat.gt.0) rDelISend = zero
46       if(impistat.gt.0) rDelWaitAll = zero
153             if(impistat.eq.1) then
155             elseif(impistat.eq.2) then
158             if(impistat.gt.0) rmpitmr = TMRC()
161             if(impistat.gt.0) rDelISend = TMRC()-rmpitmr
162             if(impistat.eq.1) then 
164             elseif(impistat.eq.2) then 
172             if(impistat.eq.1) then
174             elseif(impistat.eq.2) then
177             if(impistat.gt.0) rmpitmr = TMRC()
180             if(impistat.gt.0) rDelIRecv = TMRC()-rmpitmr
181             if(impistat.eq.1) then 
183             elseif(impistat.eq.2) then 
206             if(impistat.eq.1) then 
208             elseif(impistat.eq.2) then 
211             if(impistat.gt.0) rmpitmr = TMRC()
214             if(impistat.gt.0) rDelIRecv = TMRC()-rmpitmr
215             if(impistat.eq.1) then
217             elseif(impistat.eq.2) then 
222             if(impistat.eq.1) then 
224             elseif(impistat.eq.2) then 
227             if(impistat.gt.0) rmpitmr = TMRC()
230             if(impistat.gt.0) rDelISend = TMRC()-rmpitmr
231             if(impistat.eq.1) then
233             elseif(impistat.eq.2) then 
243       if(impistat.eq.1) then
245       elseif(impistat.eq.2) then
248       if(impistat.gt.0) rmpitmr = TMRC()
250       if(impistat.gt.0) rDelWaitAll = TMRC()-rmpitmr
251       if(impistat.eq.1) then
254       elseif(impistat.eq.2) then