Symbol Description Uses
a10 4



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