Lines Matching refs:nshl
21 & shp(nshl,MAXQPT),
22 & shgl(nsd,nshl,MAXQPT),
23 & ien(npro,nshl),
29 dimension ycl(npro,nshl,ndofl), acl(npro,nshl,ndof),
30 & xl(npro,nenl,nsd), ytargetl(npro,nshl,nflow),
31 & rl(npro,nshl,nflow), rml(npro,nshl,nflow),
32 & BDiagl(npro,nshl,nflow,nflow),
33 & ql(npro,nshl,idflx)
36 dimension sgn(npro,nshl), EGmass(npro,nedof,nedof)
38 dimension rlsl(npro,nshl,6)
39 real*8 rerrl(npro,nshl,6), rerr(nshg,10)
93 do i = 1, nshl
143 & shp(nshl,MAXQPT), shgl(nsd,nshl,MAXQPT),
144 & ien(npro,nshl),
150 dimension ycl(npro,nshl,ndof),
151 & acl(npro,nshl,ndof), dwl(npro,nenl),
152 & xl(npro,nenl,nsd), Diagl(npro,nshl),
153 & rtl(npro,nshl), rmtl(npro,nshl),
154 & qtl(npro,nshl), sgn(npro,nshl)
196 do i=1,nshl