& SEAICE_mcPheeStepFunc, SEAICE_gamma_t, SEAICE_gamma_t_frz,
SEAICE_gamma_t = UNSET_RL
_RL SEAICE_gamma_t, SEAICE_gamma_t_frz, SEAICE_availHeatFracFrz
IF ( SEAICE_gamma_t .NE. UNSET_RL .AND.
SEAICE_frazilFrac = SEAICE_deltaTtherm/SEAICE_gamma_t
IF ( SEAICE_gamma_t .NE. UNSET_RL ) THEN
SEAICE_availHeatFrac = SEAICE_deltaTtherm/SEAICE_gamma_t
IF ( SEAICE_gamma_t .EQ. UNSET_RL ) THEN