INTEGER ENUM_DST2
PARAMETER(ENUM_DST2=20)
& .OR. advectionScheme.EQ.ENUM_DST2 ) THEN
& .OR. vertAdvecScheme.EQ.ENUM_DST2 ) THEN
IF ( advectionScheme.EQ.ENUM_DST2 ) rLimit = 1. _d 0
IF ( advectionScheme.EQ.ENUM_DST2 ) xLimit = 1. _d 0
IF ( advectionScheme.EQ.ENUM_DST2 ) yLimit = 1. _d 0
CALL GAD_ADVSCHEME_SET( ENUM_DST2 , 1, errCode, myThid )
& SEAICEadvSchArea.NE.ENUM_DST2 .AND.
& SEAICEadvSchHeff.NE.ENUM_DST2 .AND.
& SEAICEadvSchSnow.NE.ENUM_DST2 .AND.
& SEAICEadvSchSalt.NE.ENUM_DST2 .AND.
& ENUM_UPWIND_1RST, ENUM_CENTERED_2ND, ENUM_DST2,