Module Mlpost.Tree.Simple


module Simple: sig .. end

type t 
val leaf : Box.t -> t
val node : ?ls:Num.t ->
?cs:Num.t ->
?arrow_style:Tree.arrow_style ->
?edge_style:Tree.edge_style ->
?stroke:Color.t ->
?pen:Pen.t ->
?sep:Num.t ->
Box.t -> t list -> t
val bin : ?ls:Num.t ->
?cs:Num.t ->
?arrow_style:Tree.arrow_style ->
?edge_style:Tree.edge_style ->
?stroke:Color.t ->
?pen:Pen.t ->
?sep:Num.t ->
Box.t ->
t -> t -> t
val to_box : t -> Box.t
val draw : ?debug:bool -> t -> Command.t