Lines Matching refs:g3yi
4 & g1yi, g2yi, g3yi, argument
69 & g2yi(npro,nflow), g3yi(npro,nflow),
249 g3yi = zero
310 g3yi(:,1) = g3yi(:,1) + shg(:,1,3) * yl(:,1,1)
315 g3yi(:,2) = g3yi(:,2) + shg(:,1,3) * yl(:,1,2)
320 g3yi(:,3) = g3yi(:,3) + shg(:,1,3) * yl(:,1,3)
325 g3yi(:,4) = g3yi(:,4) + shg(:,1,3) * yl(:,1,4)
330 g3yi(:,5) = g3yi(:,5) + shg(:,1,3) * yl(:,1,5)
349 g3yi(:,1) = g3yi(:,1) + shg(:,n,3) * yl(:,n,1)
350 g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * yl(:,n,2)
351 g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * yl(:,n,3)
352 g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * yl(:,n,4)
353 g3yi(:,5) = g3yi(:,5) + shg(:,n,3) * yl(:,n,5)
559 & g2yi(npro,nflow), g3yi(npro,nflow),
670 g3yi = zero
691 g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * ycl(:,n,2)
692 g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * ycl(:,n,3)
693 g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * ycl(:,n,4)
720 & (g2yi(:,4)-g3yi(:,3))**2
721 & +(g3yi(:,2)-g1yi(:,4))**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)