Symbol Description Uses
wfac vel.-flux in r-direction. 12



File Line number Procedure Code
./pkg/generic_advdiff/gad_ppm_flx_r.F 122 GAD_PPM_FLX_R
              flux(ix,iy,ir) = + wfac(ix,iy,ir) * intF
./pkg/generic_advdiff/gad_ppm_flx_r.F 36 GAD_PPM_FLX_R
          _RL wfac(1-OLx:sNx+OLx,
./pkg/generic_advdiff/gad_ppm_flx_r.F 7 GAD_PPM_FLX_R
     &           delT,wvel,wfac,fhat,
./pkg/generic_advdiff/gad_pqm_adv_r.F 104 GAD_PQM_ADV_R
     &             + abs(wfac(ix,iy,ir))
./pkg/generic_advdiff/gad_pqm_adv_r.F 143 GAD_PQM_ADV_R
     &                   wfac,fhat,
./pkg/generic_advdiff/gad_pqm_adv_r.F 37 GAD_PQM_ADV_R
          _RL wfac(1-OLx:sNx+OLx,
./pkg/generic_advdiff/gad_pqm_adv_r.F 7 GAD_PQM_ADV_R
     I           delT,wvel,wfac,fbar,
./pkg/generic_advdiff/gad_pqm_flx_r.F 134 GAD_PQM_FLX_R
              flux(ix,iy,ir) = + wfac(ix,iy,ir) * intF
./pkg/generic_advdiff/gad_pqm_flx_r.F 36 GAD_PQM_FLX_R
          _RL wfac(1-OLx:sNx+OLx,
./pkg/generic_advdiff/gad_pqm_flx_r.F 69 GAD_PQM_FLX_R
              if (wfac(ix,iy,ir) .eq. 0. _d 0) then
./pkg/generic_advdiff/gad_pqm_flx_r.F 75 GAD_PQM_FLX_R
              if (wfac(ix,iy,ir) .lt. 0. _d 0) then
./pkg/generic_advdiff/gad_pqm_flx_r.F 7 GAD_PQM_FLX_R
     &           delT,wvel,wfac,