sig
type loopable
type 'a t
val empty : 'a Looping.LoopingMap.t
val add :
'a Looping.LoopingMap.t ->
key:Looping.LoopingMap.loopable -> data:'a -> 'a Looping.LoopingMap.t
val find :
'a Looping.LoopingMap.t -> key:Looping.LoopingMap.loopable -> 'a option
end