Lines Matching refs:res
4 & res, iper, ilwork, argument
33 & res(nshg,nflow),
128 res = zero
174 & res,
216 call lmassadd(ac,res,rowp,colm,lhsK,gmass)
296 & res, xKebe)
330 call ElmpvsQ (res,y,-1.0d0)
340 & call rotabc(res, iBC, 'in ')
347 call commu (res , ilwork, nflow , 'in ')
355 call bc3Res (iBC, BC, res, iper, ilwork)
371 & res, iper, ilwork, argument
390 & BC(nshg,ndofBC), res(nshg),
454 res = zero
488 & mien(iblk)%p, res,
509 call lmassaddSclr(ac(:,isclr), res,rowp,colm,lhsS,gmass)
563 & res)
574 call commu (res , ilwork, 1 , 'in ')
582 call bc3ResSclr (iBC, res, iper, ilwork)
660 subroutine ElmpvsQ (res,y,sign) argument
669 real*8 res(nshg,ndof),y(nshg,3) local
690 res(i,1:3)=res(i,1:3) + p(irankCoupled)*NABI(i,1:3)
721 res(i,1:3)=res(i,1:3) + p(irankCoupled)*NABI(i,1:3)
751 res(i,1:3)=res(i,1:3) + p(irankCoupled)*NABI(i,1:3)