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 t ‑> 'b t ‑> ('a, 'b) t t