{-(Program
  (Module
    (Identifier))
  (Function
    (Identifier)
    (Args)
    (Select
      (Case
        (Other "receive_statement"
          (Other "expression_list"
            (Identifier))
          (Operator
            (Identifier))))
      (FunctionCall
        (Identifier)
        (Identifier))
      (Case
        (Send
          (Identifier)
          (Identifier)))
      (FunctionCall
        (Identifier)
        (NumberLiteral))
      (Case
        (Other "receive_statement"
          (Operator
            (FunctionCall
              (SubscriptAccess
                (Identifier)
                (Identifier))
              (NumberLiteral)))))
      (FunctionCall
        (Identifier)
        (NumberLiteral))
      (Case)
      (Return))))-}