Containers.SetExtPolySourceSets with polymorphic values
type set_printer = {print_empty : string;Special text for empty sets
*)print_begin : string;Text before the first element
*)print_sep : string;Text between two elements
*)print_end : string;Text after the last element
*)}val print_gen :
('a -> string -> unit) ->
set_printer ->
('a -> 'b -> 'c) ->
'a ->
'b set ->
unitval print :
set_printer ->
(Stdlib.out_channel -> 'a -> 'b) ->
Stdlib.out_channel ->
'a set ->
unitval bprint :
set_printer ->
(Stdlib.Buffer.t -> 'a -> 'b) ->
Stdlib.Buffer.t ->
'a set ->
unitval fprint :
set_printer ->
(Stdlib.Format.formatter -> 'a -> 'b) ->
Stdlib.Format.formatter ->
'a set ->
unitMOPSA Print as set: lem1,...,elemn