sig
type ('a, 'b) t
val typerep_of_t :
'a Std_internal.Typerep.t ->
'b Std_internal.Typerep.t -> ('a, 'b) t Std_internal.Typerep.t
val typename_of_t : 'a Typename.t -> 'b Typename.t -> ('a, 'b) t Typename.t
val compute : 'a X.t -> 'b X.t -> ('a, 'b) Type_generic_intf.M.S2.t X.t
end