Section S. Variable A : Prop. Theorem trivial : A -> A. Proof. Exact [a:A]a. Qed. End S.
Coq < Print Cooked trivial. trivial = [A:Prop; a:A]a : (A:Prop)A->A