let edge_key e = (VL.hash (edge_src e)), (VL.hash (edge_dst e))