Lines Matching refs:yl

1       subroutine e3ivar (yl,          acl,       shpfun,  argument
55       dimension yl(npro,nshl,ndof),        dwl(npro,nenl),       
87           pres = pres + shpfun(:,n) * yl(:,n,1)
88           u1   = u1   + shpfun(:,n) * yl(:,n,2)
89           u2   = u2   + shpfun(:,n) * yl(:,n,3)
90           u3   = u3   + shpfun(:,n) * yl(:,n,4)
95              Temp = Temp + shpfun(:,n) * yl(:,n,5)
153           g1yi(:,1) = g1yi(:,1) + shg(:,n,1) * yl(:,n,1)
154           g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * yl(:,n,2)
155           g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * yl(:,n,3)
156           g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * yl(:,n,4)
158           g2yi(:,1) = g2yi(:,1) + shg(:,n,2) * yl(:,n,1)
159           g2yi(:,2) = g2yi(:,2) + shg(:,n,2) * yl(:,n,2)
160           g2yi(:,3) = g2yi(:,3) + shg(:,n,2) * yl(:,n,3)
161           g2yi(:,4) = g2yi(:,4) + shg(:,n,2) * yl(:,n,4)
163           g3yi(:,1) = g3yi(:,1) + shg(:,n,3) * yl(:,n,1)
164           g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * yl(:,n,2)
165           g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * yl(:,n,3)
166           g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * yl(:,n,4)
208                    Sclr(i) = Sclr(i) + shpfun(i,n) * yl(i,n,6) !scalar
212                    gyti(i,1) = gyti(i,1) + shg(i,n,1) * yl(i,n,6) 
213                    gyti(i,2) = gyti(i,2) + shg(i,n,2) * yl(i,n,6)
214                    gyti(i,3) = gyti(i,3) + shg(i,n,3) * yl(i,n,6)
314       subroutine e3ivarSclr (yl,          acl,       shpfun,  argument
327       dimension yl(npro,nshl,ndof),        acl(npro,nshl,ndof), 
361          u1   = u1   + shpfun(:,n) * yl(:,n,2)
362          u2   = u2   + shpfun(:,n) * yl(:,n,3)
363          u3   = u3   + shpfun(:,n) * yl(:,n,4)
364          Sclr = Sclr + shpfun(:,n) * yl(:,n,id)
387           gradS(:,1) = gradS(:,1) + shg(:,n,1) * yl(:,n,id)
388           gradS(:,2) = gradS(:,2) + shg(:,n,2) * yl(:,n,id)
389           gradS(:,3) = gradS(:,3) + shg(:,n,3) * yl(:,n,id)
411                 Temp = Temp + shpfun(:,n) * yl(:,n,5)
433              g1yi(:,1) = g1yi(:,1) + shg(:,n,1) * yl(:,n,1)
434              g1yi(:,2) = g1yi(:,2) + shg(:,n,1) * yl(:,n,2)
435              g1yi(:,3) = g1yi(:,3) + shg(:,n,1) * yl(:,n,3)
436              g1yi(:,4) = g1yi(:,4) + shg(:,n,1) * yl(:,n,4)
438              g2yi(:,1) = g2yi(:,1) + shg(:,n,2) * yl(:,n,1)
439              g2yi(:,2) = g2yi(:,2) + shg(:,n,2) * yl(:,n,2)
440              g2yi(:,3) = g2yi(:,3) + shg(:,n,2) * yl(:,n,3)
441              g2yi(:,4) = g2yi(:,4) + shg(:,n,2) * yl(:,n,4)
443              g3yi(:,1) = g3yi(:,1) + shg(:,n,3) * yl(:,n,1)
444              g3yi(:,2) = g3yi(:,2) + shg(:,n,3) * yl(:,n,2)
445              g3yi(:,3) = g3yi(:,3) + shg(:,n,3) * yl(:,n,3)
446              g3yi(:,4) = g3yi(:,4) + shg(:,n,3) * yl(:,n,4)
465           call getdiff(dwl, yl, shpfun, xmudmi, xl, rmu, rho)
493      &                      shpfun,       shg,       yl,     dxidx,