X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2Fesempi%2Fapply.cic;h=902ae2fbb0b9dbdc0ca1b3489db0b6f7a6448e86;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=fb27e1693c67f0affa0fe88224545110cfd5bc41;hpb=fde1a6daa3aaa72c5c7536f4d2c65a3873b1c1bc;p=helm.git diff --git a/helm/gTopLevel/esempi/apply.cic b/helm/gTopLevel/esempi/apply.cic index fb27e1693..902ae2fbb 100644 --- a/helm/gTopLevel/esempi/apply.cic +++ b/helm/gTopLevel/esempi/apply.cic @@ -1,6 +1,6 @@ alias nat /Coq/Init/Datatypes/nat.ind#1/1 -alias eq /Coq/Init/Logic/Equality/eq.ind#1/1 -alias eq_ind /Coq/Init/Logic/Equality/eq_ind.con +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 @@ -10,7 +10,7 @@ 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/Equality/eq.ind#1/1/1 +/Coq/Init/Logic/eq.ind#1/1/1 (* (le O (S O))