X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=helm%2FgTopLevel%2Fesempi%2Fand_implies_or.cic;fp=helm%2FgTopLevel%2Fesempi%2Fand_implies_or.cic;h=0000000000000000000000000000000000000000;hp=c47bf76b63cdfb04bc8e77296f48ac46a4db3a47;hb=869549224eef6278a48c16ae27dd786376082b38;hpb=89262281b6e83bd2321150f81f1a0583645eb0c8

diff --git a/helm/gTopLevel/esempi/and_implies_or.cic b/helm/gTopLevel/esempi/and_implies_or.cic
deleted file mode 100644
index c47bf76b6..000000000
--- a/helm/gTopLevel/esempi/and_implies_or.cic
+++ /dev/null
@@ -1,11 +0,0 @@
-alias and  /Coq/Init/Logic/Conjunction/and.ind#1/1
-alias conj /Coq/Init/Logic/Conjunction/and.ind#1/1/1
-
-alias or        /Coq/Init/Logic/Disjunction/or.ind#1/1
-alias or_introl /Coq/Init/Logic/Disjunction/or.ind#1/1/1
-alias or_intror /Coq/Init/Logic/Disjunction/or.ind#1/1/2
-
-\A:Prop.
-\B:Prop.
-\H:(and A B).
- Case (H : and ; (or A B)) { \a:A.\b:B.(or_introl A B a) }