LOGICAL SEAICEuseFREEDRIFTswitchInAd, SEAICEuseFREEDRIFTinFwdMode
& SEAICEuseFREEDRIFTswitchInAd, SEAICEuseFREEDRIFTinFwdMode,
IF ( SEAICEuseFREEDRIFTswitchInAd ) THEN
CALL WRITE_0D_L( SEAICEuseFREEDRIFTswitchInAd, INDEX_NONE,
IF ( SEAICEuseFREEDRIFTswitchInAd .AND. .NOT.useSEAICE ) THEN
SEAICEuseFREEDRIFTswitchInAd = .FALSE.
& SEAICEuseFREEDRIFTswitchInAd, SEAICEuseDYNAMICSswitchInAd