Dose_algo.FlattenSourceinclude sig ... endval print_list :
Format.formatter ->
(Format.formatter -> 'a -> unit) ->
string ->
'a list ->
unitval print_set :
Format.formatter ->
(Format.formatter -> PSet.elt -> unit) ->
string ->
PSet.t ->
unit