Module type Float.Fraction

module type Fraction = sig .. end

include S0

val one : t

val random : ?rng:Core.Std.Random.State.t -> unit -> t