module Tree_layout: sig .. end
sig
end
type pos = {
x : float;
float
y : float;
module type S = sig .. end
module type TREE = sig .. end
Tree_layout.Make
module Make (G : TREE) : S with type t := G.t and type vertex := G.V.t
(
G
:
TREE
)
S
with type t := G.t and type vertex := G.V.t