Symbol Description Uses
ebote 7



File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 210 THSICE_CALC_THICKN
         ebote = frace*ebot
./pkg/thsice/thsice_calc_thickn.F 211 THSICE_CALC_THICKN
         ebot  = ebot-ebote
./pkg/thsice/thsice_calc_thickn.F 213 THSICE_CALC_THICKN
         ebote = 0. _d 0
./pkg/thsice/thsice_calc_thickn.F 216 THSICE_CALC_THICKN
     &            etop,etope,ebot,ebote
./pkg/thsice/thsice_calc_thickn.F 511 THSICE_CALC_THICKN
     &            Qleft,Fbot,(etope+ebote)/dt
./pkg/thsice/thsice_calc_thickn.F 517 THSICE_CALC_THICKN
      extend=etope+ebote
./pkg/thsice/thsice_calc_thickn.F 98 THSICE_CALC_THICKN
      _RL  ebote         ! energy (from bottom) for lateral melting (J m-2)