Symbol Description Uses
hFactmp 25



File Line number Procedure Code
./model/src/calc_surf_dr.F 103 CALC_SURF_DR
     &          hfacC(i,j,ks,bi,bj), hFactmp, etaFld(i,j,bi,bj)
./model/src/calc_surf_dr.F 53 CALC_SURF_DR
      _RL hFactmp, adjust_nb_pt, adjust_volum
./model/src/calc_surf_dr.F 90 CALC_SURF_DR
             hFactmp = h0FacC(i,j,ks,bi,bj)
./model/src/calc_surf_dr.F 92 CALC_SURF_DR
             IF (hFactmp.LT.hFacInf) THEN
./pkg/obcs/obcs_apply_surf_dr.F 102 OBCS_APPLY_SURF_DR
          hFac_FldS(i,j,bi,bj) = MAX( hFacInfMOM, hFactmp )
./pkg/obcs/obcs_apply_surf_dr.F 117 OBCS_APPLY_SURF_DR
           hFactmp = h0FacW(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 120 OBCS_APPLY_SURF_DR
           hFactmp = h0FacW(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 123 OBCS_APPLY_SURF_DR
          hFac_FldW(i,j,bi,bj) = MAX( hFacInfMOM, hFactmp )
./pkg/obcs/obcs_apply_surf_dr.F 136 OBCS_APPLY_SURF_DR
           hFactmp = h0FacW(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 139 OBCS_APPLY_SURF_DR
           hFactmp = h0FacW(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 142 OBCS_APPLY_SURF_DR
          hFac_FldW(i,j,bi,bj) = MAX( hFacInfMOM, hFactmp )
./pkg/obcs/obcs_apply_surf_dr.F 57 OBCS_APPLY_SURF_DR
      _RS hFacInfMOM, hFactmp
./pkg/obcs/obcs_apply_surf_dr.F 77 OBCS_APPLY_SURF_DR
           hFactmp = h0FacS(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 80 OBCS_APPLY_SURF_DR
           hFactmp = h0FacS(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 83 OBCS_APPLY_SURF_DR
          hFac_FldS(i,j,bi,bj) = MAX( hFacInfMOM, hFactmp )
./pkg/obcs/obcs_apply_surf_dr.F 96 OBCS_APPLY_SURF_DR
           hFactmp = h0FacS(i,j,ks,bi,bj)
./pkg/obcs/obcs_apply_surf_dr.F 99 OBCS_APPLY_SURF_DR
           hFactmp = h0FacS(i,j,ks,bi,bj)
./model/src/ini_sigma_hfac.F 105 INI_SIGMA_HFAC
             hFactmp = ( dAHybSigF(k)*rFullDepth
./model/src/ini_sigma_hfac.F 108 INI_SIGMA_HFAC
             hFacC(i,j,k,bi,bj) = hFactmp
./model/src/ini_sigma_hfac.F 109 INI_SIGMA_HFAC
             min_hFac = MIN( min_hFac, hFactmp )
./model/src/ini_sigma_hfac.F 218 INI_SIGMA_HFAC
            hFactmp =
./model/src/ini_sigma_hfac.F 222 INI_SIGMA_HFAC
            hFacW(i,j,k,bi,bj) = hFactmp*maskInW(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 229 INI_SIGMA_HFAC
            hFactmp =
./model/src/ini_sigma_hfac.F 233 INI_SIGMA_HFAC
            hFacS(i,j,k,bi,bj) = hFactmp*maskInS(i,j,bi,bj)
./model/src/ini_sigma_hfac.F 50 INI_SIGMA_HFAC
      _RL hFactmp