Home
last modified time | relevance | path

Searched refs:shdrv (Results 1 – 19 of 19) sorted by relevance

/phasta/phSolver/common/
H A Dcmass.f38 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),
[all …]
H A Dhierarchic.f30 subroutine getshp(shp, shgl, sgn, shape, shdrv) argument
39 & shdrv(npro,nsd,nshl)
45 shdrv(:,j,i) = shgl(j,i,intp)
52 shdrv(:,j,i) = shgl(j,i,intp)*sgn(:,i)
60 subroutine getshpb(shp, shgl, sgn, shape, shdrv) argument
69 & shdrv(npro,nsd,nshl)
75 shdrv(:,j,i) = shgl(j,i,intp)
82 shdrv(:,j,i) = shgl(j,i,intp)*sgn(:,i)
327 & shdrv(npro,nsd,nshl), shp(nshl,npts), local
338 & shape, shdrv)
[all …]
H A Derrorsmooth.f145 & shdrv(npro,nsd,nshl), WdetJ(npro),
181 & shape, shdrv)
183 call e3metric( xl, shdrv, dxidx,
H A Dasbnabi.f25 & shpfun(npro,nshl), shdrv(npro,nsd,nshl)
121 & shpfun, shdrv)
183 & shpfun(npro,nshl), shdrv(npro,nsd,nshl)
279 & shpfun, shdrv)
H A Df3lhs.f46 & shdrv(npro,nsd,nshl),
80 & shape, shdrv)
H A Dsolvecon.f179 & shdrv(npro,nsd,nshl)
225 & shape, shdrv)
239 call e3metric( xl, shdrv, dxidx,
/phasta/phSolver/incompressible/
H A De3qGradV.f36 & shdrv(npro,nsd,nshl)
46 & shape, shdrv)
54 call e3qvar (yl, shdrv,
H A De3.f59 & shpfun(npro,nshl), shdrv(npro,nsd,nshl),
90 & shpfun, shdrv)
99 & shdrv, xl,
192 & shdrv(npro,nsd,nshl), rLS(npro), local
223 & shpfun, shdrv)
232 & shdrv, xl, xmudmi,
H A De3q.f40 & shdrv(npro,nsd,nshl), shpsum(npro)
61 & shape, shdrv)
73 call e3qvar (yl, shdrv,
232 & shdrv(npro,nsd,nshl), shpsum(npro)
247 & shape, shdrv)
258 call e3qvarSclr (yl, shdrv,
H A De3ql.f40 & shdrv(npro,nsd,nshl), indx(nshl),
54 call getshp(shp, shgl, sgn, shape, shdrv)
61 call e3qvar (yl, shdrv,
204 & shdrv(npro,nsd,nshl), indx(nshl),
217 call getshp(shp, shgl, sgn, shape, shdrv)
224 call e3qvarSclr (yl, shdrv, xl,
H A De3b.f76 & shape(npro,nshl), shdrv(npro,nsd,nshl),
103 & shape, shdrv)
127 & shdrv, xlb,
387 & shape(npro,nshl), shdrv(npro,nsd,nshl),
408 & shape, shdrv)
412 call e3bvarSclr (yl, shdrv, xlb,
H A Derrsmooth.f146 & shdrv(npro,nsd,nshl), WdetJ(npro),
182 & shape, shdrv)
184 call e3metric( xl, shdrv, dxidx,
H A Dhessian.f95 & shdrv(npro,nsd,nshl), shape( npro, nshl ),
133 call getshp( shp, shgl, sgn, shape, shdrv )
134 call local_gradient( yl(:,:,2:4), 3, shdrv, xl,
170 & shdrv(npro,nsd,nshl), shape( npro, nshl ),
208 call getshp( shp, shgl, sgn, shape, shdrv )
209 call local_gradient( gradul, 9, shdrv, xl,
H A De3bvar.f794 subroutine e3bvarSclr (yl, shdrv, xlb, argument
800 dimension yl(npro,nshl,ndof), shdrv(npro,nsd,nshl),
823 dxdxib(:,1,1) = dxdxib(:,1,1) + xlb(:,n,1) * shdrv(:,1,n)
824 dxdxib(:,1,2) = dxdxib(:,1,2) + xlb(:,n,1) * shdrv(:,2,n)
825 dxdxib(:,1,3) = dxdxib(:,1,3) + xlb(:,n,1) * shdrv(:,3,n)
826 dxdxib(:,2,1) = dxdxib(:,2,1) + xlb(:,n,2) * shdrv(:,1,n)
827 dxdxib(:,2,2) = dxdxib(:,2,2) + xlb(:,n,2) * shdrv(:,2,n)
828 dxdxib(:,2,3) = dxdxib(:,2,3) + xlb(:,n,2) * shdrv(:,3,n)
829 dxdxib(:,3,1) = dxdxib(:,3,1) + xlb(:,n,3) * shdrv(:,1,n)
830 dxdxib(:,3,2) = dxdxib(:,3,2) + xlb(:,n,3) * shdrv(:,2,n)
[all …]
H A Dgenlmass.f85 & dxidx(npro,nsd,nsd), shdrv(npro,nsd,nshl) local
115 & shape, shdrv)
120 call e3metric( xl, shdrv, dxidx,
/phasta/phSolver/compressible/
H A De3b.f91 & shape(npro,nshl), shdrv(npro,nsd,nshl)
123 & shape, shdrv)
128 & shdrv, xlb,
435 & shdrv(npro,nsd,nshl)
479 & shape, shdrv)
484 & shape, shdrv,
H A De3.f86 & shape(npro,nshl), shdrv(npro,nsd,nshl),
117 & shape, shdrv)
130 & Sclr, shape, shdrv,
393 & shape(npro,nshl), shdrv(npro,nsd,nshl)
413 & shape, shdrv)
430 & shape, shdrv, xl,
H A De3ql.f43 & shdrv(npro,nsd,nshl), indx(nshl),
62 & shape, shdrv)
74 call e3qvar (ycl, shape, shdrv,
H A De3q.f45 & shdrv(npro,nsd,nshl), shpsum(npro)
69 & shape, shdrv)
80 call e3qvar (ycl, shape, shdrv,