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