Lines Matching refs:shglb
2 & shpb, shglb, argument
52 & shpb(npro,nshl), shglb(npro,nsd,nshl),
142 dxdxib(:,1,1) = dxdxib(:,1,1) + xlb(:,n,1) * shglb(:,1,n)
143 dxdxib(:,1,2) = dxdxib(:,1,2) + xlb(:,n,1) * shglb(:,2,n)
144 dxdxib(:,1,3) = dxdxib(:,1,3) + xlb(:,n,1) * shglb(:,3,n)
145 dxdxib(:,2,1) = dxdxib(:,2,1) + xlb(:,n,2) * shglb(:,1,n)
146 dxdxib(:,2,2) = dxdxib(:,2,2) + xlb(:,n,2) * shglb(:,2,n)
147 dxdxib(:,2,3) = dxdxib(:,2,3) + xlb(:,n,2) * shglb(:,3,n)
148 dxdxib(:,3,1) = dxdxib(:,3,1) + xlb(:,n,3) * shglb(:,1,n)
149 dxdxib(:,3,2) = dxdxib(:,3,2) + xlb(:,n,3) * shglb(:,2,n)
150 dxdxib(:,3,3) = dxdxib(:,3,3) + xlb(:,n,3) * shglb(:,3,n)
287 gl1yi(:,1) = gl1yi(:,1) + shglb(:,1,n) * yl(:,n,1)
288 gl1yi(:,2) = gl1yi(:,2) + shglb(:,1,n) * yl(:,n,2)
289 gl1yi(:,3) = gl1yi(:,3) + shglb(:,1,n) * yl(:,n,3)
290 gl1yi(:,4) = gl1yi(:,4) + shglb(:,1,n) * yl(:,n,4)
292 gl2yi(:,1) = gl2yi(:,1) + shglb(:,2,n) * yl(:,n,1)
293 gl2yi(:,2) = gl2yi(:,2) + shglb(:,2,n) * yl(:,n,2)
294 gl2yi(:,3) = gl2yi(:,3) + shglb(:,2,n) * yl(:,n,3)
295 gl2yi(:,4) = gl2yi(:,4) + shglb(:,2,n) * yl(:,n,4)
297 gl3yi(:,1) = gl3yi(:,1) + shglb(:,3,n) * yl(:,n,1)
298 gl3yi(:,2) = gl3yi(:,2) + shglb(:,3,n) * yl(:,n,2)
299 gl3yi(:,3) = gl3yi(:,3) + shglb(:,3,n) * yl(:,n,3)
300 gl3yi(:,4) = gl3yi(:,4) + shglb(:,3,n) * yl(:,n,4)