{-(Program
  (Until
    (Negate
      (Identifier))
    (Identifier)))-}