Symbol Description Uses
qh2 qice*h for layers 1 and 2 6


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 197 THSICE_CALC_THICKN 
      _RL  qh1, qh2
./pkg/thsice/thsice_calc_thickn.F 965 THSICE_CALC_THICKN 
            qh2 = hlyr*qicen(i,j,2)
./pkg/thsice/thsice_calc_thickn.F 967 THSICE_CALC_THICKN 
            qh1 = qhtot - qh2
./pkg/thsice/thsice_reshape_layers.F 49 THSICE_RESHAPE_LAYERS 
      _RL  qh1, qh2
./pkg/thsice/thsice_reshape_layers.F 63 THSICE_RESHAPE_LAYERS 
            qh2 = hlyr*qicen(2)
./pkg/thsice/thsice_reshape_layers.F 65 THSICE_RESHAPE_LAYERS 
            qh1 = qhtot - qh2