CALL WRITE_0D_L( upwindVorticity, INDEX_NONE,
& SadournyCoriolis, upwindVorticity, highOrderVorticity,
LOGICAL upwindVorticity
IF (upwindVorticity) THEN
upwindVorticity = .FALSE.