type node_kind = [ `Tree | `Text ]
val equal : [ `Tree ] node -> [ `Tree ] node -> bool
val compare : [ `Tree ] node -> [ `Tree ] node -> int
type node_kind = [ `Tree | `Text ]
val equal : [ `Tree ] node -> [ `Tree ] node -> bool
val compare : [ `Tree ] node -> [ `Tree ] node -> int