Lines Matching refs:src
6 & shpfun, shg, src, argument
46 & shpfun(npro,nshl),shg(npro,nshl,nsd), src(npro,nsd),
74 & - src(:,1)
76 & - src(:,2)
78 & - src(:,3)
271 & shpfun, shg, src, argument
280 & tauS(npro), shpfun(npro,nshl), src(npro), local
305 & - src
309 tmp = rcp * tauS * (rLS -src)
355 & rLui, src, divqi) argument
366 & rLui, src local
375 src = zero
383 src(:,1) = bfx
384 src(:,2) = bfy
385 src(:,3) = bfz
388 src(:,1) = bfx * (Temp(:)-Tref)
389 src(:,2) = bfy * (Temp(:)-Tref)
390 src(:,3) = bfz * (Temp(:)-Tref)
392 call e3source(xx, src)
415 src(:,1)=src(:,1)
419 src(:,2)=src(:,2)
423 src(:,3)=src(:,3)
431 & + u3 * g3yi(:,2) - src(:,1) ) * rho
436 & + u3 * g3yi(:,3) - src(:,2) ) * rho
441 & + u3 * g3yi(:,4) - src(:,3) ) * rho