ROSCOQ.shim.Haskell.ExtrHaskellQ

Require Export QArith.

Require Import ExtrHaskellZInteger.

Although the definition of Haskell's Ratio is quite similar to Coq.QArith.QArith_base.Q , the haskell version has useful utilities like conversion to and from floats

Extract Inductive Q ⇒ "(Data.Ratio.Ratio Prelude.Integer)" ["(\x y -> (Data.Ratio.%) x y)"]
"(\fp qn -> fp (Data.Ratio.numerator qn) (Data.Ratio.denominator qn))".