Lines Matching refs:npro
25 dimension yl(npro,nshl,ndof), dwl(npro,nshl),
27 & xl(npro,nenl,nsd), sgn(npro,nshl),
28 & ql(npro,nshl,idflx), xmudmi(npro,ngauss)
32 dimension g1yi(npro,ndof), g2yi(npro,ndof),
33 & g3yi(npro,ndof), shg(npro,nshl,nsd),
34 & dxidx(npro,nsd,nsd), WdetJ(npro),
35 & rmu(npro),
36 & rminv(npro,nshl,nshl),
37 & qrl(npro,nshl,nsd*nsd)
39 dimension qdi(npro,nsd*nsd), shape(npro,nshl),
40 & shdrv(npro,nsd,nshl), indx(nshl),
41 & rmass(npro,nshl,nshl)
44 real*8 tmp(npro)
132 allocate (lmassinv(iblock)%p(npro,nshl,nshl))
134 do iel=1,npro
162 do iel=1,npro
191 dimension yl(npro,nshl,ndof), dwl(npro,nshl),
193 & xl(npro,nenl,nsd), sgn(npro,nshl),
194 & ql(npro,nshl,nsd)
198 dimension dxidx(npro,nsd,nsd), WdetJ(npro),
199 & diffus(npro),
200 & rminv(npro,nshl,nshl),
201 & qrl(npro,nshl,nsd)
203 dimension qdi(npro,nsd), shape(npro,nshl),
204 & shdrv(npro,nsd,nshl), indx(nshl),
205 & rmass(npro,nshl,nshl), gradT(npro,nsd),
206 & eviscv(npro)
279 allocate (lmassinv(iblock)%p(npro,nshl,nshl))
281 do iel=1,npro
309 do iel=1,npro