module Float_robust_compare:sig
..end
val epsilon : float
typerobustly_comparable =
float
val (>=.) : float -> float -> bool
val (<=.) : float -> float -> bool
val (=.) : float -> float -> bool
val (>.) : float -> float -> bool
val (<.) : float -> float -> bool
val (<>.) : float -> float -> bool