Symbol Description Uses
b10 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 169 THSICE_SOLVE4TEMP
      b10 = -hi*
./pkg/thsice/thsice_solve4temp.F 210 THSICE_SOLVE4TEMP
         b1 = b10 - k12*(flx0-df0dT*Tsf) / (k12-df0dT)
./pkg/thsice/thsice_solve4temp.F 218 THSICE_SOLVE4TEMP
            b1 = b10          ! note b1 = b10 - k12*Tf0