INTEGER ENUM_OS7MP
PARAMETER(ENUM_OS7MP=7)
ELSEIF (advectionScheme.EQ.ENUM_OS7MP ) THEN
ELSEIF (vertAdvecScheme.EQ.ENUM_OS7MP ) THEN
IF ( tempAdvScheme.EQ.ENUM_OS7MP .OR.
& saltAdvScheme.EQ.ENUM_OS7MP ) THEN
& ENUM_OS7MP,
CALL GAD_ADVSCHEME_SET( ENUM_OS7MP , 4, errCode, myThid )
& SEAICEadvSchArea.NE.ENUM_OS7MP )
& SEAICEadvSchHeff.NE.ENUM_OS7MP )
& SEAICEadvSchSnow.NE.ENUM_OS7MP )
& SEAICEadvSchSalt.NE.ENUM_OS7MP )
& ENUM_OS7MP