(Program
  (Statements
  {-(TextElement)-}
    (TextElement)
  { (TextElement)
  ->(TextElement) }
    (TextElement)))