Symbol Description Uses
aFrz 5


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 213 THSICE_CALC_THICKN 
      _RL c1Frz, c2Frz, aFrz, hFrz
./pkg/thsice/thsice_calc_thickn.F 258 THSICE_CALC_THICKN 
        aFrz = (c1Frz+c2Frz)/(hThickIce-hThinIce)
./pkg/thsice/thsice_calc_thickn.F 259 THSICE_CALC_THICKN 
        hFrz = hThinIce+c2Frz/aFrz
./pkg/thsice/thsice_calc_thickn.F 265 THSICE_CALC_THICKN 
        aFrz = -1. _d 0 /(hThickIce-hThinIce)
./pkg/thsice/thsice_calc_thickn.F 323 THSICE_CALC_THICKN 
         xxFrz = aFrz*(hi-hFrz)