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