Prim.Make
G : G
W : sig ... end
val spanningtree : G.t -> G.E.t list
val spanningtree_from : G.t -> G.V.t -> G.E.t list