(Program
  (If
    (Send
    { (Identifier)
    ->(Identifier) })
    (Statements
    {+(Send
      {+(Identifier)+})+})
  { (Empty)
  ->(If
    {+(Send
      {+(Identifier)+})+}
    {+(Statements
      {+(Send
        {+(Identifier)+})+})+}
    {+(Send
      {+(Identifier)+})+}) })
{-(If
  {-(Send
    {-(Identifier)-})-}
  {-(Statements)-}
  {-(Empty)-})-})