Module Graph.Gml
type value=|Int of int|Float of float|String of string|List of value_listand value_list= (string * value) list
module type G = sig ... endGraph.Gmltype value = | Int of int |
| Float of float |
| String of string |
| List of value_list |
and value_list = (string * value) listmodule type G = sig ... end