Module Odoc_utils.Tree

type 'a tree = {
  1. node : 'a;
  2. children : 'a forest;
}
and 'a forest = 'a tree list
val leaf : 'a -> 'a tree
module type S = sig ... end
include S with type 'a t = 'a tree
type 'a t = 'a tree
val fold_left : f:('acc -> 'a -> 'acc) -> 'acc -> 'a t -> 'acc
val iter : f:('a -> unit) -> 'a t -> unit
val map : f:('a -> 'b) -> 'a t -> 'b t
val to_json : ('a -> Json.json) -> 'a t -> Json.json
module Forest : sig ... end