Lists, rationals, polynomials and intervals - Implementation (types and basic operations) : Rat.print

let print_rat = pr_rat Format.std_formatter