Lines Matching refs:shdrv
38 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
52 & shape, shdrv, intp)
56 call e3metric( xl, shdrv,dxidx,shg,WdetJ)
92 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
116 & shape, shdrv, intp)
120 call e3metricf( xl, shdrv,dxidx,shg,WdetJ,Qwtf)
133 shdrv = zero
150 & shape, shdrv, intp)
155 call e3metric( xl, shdrv,dxidx,shg,WdetJ)
215 dimension shape(npro,nshl), shdrv(npro,nsd,nshl),
233 & shape, shdrv, intp)
237 call e3metricf( xl, shdrv,dxidx,shg,WdetJ,Qwtf)
250 shdrv = zero
267 & shape, shdrv, intp)
272 call e3metric( xl, shdrv,dxidx,shg,WdetJ)