Symbol Description Uses
qIc1 ice enthalpy (J/kg), 1rst level 12



File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 14 THSICE_CALC_THICKN
     U                  icFrac, hIce, hSnow, tSrf, qIc1, qIc2,
./pkg/thsice/thsice_calc_thickn.F 185 THSICE_CALC_THICKN
          qicen(1)= qIc1(i,j)
./pkg/thsice/thsice_calc_thickn.F 662 THSICE_CALC_THICKN
          qIc1(i,j)   = qicen(1)
./pkg/thsice/thsice_calc_thickn.F 99 THSICE_CALC_THICKN
      _RL qIc1   (siLo:siHi,sjLo:sjHi)
./pkg/thsice/thsice_extend.F 128 THSICE_EXTEND
          qicen(1)= qIc1(i,j)
./pkg/thsice/thsice_extend.F 14 THSICE_EXTEND
     U                  tSrf, tIc1, tIc2, qIc1, qIc2,
./pkg/thsice/thsice_extend.F 187 THSICE_EXTEND
            qIc1(i,j)   = qicen(1)
./pkg/thsice/thsice_extend.F 80 THSICE_EXTEND
      _RL qIc1   (siLo:siHi,sjLo:sjHi)
./pkg/thsice/thsice_solve4temp.F 100 THSICE_SOLVE4TEMP
      _RL qIc1   (siLo:siHi,sjLo:sjHi)
./pkg/thsice/thsice_solve4temp.F 14 THSICE_SOLVE4TEMP
     U                  flxSW, tSrf, qIc1, qIc2,
./pkg/thsice/thsice_solve4temp.F 175 THSICE_SOLVE4TEMP
          qicen(1)= qIc1(i,j)
./pkg/thsice/thsice_solve4temp.F 417 THSICE_SOLVE4TEMP
          qIc1(i,j)  = qicen(1)