Module Image.Fraction

type t = int * int
val min : t -> t -> t