Lines Matching refs:strnrm
60 & strnrm(nshg), cdelsq(nshg),
312 strnrm = sqrt(
316 fwr = fwr1 * fres(:,22) * strnrm
825 subroutine twohfilter (y, x, strnrm, ien, fres, argument
836 & strnrm(npro,ngauss), dxidx(npro,nsd,nsd),
980 strnrm(:,intp) = fresli(:,22) * sqrt(
1019 fresli(:,16) = strnrm(:,intp) * fresli(:,10) ! rho *|Eps| *Eps11 *WdetJ
1020 fresli(:,17) = strnrm(:,intp) * fresli(:,11) ! rho *|Eps| *Eps22 *WdetJ
1021 fresli(:,18) = strnrm(:,intp) * fresli(:,12) ! rho *|Eps| *Eps33 *WdetJ
1022 fresli(:,19) = strnrm(:,intp) * fresli(:,13) ! rho *|Eps| *Eps12 *WdetJ
1023 fresli(:,20) = strnrm(:,intp) * fresli(:,14) ! rho *|Eps| *Eps13 *WdetJ
1024 fresli(:,21) = strnrm(:,intp) * fresli(:,15) ! rho *|Eps| *Eps23 *WdetJ
1076 & strnrm(npro,ngauss), rlsl(npro,nshl,6)
1190 strnrm(:,intp) = fresli(:,22) * (
1205 strnrm(:,intp) = strnrm(:,intp) * WdetJ ! ( |Eps|^2 )*WdetJ
1207 epsli(:,1) = -xmudmi(:,intp)*strnrm(:,intp)