Lines Matching refs:npro
35 & em(npro,nshl,nshl),
36 & xl(npro,nenl,nsd)
38 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
39 & sgn(npro,nshl), dxidx(npro,nsd,nsd),
40 & shg(npro,nshl,nsd),
41 & WdetJ(npro)
58 do iel = 1, npro
89 & em(npro,nshl,nshl), eml(npro,nshl),
90 & xl(npro,nenl,nsd)
92 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
93 & sgn(npro,nshl), dxidx(npro,nsd,nsd),
94 & shg(npro,nshl,nsd), Qwtf(ngaussf),
95 & WdetJ(npro)
158 do iel = 1, npro
182 do iel = 1, npro
212 & em(npro,nshl,nshl), eml(npro,nshl),
213 & xl(npro,nenl,nsd)
215 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
216 & sgn(npro,nshl), dxidx(npro,nsd,nsd),
217 & shg(npro,nshl,nsd), Qwtf(ngaussf),
218 & WdetJ(npro)
275 do iel = 1, npro
297 do iel = 1, npro
321 real*8 xl(npro,nenl,nsd), shgl(npro,nsd,nshl),
322 & dxidx(npro,nsd,nsd), shg(npro,nshl,nsd),
323 & WdetJ(npro), Qwtf(ngaussf)
325 real*8 dxdxi(npro,nsd,nsd), tmp(npro)