module type S = sig .. end
sig
end
val robust_comparison_tolerance : float
float
include Robustly_comparable.S