Lines Matching refs:npro
55 dimension yl(npro,nshl,ndof), dwl(npro,nenl),
56 & acl(npro,nshl,ndof), shpfun(npro,nshl),
57 & shgl(npro,nsd,nshl), xl(npro,nenl,nsd),
58 & aci(npro,nsd), g1yi(npro,ndof),
59 & g2yi(npro,ndof), g3yi(npro,ndof),
60 & shg(npro,nshl,nsd), dxidx(npro,nsd,nsd),
61 & WdetJ(npro),
62 & rho(npro), pres(npro),
63 & u1(npro), u2(npro),
64 & u3(npro), divqi(npro,nflow-1+isurf),
65 & ql(npro,nshl,idflx), rLui(npro,nsd),
66 & src(npro,nsd), Temp(npro),xx(npro,nsd)
68 dimension tmp(npro), tmp1(npro), dkei(npro), dist2w(npro)
70 dimension rlsl(npro,nshl,6), rlsli(npro,6)
72 real*8 rerrl(npro,nshl,6), omega(3), divu(npro)
73 dimension gyti(npro,nsd), gradh(npro,nsd),
74 & sforce(npro,3), weber(npro),
75 & Sclr(npro)
206 do i = 1, npro
327 dimension yl(npro,nshl,ndof), acl(npro,nshl,ndof),
328 & Sclr(npro), Sdot(npro),
329 & gradS(npro,nsd), shpfun(npro,nshl),
330 & shgl(npro,nsd,nshl), xl(npro,nenl,nsd),
331 & shg(npro,nshl,nsd), dxidx(npro,nsd,nsd),
332 & WdetJ(npro),
333 & u1(npro), u2(npro),
334 & u3(npro), divS(npro),
335 & ql(npro,nshl,nsd), rLS(npro),
336 & SrcR(npro), SrcL(npro),
337 & dwl(npro,nshl), diffus(npro),
338 & umod(npro,nsd), Temp(npro),xx(npro,nsd),
339 & divqi(npro)
341 dimension tmp(npro), srcRat(npro)
342 real*8 rLui(npro,nsd), aci(npro,nsd),
343 & g1yi(npro,nflow), g2yi(npro,nflow),
344 & g3yi(npro,nflow),
345 & src(npro,nsd), rho(npro),
346 & rmu(npro)
347 real*8 uBar(npro,nsd), xmudmi(npro,ngauss)