sig
  type t
  type edge
  val empty : unit -> Gmap.E_DST.t
  val add_edge_e : Gmap.E_DST.t -> Gmap.E_DST.edge -> Gmap.E_DST.t
end