Как определить взвешенный график?

Question

A graph in OCaml can be defined in this way 

type 'a graph = Gr of ('a * 'a) list;; 
let myGraph = Gr[(1,2);(1,3);(1,4);(2,6);(3,5);(4,6);(6,5);(6,7);(5,4)];; 

Но как я могу это сделать, если я хочу прикрепить грузы к краям?

Однако каков наилучший способ представления графика?

Answer 1

Почему бы не просто добавить его?

type weight = float (* or whatever *) 
type 'a graph = Gr of ('a * 'a * weight) list