Lines Matching refs:lcsyst
72 lcsyst = lcblk(3,iblk)
80 ngauss = nint(lcsyst)
81 ngaussf = nintf(lcsyst)
84 & shglf(lcsyst,:,1:nshl,:),
85 & shpf(lcsyst,1:nshl,:),Qwtf(lcsyst,1:ngaussf))
91 lcsyst = lcblk(3,iblk)
99 ngauss = nint(lcsyst)
100 ngaussf = nintf(lcsyst)
104 & strl(iel:inum,:), shgl(lcsyst,:,1:nshl,:),
105 & shp(lcsyst,1:nshl,:))
385 lcsyst = lcblk(3,iblk)
391 ngauss = nint(lcsyst)
394 & mxmudmi(iblk)%p,cdelsq,shp(lcsyst,1:nshl,:))