Symbol Description Uses
qicAv mean enthalphy of ice (layer 1 & 2) [J/kg] 4



File Line number Procedure Code
./pkg/thsice/thsice_extend.F 109 THSICE_EXTEND
        qleft= iceThick*newIceFrac*qicAv/deltaTice
./pkg/thsice/thsice_extend.F 69 THSICE_EXTEND
      _RL qicAv
./pkg/thsice/thsice_extend.F 88 THSICE_EXTEND
        qicAv = rhoi*(qicen(1)+qicen(2))*0.5 _d 0
./pkg/thsice/thsice_extend.F 89 THSICE_EXTEND
        newIce = esurp*deltaTice/qicAv