(Program
  (While
    (Identifier)
  {+(Identifier)+})
{-(Modifier While
    (Identifier)
    (Identifier))-})