& SEAICEusePicardAsPrecon,
IF ( SEAICEusePicardAsPrecon ) THEN
& .NOT.SEAICEusePicardAsPrecon .AND.
& .AND. .NOT.SEAICEusePicardAsPrecon ) THEN
& SEAICE_zetaMin, SEAICE_zetaMaxFac, SEAICEusePicardAsPrecon,
SEAICEusePicardAsPrecon = .FALSE.
IF ( SEAICEuseJFNK .AND. SEAICEusePicardAsPrecon .AND.
IF ( SEAICEuseJFNK .AND. .NOT. SEAICEusePicardAsPrecon )
IF ( SEAICEuseLSR .AND. .NOT. SEAICEusePicardAsPrecon )
CALL WRITE_0D_L ( SEAICEusePicardAsPrecon, INDEX_NONE,