Lines Matching refs:gradS
210 subroutine e3sourceSclr ( Sclr, Sdot, gradS,
225 c gradS : spatial gradient of Sclr
240 & gradS(npro,nsd), dwl(npro,nenl),
422 uMod(:,1) = u1(:) - tmp * gradS(:,1)
423 uMod(:,2) = u2(:) - tmp * gradS(:,2)
424 uMod(:,3) = u3(:) - tmp * gradS(:,3)
545 mytmp = sign_levelset / sqrt( gradS(:,1)*gradS(:,1)
546 & + gradS(:,2)*gradS(:,2)
547 & + gradS(:,3)*gradS(:,3))
549 uMod(:,1) = mytmp * gradS(:,1) ! These are for the LHS
550 uMod(:,2) = mytmp * gradS(:,2)
551 uMod(:,3) = mytmp * gradS(:,3)