module Float:sig
..end
typet =
float
val compare : t -> t -> int
val rand : t -> t
val cmp_float : ?epsilon_float:float -> unit -> float -> float -> bool
if the difference is less or equal to epsilon_float
module Infix:sig
..end
module InfixDot:sig
..end