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=1696761e4b8576e8ed81caa905fd108717019226;hpb=5325734bc2e4927ed7ec146e35a6f0f2b49f50c1 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) }