IF ( tIter0 .NE. UNSET_I ) THEN
tIter0 = UNSET_I
mnc_def_imv(i) = UNSET_I
SEAICEadvSchArea = UNSET_I
SEAICEadvSchHeff = UNSET_I
SEAICEadvSchSnow = UNSET_I
SEAICEadvSchSalt = UNSET_I
SEAICEadvSchAge = UNSET_I
IF ( SEAICEadvSchArea .EQ. UNSET_I )
IF ( SEAICEadvSchHeff .EQ. UNSET_I )
IF ( SEAICEadvSchSnow .EQ. UNSET_I )
IF ( SEAICEadvSchSalt .EQ. UNSET_I )
IF ( SEAICEadvSchAge .EQ. UNSET_I )
tracerAdvScheme = UNSET_I
IF ( selectVortScheme.EQ.UNSET_I ) selectVortScheme = 2
IF ( tracerAdvScheme .NE. UNSET_I ) THEN
IF ( momForcingOutAB .EQ. UNSET_I ) THEN
IF ( tracForcingOutAB .EQ. UNSET_I ) THEN
IF ( monitorSelect.EQ.UNSET_I ) THEN
selectVortScheme = UNSET_I
momForcingOutAB = UNSET_I
tracForcingOutAB = UNSET_I
monitorSelect = UNSET_I
IF ( selectVortScheme.EQ.UNSET_I ) THEN
ELSEIF ( selectVortScheme.NE.UNSET_I ) THEN
INTEGER UNSET_I
PARAMETER ( UNSET_I = 123456789 )
misval_int(ii) = UNSET_I
missing_value_int(l) = UNSET_I
stat_region(k,l) = UNSET_I
misvalInt(n) = UNSET_I
IF ( missing_value_int(l) .NE. UNSET_I )
IF ( j.NE.UNSET_I .AND. j.GE.0 .AND. j.LE.nRegions ) THEN
ELSEIF ( j.NE.UNSET_I ) THEN
siobNstartdate1 = UNSET_I
siobNstartdate2 = UNSET_I
siobSstartdate1 = UNSET_I
siobSstartdate2 = UNSET_I
siobEstartdate1 = UNSET_I
siobEstartdate2 = UNSET_I
siobWstartdate1 = UNSET_I
siobWstartdate2 = UNSET_I
exf_iprec_obcs = UNSET_I
IF(siobNstartdate1.EQ.UNSET_I ) siobNstartdate1 = obcsNstartdate1
IF(siobNstartdate2.EQ.UNSET_I ) siobNstartdate2 = obcsNstartdate2
IF(siobSstartdate1.EQ.UNSET_I ) siobSstartdate1 = obcsSstartdate1
IF(siobSstartdate2.EQ.UNSET_I ) siobSstartdate2 = obcsSstartdate2
IF(siobEstartdate1.EQ.UNSET_I ) siobEstartdate1 = obcsEstartdate1
IF(siobEstartdate2.EQ.UNSET_I ) siobEstartdate2 = obcsEstartdate2
IF(siobWstartdate1.EQ.UNSET_I ) siobWstartdate1 = obcsWstartdate1
IF(siobWstartdate2.EQ.UNSET_I ) siobWstartdate2 = obcsWstartdate2
IF(exf_iprec_obcs .EQ. UNSET_I) exf_iprec_obcs = exf_iprec