(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)))))))))