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