module Float_robust_compare: sig .. end
sig
end
module type S = sig .. end
module Make (T : sigval epsilon : floatend) : S
(
T
:
val epsilon : float
float
)
S