Symbol Description Uses
frzmlt ocean mixed-layer freezing/melting potential [W/m2] 9


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 142 THSICE_CALC_THICKN 
      _RL  frzmlt
./pkg/thsice/thsice_calc_thickn.F 307 THSICE_CALC_THICKN 
          frzmlt  = fzMlOc(i,j)
./pkg/thsice/thsice_calc_thickn.F 343 THSICE_CALC_THICKN 
      IF (frzmlt.GE. 0. _d 0) THEN
./pkg/thsice/thsice_calc_thickn.F 347 THSICE_CALC_THICKN 
        Fbot = frzmlt
./pkg/thsice/thsice_calc_thickn.F 350 THSICE_CALC_THICKN 
         Fbot = enFrcFrz*frzmlt
./pkg/thsice/thsice_calc_thickn.F 357 THSICE_CALC_THICKN 
          Fbot = (1. _d 0 - fracEnFreez)*frzmlt
./pkg/thsice/thsice_calc_thickn.F 373 THSICE_CALC_THICKN 
         Fbot = max(Fbot,frzmlt)
./pkg/thsice/thsice_calc_thickn.F 383 THSICE_CALC_THICKN 
     &  'ThSI_CALC_TH: evpAtm, frzmlt, Fbot =', frwAtm(i,j),frzmlt,Fbot
./pkg/thsice/thsice_calc_thickn.F 886 THSICE_CALC_THICKN 
          fzMlOc(i,j) = frzmlt - Fbot*iceMask(i,j)