& useMaykutSatVapPoly, SEAICE_mcPheeStepFunc,
useMaykutSatVapPoly = .FALSE.
& usePW79thermodynamics, useMaykutSatVapPoly,
IF ( useMaykutSatVapPoly ) THEN
CALL WRITE_0D_L ( useMaykutSatVapPoly, INDEX_NONE,