module type S3 = sig .. end
sig
end
type ('a, 'b, 'c) t
('a, 'b, 'c)
include Typerepable.S3
val compute : 'a X.t -> 'b X.t -> 'c X.t -> ('a, 'b, 'c) t X.t
'a X.t -> 'b X.t -> 'c X.t -> ('a, 'b, 'c) t X.t