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=5bd913e725896f432fcc81580636a19b7ebd6229;hb=3ef089a4c58fbe429dd539af6215991ecbe11ee2;hpb=1c7fb836e2af4f2f3d18afd0396701f2094265ff

diff --git a/helm/gTopLevel/esempi/sets.cic b/helm/gTopLevel/esempi/sets.cic
deleted file mode 100644
index 5bd913e72..000000000
--- a/helm/gTopLevel/esempi/sets.cic
+++ /dev/null
@@ -1,17 +0,0 @@
-Open:
-/Coq/Sets/Powerset_facts/Union_commutative.con
-
-We prove the conjunction again:
-
-alias U /Coq/Sets/Ensembles/Ensembles/U.var
-alias V /Coq/Sets/Powerset_facts/Sets_as_an_algebra/U.var
-alias Ensemble /Coq/Sets/Ensembles/Ensemble.con
-alias Union    /Coq/Sets/Ensembles/Union.ind#1/1
-alias Included /Coq/Sets/Ensembles/Included.con
-alias and      /Coq/Init/Logic/and.ind#1/1
-
-The two parts of the conjunction can be proved in the same way. So we
-can make a Cut:
-
-!C:Ensemble{U:=V}.!D:Ensemble{U:=V}.
- (Included{U:=V} (Union{U:=V} C D) (Union{U:=V} D C))