Lines Matching refs:WdetJb
64 & g3yi(npro,nflow), WdetJb(npro),
130 & g2yi, g3yi, WdetJb,
245 EGmass(:,b, aa) = con * WdetJb * shape(:,b) * dNadn(:,aa)
279 & + WdetJb * shape(:,nodlcl) * F1
281 & + WdetJb * shape(:,nodlcl) * F2
283 & + WdetJb * shape(:,nodlcl) * F3
285 & + WdetJb * shape(:,nodlcl) * F4
287 & + WdetJb * shape(:,nodlcl) * F5
302 rml(:,nodlcl,2) = rml(:,nodlcl,2) - WdetJb *
304 rml(:,nodlcl,3) = rml(:,nodlcl,3) - WdetJb *
306 rml(:,nodlcl,4) = rml(:,nodlcl,4) - WdetJb *
308 rml(:,nodlcl,5) = rml(:,nodlcl,5) - WdetJb *
333 flxID(1,iface) = flxID(1,iface) + WdetJb(iel)! measure area too
335 flxID(2,iface) = flxID(2,iface) - WdetJb(iel) * rou(iel)
338 & * WdetJb(iel)
341 & * WdetJb(iel)
344 & * WdetJb(iel)
357 tau1n = ( pres * bnorm(:,1) - tau1n ) * WdetJb
358 tau2n = ( pres * bnorm(:,2) - tau2n ) * WdetJb
359 tau3n = ( pres * bnorm(:,3) - tau3n ) * WdetJb
360 heat = - heat * WdetJb
440 & g3yti(npro), WdetJb(npro),
487 & g2yti, g3yti, WdetJb,
609 & + WdetJb * shape(:,nodlcl) * F