Symbol Description Uses
qicAv mean enthalpy of ice (layer 1 & 2) [J/m^3] 4



File Line number Procedure Code
./pkg/thsice/thsice_extend.F 106 THSICE_EXTEND
      _RL qicAv
./pkg/thsice/thsice_extend.F 140 THSICE_EXTEND
        qicAv = rhoi*(qicen(1)+qicen(2))*0.5 _d 0
./pkg/thsice/thsice_extend.F 141 THSICE_EXTEND
        newIce = esurp*deltaTice/qicAv
./pkg/thsice/thsice_extend.F 162 THSICE_EXTEND
        flx2oc(i,j)= iceThick*newIceFrac*qicAv/deltaTice