Home
last modified time | relevance | path

Searched refs:flxnrm (Results 1 – 4 of 4) sorted by relevance

/phasta/phSolver/incompressible/
H A Dbflux.f42 & flxLHS(nshg,1), flxnrm(nshg,nsd), local
93 flxnrm = zero
193 & flxLHS, flxnrm,
207 call commu (flxnrm, ilwork, nsd , 'in ')
245 call commu (flxnrm, ilwork, nsd , 'in ')
276 call commu (flxnrm, ilwork, nsd , 'out')
296 temp = sqrt(flxnrm(:,1)**2 + flxnrm(:,2)**2 + flxnrm(:,3)**2)
298 flxnrm(:,1) = flxnrm(:,1) / temp
299 flxnrm(:,2) = flxnrm(:,2) / temp
300 flxnrm(:,3) = flxnrm(:,3) / temp
[all …]
H A Dasbflx.f5 & flxLHS, flxnrm, xKebe ) argument
25 & flxLHS(nshg,1), flxnrm(nshg,nsd)
95 call local (flxnrm, fnrml, ienb, nsd, 'scatter ')
/phasta/phSolver/compressible/
H A Dbflux.f54 & flxLHS(nshg,1), flxnrm(nshg,nsd),
186 flxnrm = zero
265 & flxLHS, flxnrm)
276 call commu (flxnrm, ilwork, nsd , 'in ')
300 temp = sqrt(flxnrm(:,1)**2 + flxnrm(:,2)**2 + flxnrm(:,3)**2)
302 flxnrm(:,1) = flxnrm(:,1) / temp
303 flxnrm(:,2) = flxnrm(:,2) / temp
304 flxnrm(:,3) = flxnrm(:,3) / temp
334 & (flxnrm(m,i), i=1,nsd),
H A Dasbflx.f3 & invflx, flxres, flxLHS, flxnrm) argument
21 & flxLHS(numnp,1), flxnrm(numnp,nsd)
101 call local (flxnrm, fnrml, ienb, nsd, 'scatter ')