module Benchmark: functor (S : Reins.Sets.GenSetSig with type 'a result = 'a) -> sig .. end
functor (
S
:
Reins.Sets.GenSetSig
with type 'a result = 'a
) ->
sig
end
Sets.GenSetSig with type 'a result = 'a
val benchmark : ((S.elt, Dug.Id.t) generator, (S.elt, Dug.Id.t) mutator, (S.elt, Dug.Id.t) observer) Reins.Dug.t -> float
((S.elt, Dug.Id.t) generator, (S.elt, Dug.Id.t) mutator, (S.elt, Dug.Id.t) observer) Reins.Dug.t -> float