module type WEIGHT = sig .. end
sig
end
type edge
type t
val weight : edge -> t
edge -> t
val compare : t -> t -> int
t -> t -> int
val add : t -> t -> t
t -> t -> t
val zero : t
t
Sig.WEIGHT.add