Module Map.Poly.Tree

module Tree: sig .. end

type ('k, 'v) t = ('k, 'v, Comparator.Poly.comparator) Map.Poly.tree 

include Creators_and_accessors

val t_of_sexp : (Sexplib.Sexp.t -> 'k) ->
       (Sexplib.Sexp.t -> 'v) -> Sexplib.Sexp.t -> ('k, 'v) t

val sexp_of_t : ('k -> Sexplib.Sexp.t) ->
       ('v -> Sexplib.Sexp.t) -> ('k, 'v) t -> Sexplib.Sexp.t