(Program
  (Match
    (Paren
      (Float))
    (
      (Pattern
        (Float)
        (
          (Float)))
      (Pattern
        (Float)
        (
          (Float)))
      (Pattern
        (Float)
        (
          (Float)))))
  (Empty))