Module Float.Fraction_unsafe

module Fraction_unsafe: Fraction  with type t = Float.t

include S0

val one : t

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