let
iter (f :
'
e
->
unit) (s :
'
e hashset) : unit =
Hashtbl
.iter (
fun
x _
->
f x) s