Symbol Description Uses
Tf sea-water freezing temperature [oC] (function of S) 19


File Line number Procedure Code
./pkg/thsice/thsice_calc_thickn.F 143 THSICE_CALC_THICKN 
      _RL  Tf
./pkg/thsice/thsice_calc_thickn.F 293 THSICE_CALC_THICKN 
          Tf      = tFrz(i,j)
./pkg/thsice/thsice_calc_thickn.F 371 THSICE_CALC_THICKN 
         Fbot = cpchr*(Tf-oceTs)*ustar
./pkg/thsice/thsice_calc_thickn.F 520 THSICE_CALC_THICKN 
         qbot =  -cpIce *Tf + Lfresh
./pkg/thsice/thsice_extend.F 159 THSICE_EXTEND 
          Tf      = tFrz(i,j)
./pkg/thsice/thsice_extend.F 172 THSICE_EXTEND 
     &             + cpIce *(Tmlt1-Tf) + Lfresh*(1. _d 0-Tmlt1/Tf)
./pkg/thsice/thsice_extend.F 173 THSICE_EXTEND 
          qicen(2)= -cpIce *Tf + Lfresh
./pkg/thsice/thsice_extend.F 99 THSICE_EXTEND 
      _RL Tf
./pkg/thsice/thsice_ini_vars.F 144 THSICE_INI_VARS 
         Tf = -1.70 _d 0
./pkg/thsice/thsice_ini_vars.F 151 THSICE_INI_VARS 
     &             + cpIce *(Tmlt1-Tf) + Lfresh*(1. _d 0-Tmlt1/Tf)
./pkg/thsice/thsice_ini_vars.F 152 THSICE_INI_VARS 
              Qice2(i,j,bi,bj) = -cpIce *Tf + Lfresh
./pkg/thsice/thsice_ini_vars.F 50 THSICE_INI_VARS 
      _RL Tf
./pkg/thsice/thsice_solve4temp.F 124 THSICE_SOLVE4TEMP 
      _RL Tf
./pkg/thsice/thsice_solve4temp.F 224 THSICE_SOLVE4TEMP 
          Tf      = tFrz(i,j)
./pkg/thsice/thsice_solve4temp.F 296 THSICE_SOLVE4TEMP 
     &      - k32 * (4. _d 0*dt*k32*Tf+rhoi*cpIce *hi*Tice(2))
./pkg/thsice/thsice_solve4temp.F 439 THSICE_SOLVE4TEMP 
      Tice(2) = (2. _d 0*dt*k32*(Tice(1)+2. _d 0*Tf)
./pkg/thsice/thsice_solve4temp.F 450 THSICE_SOLVE4TEMP 
      flxCnB(i,j) = 4. _d 0*kIce *(Tice(2)-Tf)/hi