Symbol Description Uses
a10 4



File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 149 THSICE_SOLVE4TEMP
      _RL  a10, b10      ! coefficients in quadratic eqn for T1
./pkg/thsice/thsice_solve4temp.F 231 THSICE_SOLVE4TEMP
      a10 = rhoi*cpice *hi/(2. _d 0*dt) +
./pkg/thsice/thsice_solve4temp.F 291 THSICE_SOLVE4TEMP
         a1 = a10 - k12*df0dT / (k12-df0dT)
./pkg/thsice/thsice_solve4temp.F 301 THSICE_SOLVE4TEMP
            a1 = a10 + k12