Flow.Ford_Fulkerson
module G : G_FORD_FULKERSON
module F : sig ... end
val maxflow : G.t -> G.V.t -> G.V.t -> (G.E.t -> F.t) * F.t