LOGICAL atmPhys_stepSST
& atmPhys_stepSST
CALL WRITE_0D_L( atmPhys_stepSST, INDEX_NONE,
IF ( atmPhys_stepSST ) THEN
& atmPhys_stepSST,
atmPhys_stepSST = .FALSE.