sig type graph_edge = string * string * string list * float list val load_graph : Physical_value.item -> string -> Top_util.Graph.graph_edge list end