PROC P ()
  INT n:
  SEQ
    n := 2
    CASE n    -- with ELSE
      INT x:
      1, 2
        x := n
      3
        SKIP
      4, 5, 6, 7, 8
        SKIP
      ELSE
        SKIP
    CASE n    -- without ELSE
      1
        SKIP
      2
        SKIP
: