IF ( .NOT.staggerTimeStep .OR. .NOT.useMultiDimAdvec ) THEN
CALL WRITE_0D_L( useMultiDimAdvec, INDEX_NONE,
& multiDimAdvection, useMultiDimAdvec, forcing_In_AB,
LOGICAL useMultiDimAdvec
useMultiDimAdvec = .TRUE.
useMultiDimAdvec = .FALSE.
useMultiDimAdvec = useMultiDimAdvec.OR.tempMultiDimAdvec
useMultiDimAdvec = useMultiDimAdvec.OR.saltMultiDimAdvec
IF ( staggerTimeStep .AND. useMultiDimAdvec) THEN
& .AND. useMultiDimAdvec