Term
exception TermTodo
module type S = sig ... end
module type InputS = sig ... end
module Make (X : InputS) : S with type t = X.t