INTEGER SEAICEadvSchSnow
& SEAICEadvSchSnow,
I GAD_SNOW, SEAICEadvSchSnow,
& SEAICEadvSchSnow.NE.ENUM_UPWIND_1RST .AND.
& SEAICEadvSchSnow.NE.ENUM_CENTERED_2ND .AND.
& SEAICEadvSchSnow.NE.ENUM_DST2 .AND.
& SEAICEadvSchSnow.NE.ENUM_FLUX_LIMIT .AND.
& SEAICEadvSchSnow.NE.ENUM_DST3 .AND.
& SEAICEadvSchSnow.NE.ENUM_DST3_FLUX_LIMIT .AND.
& SEAICEadvSchSnow.NE.ENUM_OS7MP )
& ' SEAICEadvSchSnow = ', SEAICEadvSchSnow
& SEAICEadvSchSnow.NE.ENUM_CENTERED_2ND
& SEAICEadvSchHeff, SEAICEadvSchSnow,
SEAICEadvSchSnow = UNSET_I
IF ( SEAICEadvSchSnow .EQ. UNSET_I )
& SEAICEadvSchSnow = SEAICEadvSchHeff
&CALL WRITE_0D_I ( SEAICEadvSchSnow, INDEX_NONE,