Symbol Description Uses
fresh Total fresh water flux to ocean [kg/m2/s] (> 0 downward) 21



File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 154 THSICE_CALC_THICKN
      _RL fresh
./pkg/thsice/thsice_calc_thickn.F 613 THSICE_CALC_THICKN
      fresh = (mwater0 - (rhos*hs + rhoi*hi))/dt
./pkg/thsice/thsice_calc_thickn.F 617 THSICE_CALC_THICKN
        fresh = fresh + snowPr
./pkg/thsice/thsice_calc_thickn.F 709 THSICE_CALC_THICKN
         fresh = fresh + (rhos*hs + rhoi*hi)/dt
./pkg/thsice/thsice_calc_thickn.F 723 THSICE_CALC_THICKN
     &    'ThSI_CALC_TH: -2 : esurp,fresh=', esurp, fresh
./pkg/thsice/thsice_calc_thickn.F 771 THSICE_CALC_THICKN
         fresh = fresh + chi*rhoi/dt
./pkg/thsice/thsice_calc_thickn.F 819 THSICE_CALC_THICKN
       fresh = fresh - evap
./pkg/thsice/thsice_calc_thickn.F 839 THSICE_CALC_THICKN
     &   (mwater0-(rhos*hs+rhoi*hi))/dt,evap,fresh,fsalt(i,j)
./pkg/thsice/thsice_calc_thickn.F 846 THSICE_CALC_THICKN
      fresh = fresh + (prcAtm(i,j)-snowPr)
./pkg/thsice/thsice_calc_thickn.F 863 THSICE_CALC_THICKN
           fresh=fresh+extend/rqh*freshe
./pkg/thsice/thsice_calc_thickn.F 870 THSICE_CALC_THICKN
           fresh=fresh+freshe
./pkg/thsice/thsice_calc_thickn.F 892 THSICE_CALC_THICKN
     &   iceFrac, qleft, fsalt(i,j), fresh
./pkg/thsice/thsice_calc_thickn.F 897 THSICE_CALC_THICKN
     I            qleft, fresh, fsalt,
./pkg/thsice/thsice_calc_thickn.F 910 THSICE_CALC_THICKN
          frw2oc(i,j) = fresh