sig   type ('a, 'b) poly   val instantiate :     'a Type.t -> 'b Type.t -> ('a, 'b) Type.Polymorphic2.poly Type.t * bool   val is_instance_of : 'a Type.t -> bool   val get_instance :     ('a, 'b) Type.Polymorphic2.poly Type.t -> 'a Type.t * 'b Type.t end