Lines Matching refs:g1yi
4 & g1yi, g2yi, g3yi, argument
68 & aci(npro,nflow), g1yi(npro,nflow),
247 g1yi = zero
260 g1yi(:,1) = g1yi(:,1) + shg(:,1,1) * yl(:,1,1)
265 g1yi(:,2) = g1yi(:,2) + shg(:,1,1) * yl(:,1,2)
270 g1yi(:,3) = g1yi(:,3) + shg(:,1,1) * yl(:,1,3)
275 g1yi(:,4) = g1yi(:,4) + shg(:,1,1) * yl(:,1,4)
280 g1yi(:,5) = g1yi(:,5) + shg(:,1,1) * yl(:,1,5)
337 g1yi(:,1) = g1yi(:,1) + shg(:,n,1) * yl(:,n,1)
338 g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * yl(:,n,2)
339 g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * yl(:,n,3)
340 g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * yl(:,n,4)
341 g1yi(:,5) = g1yi(:,5) + shg(:,n,1) * yl(:,n,5)
558 & g1yi(npro,nflow),
668 g1yi = zero
679 g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * ycl(:,n,2)
680 g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * ycl(:,n,3)
681 g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * ycl(:,n,4)
721 & +(g3yi(:,2)-g1yi(:,4))**2
722 & +(g1yi(:,3)-g2yi(:,2))**2
725 gVnrm = sqrt(g1yi(:,2)**2+g2yi(:,2)**2+g3yi(:,2)**2
726 & +g1yi(:,3)**2+g2yi(:,3)**2+g3yi(:,3)**2
727 & +g1yi(:,4)**2+g2yi(:,4)**2+g3yi(:,4)**2)