MODULE main
VAR
  x : boolean;
  e : boolean;
ASSIGN
  init (x) := FALSE;
  next (x) := case e : !x; TRUE : x; esac;
SPEC
  AG !x