Searched refs:flxLHS (Results 1 – 4 of 4) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | bflux.f | 42 & flxLHS(nshg,1), flxnrm(nshg,nsd), local
92 flxLHS = zero
193 & flxLHS, flxnrm,
206 call commu (flxLHS, ilwork, 1 , 'in ')
215 flxLHS(i,1) = flxLHS(i,1) + flxLHS(j,1)
223 flxLHS(j,1) = flxLHS(i,1)
244 call commu (flxLHS, ilwork, 1 , 'in ')
275 call commu (flxLHS, ilwork, 1 , 'out')
290 where ( (invflx .ne. 0) .and. (flxLHS(:,1) .ne. zero) )
291 & flxres(:,i) = flxres(:,i) / flxLHS(:,1)
[all …]
|
| H A D | asbflx.f | 5 & flxLHS, flxnrm, xKebe ) argument
25 & flxLHS(nshg,1), flxnrm(nshg,nsd)
94 call local (flxLHS, flhsl, ienb, 1, 'scatter ')
|
| /phasta/phSolver/compressible/ |
| H A D | bflux.f | 54 & flxLHS(nshg,1), flxnrm(nshg,nsd),
185 flxLHS = zero
265 & flxLHS, flxnrm)
275 call commu (flxLHS, ilwork, 1 , 'in ')
284 where ( (invflx .ne. 0) .and. (flxLHS(:,1) .ne. zero) )
285 & flxres(:,i) = flxres(:,i) / flxLHS(:,1)
|
| H A D | asbflx.f | 3 & invflx, flxres, flxLHS, flxnrm) argument
21 & flxLHS(numnp,1), flxnrm(numnp,nsd)
99 call local (flxLHS, flhsl, ienb, 1, 'scatter ')
|