Searched refs:invflx (Results 1 – 4 of 4) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | bflux.f | 50 & invflx(nshg), nodflx(nshg) local
66 invflx = 0
77 call flxNode (mienb(iblk)%p, miBCB(iblk)%p, invflx)
81 if (invflx(i) .ne. 0) then
121 call mapConn( mien(iblk)%p, ien2, invflx,
192 & invflx, flxres,
290 where ( (invflx .ne. 0) .and. (flxLHS(:,1) .ne. zero) )
297 where ( (invflx .ne. 0) .and. (temp .ne. zero) )
317 if (invflx(i) .ne. 0) then
|
| H A D | asbflx.f | 4 & BCB, invflx, flxres, argument
24 & invflx(nshg), flxres(nshg,nflow),
82 lnflx = lnflx + min(1, invflx(ienb(:,lnode(n))))
|
| /phasta/phSolver/compressible/ |
| H A D | bflux.f | 53 dimension invflx(nshg), flxres(nshg,nflow),
168 invflx = 0
169 invflx(itemp) = (/ (i, i=1,numflx) /)
264 & invflx, flxres,
284 where ( (invflx .ne. 0) .and. (flxLHS(:,1) .ne. zero) )
301 where ( (invflx .ne. 0) .and. (temp .ne. zero) )
|
| H A D | asbflx.f | 3 & invflx, flxres, flxLHS, flxnrm) argument
20 & invflx(numnp), flxres(numnp,nflow),
86 & min(1, invflx(abs(ienb(:,mnodeb(n,lelCat,nsd)))))
|