]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/tests/ng_commands.ma
The backward compatible management of aliases for NG is now fully completed.
[helm.git] / helm / software / matita / tests / ng_commands.ma
index d6f97499e10d582d9d119685f1edd472a5a91ffd..86226fb02204aaf3110869b082c4946aa8d36108 100644 (file)
@@ -16,35 +16,25 @@ include "nat/plus.ma".
 
 ndefinition thesis0: ∀A:Type.Type ≝ λA. A → A.
 
-alias id "thesis0" = "cic:/matita/tests/ng_commands/thesis0.def(0)".
-
 ndefinition thesis: ∀A:Type.Type ≝ λA. ?.
  napply (A → A);
 nqed.
 
-alias id "thesis" = "cic:/matita/tests/ng_commands/thesis.def(0)".
-
 ntheorem foo: ∀A:Type.thesis A.#A;#x;napply x;
 nqed.
 
-alias id "foo" = "cic:/matita/tests/ng_commands/foo.def(0)".
-
 ntheorem goo: ∀A:Type.A → A. #A; napply (foo ?);
 nqed.
 
-naxiom P: Prop.
+naxiom NP: Prop.
 
-alias id "P" = "cic:/matita/tests/ng_commands/P.decl".
-
-ndefinition Q: Prop ≝ P.
+ndefinition Q: Prop ≝ NP.
 
 nlet rec nzero (n:nat) : nat ≝
  match n with
   [ O ⇒ O
   | S m ⇒ nzero m].
 
-alias id "nzero" = "cic:/matita/tests/ng_commands/nzero.fix(0,0,0)".
-
 ntheorem nzero_ok: nzero (S (S O)) = O.
  napply (refl_eq ? O);
 nqed.