X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2Fesempi%2Fapply.cic;fp=helm%2FgTopLevel%2Fesempi%2Fapply.cic;h=0000000000000000000000000000000000000000;hb=c7514aaa249a96c5fdd39b1123fbdb38d92f20b6;hp=902ae2fbb0b9dbdc0ca1b3489db0b6f7a6448e86;hpb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;p=helm.git diff --git a/helm/gTopLevel/esempi/apply.cic b/helm/gTopLevel/esempi/apply.cic deleted file mode 100644 index 902ae2fbb..000000000 --- a/helm/gTopLevel/esempi/apply.cic +++ /dev/null @@ -1,21 +0,0 @@ -alias nat /Coq/Init/Datatypes/nat.ind#1/1 -alias eq /Coq/Init/Logic/eq.ind#1/1 -alias eq_ind /Coq/Init/Logic/eq_ind.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 -(eq nat (\x:nat.\y:nat.O O O) (\x:nat.\y:nat.O O O)) -/Coq/Init/Logic/f_equal2.con -/Coq/Init/Logic/eq.ind#1/1/1 - -(* -(le O (S O)) -/Coq/Arith/Gt/gt_S_le.con - -(not (lt O (plus O O))) -/Coq/Arith/Lt/lt_n_n.con -*)