Lines Matching refs:shg
329 & shg(npro,nshl,nsd), gradV(npro,nsd,nsd), local
352 & shg, tmp)
356 gradV(:,1,1) = gradV(:,1,1) + shg(:,n,1) * ycl(:,n,2)
357 gradV(:,2,1) = gradV(:,2,1) + shg(:,n,1) * ycl(:,n,3)
358 gradV(:,3,1) = gradV(:,3,1) + shg(:,n,1) * ycl(:,n,4)
360 gradV(:,1,2) = gradV(:,1,2) + shg(:,n,2) * ycl(:,n,2)
361 gradV(:,2,2) = gradV(:,2,2) + shg(:,n,2) * ycl(:,n,3)
362 gradV(:,3,2) = gradV(:,3,2) + shg(:,n,2) * ycl(:,n,4)
364 gradV(:,1,3) = gradV(:,1,3) + shg(:,n,3) * ycl(:,n,2)
365 gradV(:,2,3) = gradV(:,2,3) + shg(:,n,3) * ycl(:,n,3)
366 gradV(:,3,3) = gradV(:,3,3) + shg(:,n,3) * ycl(:,n,4)