module type S5 =sig
..end
type ('a, 'b, 'c, 'd, 'e)
t
val typename_of_t : 'a Typename.typename ->
'b Typename.typename ->
'c Typename.typename ->
'd Typename.typename ->
'e Typename.typename -> ('a, 'b, 'c, 'd, 'e) t Typename.typename