module Edge_Dict:sig
..end
type 'a
t
val set : 'a t ->
Region_analysis_sig.Node.node Region_analysis_sig.edge -> 'a -> unit
val get : 'a t ->
Region_analysis_sig.Node.node Region_analysis_sig.edge -> 'a
val create : unit -> 'a t
val iter : 'a t ->
(Region_analysis_sig.Node.node Region_analysis_sig.edge -> 'a -> unit) ->
unit