Symbol Description Uses
cpchr 3



File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 114 THSICE_CALC_THICKN
      _RL  ustar, cpchr
./pkg/thsice/thsice_calc_thickn.F 155 THSICE_CALC_THICKN
         cpchr =cpwater*rhosw*transcoef 
./pkg/thsice/thsice_calc_thickn.F 156 THSICE_CALC_THICKN
         Fbot = cpchr*(Tf-oceTs)*ustar  ! < 0