Lines Matching refs:src
7 & ql, rLui, src, argument
66 & src(npro,nsd), Temp(npro),xx(npro,nsd)
248 & rLui, src, divqi)
253 src(:,1) = src(:,1) + sforce(:,1)
254 src(:,2) = src(:,2) + sforce(:,2)
255 src(:,3) = src(:,3) + sforce(:,3)
345 & src(npro,nsd), rho(npro), local
460 & rLui, src, divqi)
461 src(:,1)=u1 !
462 src(:,2)=u2 ! store u in src memory
463 src(:,3)=u3 !
466 call e3uBar(rho, src, dxidx, rLui, rmu, uBar)