module Variant: sig .. end
sig
end
type 'constructor t = {
'constructor
name :string;
string
rank :int;
int
constructor :'constructor;