Module Type.Couple


module Couple: POLYMORPHIC2  with type ('a, 'b) poly = 'a * 'b

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