val eq :
('a1, 'b1, 'c1) tag ->
('a2, 'b2, 'c2) tag ->
('a1 * 'b1 * 'c1, 'a2 * 'b2 * 'c2) CSig.eq optionval repr : ('a, 'b, 'c) tag -> stringtype any = | Any : ('a, 'b, 'c) tag -> any
val name : string -> any optionval dump : unit -> (int * string) list