Symbol Description Uses
b10 coefficients in quadratic eqn for T1 4



File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 167 THSICE_SOLVE4TEMP
      _RL  a10, b10
./pkg/thsice/thsice_solve4temp.F 293 THSICE_SOLVE4TEMP
      b10 = -hi*
./pkg/thsice/thsice_solve4temp.F 368 THSICE_SOLVE4TEMP
         b1 = b10 - k12*(flx0-df0dT*Tsf) / (k12-df0dT)
./pkg/thsice/thsice_solve4temp.F 379 THSICE_SOLVE4TEMP
            b1 = b10