Symbol Description Uses
hlyr individual ice layer thickness (m) 12


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 101 THSICE_CALC_THICKN 
      _RL  hlyr          ! individual ice layer thickness (m)
./pkg/thsice/thsice_calc_thickn.F 223 THSICE_CALC_THICKN 
      hlyr = hi / rnlyr
./pkg/thsice/thsice_calc_thickn.F 225 THSICE_CALC_THICKN 
         hnew(k) = hlyr
./pkg/thsice/thsice_calc_thickn.F 471 THSICE_CALC_THICKN 
       hlyr = hi/rnlyr
./pkg/thsice/thsice_calc_thickn.F 474 THSICE_CALC_THICKN 
     I                            hlyr, hnew, myThid )
./pkg/thsice/thsice_reshape_layers.F 11 THSICE_RESHAPE_LAYERS 
     I                                 hlyr, hnew, myThid )
./pkg/thsice/thsice_reshape_layers.F 38 THSICE_RESHAPE_LAYERS 
      _RL  hlyr
./pkg/thsice/thsice_reshape_layers.F 57 THSICE_RESHAPE_LAYERS 
         f1 = (hnew(1)-hlyr)/hlyr
./pkg/thsice/thsice_reshape_layers.F 63 THSICE_RESHAPE_LAYERS 
            qh2 = hlyr*qicen(2)
./pkg/thsice/thsice_reshape_layers.F 66 THSICE_RESHAPE_LAYERS 
            qicen(1) = qh1/hlyr
./pkg/thsice/thsice_reshape_layers.F 70 THSICE_RESHAPE_LAYERS 
         f1 = hnew(1)/hlyr