(Program
  (Module
    (Identifier))
  (Function
    (Empty)
    (Identifier)
    ([])
    (
      (Match
        ([])
        (Pattern
          (Identifier)
          (Call
            (Identifier)
            ([])
            (Empty))))
      (Match
        (
          (Identifier))
        (
          (Pattern
            (
              (Integer)
              (Integer))
            (
              (Call
                (Identifier)
                ([])
                (Empty))
              (Call
                (Identifier)
                ([])
                (Empty))
              (Pattern
                (Identifier)
                (Empty))))
          (DefaultPattern
            (
              (Call
                (Identifier)
                ([])
                (Empty))
              (Break
                (Empty)))))))))