& SEAICEwriteState,
IF (SEAICEwriteState) THEN
& SEAICEwriteState, SEAICEuseEVPpickup,
SEAICEwriteState = .FALSE.
CALL WRITE_0D_L ( SEAICEwriteState, INDEX_NONE,