module A:sig..end
type('a, 'b)t =('a * 'b) list ref
val create : unit -> 'a list refval clear : 'a list ref -> unitval get_assoc : ('a * 'b) list ref -> 'a -> 'bval update_assoc : ('a * 'b) list ref -> 'a -> 'b -> unitval remove_assoc : ('a * 'b) list ref -> 'a -> unitval assoc_to_keys : ('a * 'b) list ref -> 'a listval assoc_to_list : ('a * 'b) list ref -> 'b listval assoc_size : 'a list ref -> intval filter : ('a, 'b) t -> ('a * 'b -> bool) -> ('a * 'b) list