let
default_edge_attributes _ =
let
attrib = []
in
let
attrib = (
`
Fontsize
10)::attrib
in
attrib