val pretty : Stdlib.Format.formatter -> tag -> unitval singleton : 'a -> 'a tval apply : tag -> ('a list -> 'a) -> 'a t -> 'a tval union : ('a -> 'a -> 'a) -> 'a t -> 'a t -> 'a tval merge :
left:('a -> 'c) ->
both:('a -> 'b -> 'c) ->
right:('b -> 'c) ->
'a t ->
'b t ->
'c tval merge_all : ('a list -> 'a) -> 'a t list -> 'a tval unmark : ('a list -> 'a) -> 'a t -> 'a tval map : ('a -> 'b) -> 'a t -> 'b tval iter : (tag list -> 'a -> unit) -> 'a t -> unitval fold : (tag list -> 'a -> 'b -> 'b) -> 'a t -> 'b -> 'bval exists : ('a -> bool) -> 'a t -> boolval for_all : ('a -> bool) -> 'a t -> boolval filter : ('a -> bool) -> 'a t -> 'a t