type t =
A of int * t * t
| B of int list
| C of option t
module Map = struct
module T = Camlp4Filters.GenerateMap.Generated
end