(**************************************************************************)
-(* ___ *)
+(* ___ *)
(* ||M|| *)
(* ||A|| A project by Andrea Asperti *)
(* ||T|| *)
(**************************************************************************)
set "baseuri" "cic:/matita/tests/cut".
+include "legacy/coq.ma".
alias num (instance 0) = "natural number".
-alias symbol "eq" (instance 0) = "leibnitz's equality".
+alias symbol "eq" (instance 0) = "Coq's leibnitz's equality".
theorem stupid: 3 = 3.
- cut 3 = 3.
+ cut (3 = 3).
assumption.
reflexivity.
- qed.
-
\ No newline at end of file
+qed.
+