X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=helm%2FgTopLevel%2Fesempi%2Fsets.cic;fp=helm%2FgTopLevel%2Fesempi%2Fsets.cic;h=0000000000000000000000000000000000000000;hp=156e231a23669c30f6a0b5e1fdacbd458ddcc99f;hb=869549224eef6278a48c16ae27dd786376082b38;hpb=89262281b6e83bd2321150f81f1a0583645eb0c8 diff --git a/helm/gTopLevel/esempi/sets.cic b/helm/gTopLevel/esempi/sets.cic deleted file mode 100644 index 156e231a2..000000000 --- a/helm/gTopLevel/esempi/sets.cic +++ /dev/null @@ -1,15 +0,0 @@ -Open: -/Coq/Sets/Powerset_facts/Sets_as_an_algebra/Union_commutative.con - -We prove the conjunction again: - -alias Ensemble /Coq/Sets/Ensembles/Ensembles/Ensemble.con -alias Union /Coq/Sets/Ensembles/Ensembles/Union.ind#1/1 -alias Included /Coq/Sets/Ensembles/Ensembles/Included.con -alias and /Coq/Init/Logic/Conjunction/and.ind#1/1 - -The two parts of the conjunction can be proved in the same way. So we -can make a Cut: - -!V:Set.!C:(Ensemble V).!D:(Ensemble V).(Included V (Union V C D) -(Union V D C))