INTEGER ENUM_UPWIND_1RST
PARAMETER(ENUM_UPWIND_1RST=1)
IF ( advectionScheme.EQ.ENUM_UPWIND_1RST
IF ( vertAdvecScheme.EQ.ENUM_UPWIND_1RST
ELSEIF ( advectionScheme.EQ.ENUM_UPWIND_1RST
ELSEIF ( vertAdvecScheme.EQ.ENUM_UPWIND_1RST
CALL GAD_ADVSCHEME_SET( ENUM_UPWIND_1RST , 1, errCode, myThid )
& SEAICEadvSchArea.NE.ENUM_UPWIND_1RST .AND.
& SEAICEadvSchHeff.NE.ENUM_UPWIND_1RST .AND.
& SEAICEadvSchSnow.NE.ENUM_UPWIND_1RST .AND.
& SEAICEadvSchSalt.NE.ENUM_UPWIND_1RST .AND.
& ENUM_UPWIND_1RST, ENUM_CENTERED_2ND, ENUM_DST2,