module Float: sig .. end
sig
end
type t = float
float
val compare : float -> float -> int
float -> float -> int
val to_string : float -> string
float -> string
val of_string : string -> float option
string -> float option