module Make4: functor (X : Named_intf.S4) -> S4 with type ('a, 'b, 'c, 'd) t := ('a, 'b, 'c, 'd) X.t
functor (
X
:
Named_intf.S4
) ->
S4
with type ('a, 'b, 'c, 'd) t := ('a, 'b, 'c, 'd) X.t
type ('a, 'b, 'c, 'd) t
('a, 'b, 'c, 'd)
val typename_of_t : 'a Typename.typename -> 'b Typename.typename -> 'c Typename.typename -> 'd Typename.typename -> ('a, 'b, 'c, 'd) t Typename.typename
'a Typename.typename -> 'b Typename.typename -> 'c Typename.typename -> 'd Typename.typename -> ('a, 'b, 'c, 'd) t Typename.typename