let
replace info e i =
Hashtbl
.replace info (edge_key e) i