module PropList: sig end
sig end
type t
type 'a tag
'a
val empty : unit -> t
unit -> t
val make_new_tag : 'a -> 'a tag
'a -> 'a tag
val put : 'a tag -> 'a -> t -> unit
'a tag -> 'a -> t -> unit
val get : 'a tag -> t -> 'a
'a tag -> t -> 'a
val mem : 'a tag -> t -> bool
'a tag -> t -> bool