Same_witness_exn_5.2-B
type ('a, 'b, 'c, 'd, 'e) t
val typename_of_t : 'a typename -> 'b typename -> 'c typename -> 'd typename -> 'e typename -> ('a, 'b, 'c, 'd, 'e) t typename