open Graph

val clone_nodes: 'a graph -> 'b graph
val gmap: 'a graph -> ('a -> 'b) -> 'b graph
val add_arc: int graph -> id -> id -> int -> int graph
val sub_arc: int graph -> id -> id -> int -> int graph
val clearNull: int graph -> int graph
val maxCapaGraph: int graph -> int
val testGraphSanity: int graph -> int graph