Searched refs:rNa (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | e3res.f | 56 & tmp(npro), rGNa(npro,nsd,nsd), rNa(npro,nsd), local
63 rNa = zero
73 rNa(:,1) = aci(:,1) * tmps
75 rNa(:,2) = aci(:,2) * tmps
77 rNa(:,3) = aci(:,3) * tmps
93 rNa(:,1) = rNa(:,1) + (omega(2)-omega(3)) * tauM * rLui(:,1)
94 rNa(:,2) = rNa(:,2) + (omega(3)-omega(1)) * tauM * rLui(:,2)
95 rNa(:,3) = rNa(:,3) + (omega(1)-omega(2)) * tauM * rLui(:,3)
112 rNa(:,1) = rNa(:,1)
116 rNa(:,2) = rNa(:,2)
[all …]
|
| H A D | e3b.f | 77 & rNa(npro,4)
270 rNa(:,1) = -WdetJb * ( tau1n - bnorm(:,1) * pres - vdot(:,1))
271 rNa(:,2) = -WdetJb * ( tau2n - bnorm(:,2) * pres - vdot(:,2))
272 rNa(:,3) = -WdetJb * ( tau3n - bnorm(:,3) * pres - vdot(:,3))
273 rNa(:,4) = WdetJb * unm
282 rNa(:,1) = rNa(:,1) + WdetJb * rou * u1
283 rNa(:,2) = rNa(:,2) + WdetJb * rou * u2
284 rNa(:,3) = rNa(:,3) + WdetJb * rou * u3
294 rl(:,nodlcl,1) = rl(:,nodlcl,1) - shape(:,nodlcl) * rNa(:,1)
295 rl(:,nodlcl,2) = rl(:,nodlcl,2) - shape(:,nodlcl) * rNa(:,2)
[all …]
|