Added examples.

[helm.git] / helm / gTopLevel / esempi / conversion.cic

diff --git a/helm/gTopLevel/esempi/conversion.cic b/helm/gTopLevel/esempi/conversion.cic
new file mode 100644 (file)
index 0000000..3964f6f
--- /dev/null
+++ b/helm/gTopLevel/esempi/conversion.cic
@@ -0,0 +1,17 @@
+alias nat        /Coq/Init/Datatypes/nat.ind#1/1
+alias eqT        /Coq/Init/Logic_Type/eqT.ind#1/1
+alias eq         /Coq/Init/Logic/Equality/eq.ind#1/1
+alias refl_equal /Coq/Init/Logic/Equality/eq.ind#1/1/1
+alias eq_ind     /Coq/Init/Logic/Equality/eq_ind.con
+alias eq_ind_r   /Coq/Init/Logic/Logic_lemmas/eq_ind_r.con
+alias O          /Coq/Init/Datatypes/nat.ind#1/1/1
+alias S          /Coq/Init/Datatypes/nat.ind#1/1/2
+alias plus       /Coq/Init/Peano/plus.con
+alias mult       /Coq/Init/Peano/mult.con
+alias le         /Coq/Init/Peano/le.ind#1/1
+alias lt         /Coq/Init/Peano/lt.con
+alias not        /Coq/Init/Logic/not.con
+alias f_equal    /Coq/Init/Logic/Logic_lemmas/equality/f_equal.con
+
+!n:nat.(eq nat (mult (S (S O)) n) O)
+!n:nat.(eq nat (plus O n) (plus n O))