(**************************************************************************)
-(* ___ *)
+(* ___ *)
(* ||M|| *)
(* ||A|| A project by Andrea Asperti *)
(* ||T|| *)
(**************************************************************************)
set "baseuri" "cic:/matita/tests/elim".
+include "coq.ma".
inductive stupidtype: Set \def
| Base : stupidtype