X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Fformal_topology%2Frelations_to_o-algebra.ma;h=8030e28f665139f76dfa44a738ff8788c17eca0a;hb=d9a1ff8259a7882caa0ffd27282838c00a34cab5;hp=bc5153d5db66532004203625260f99767955eea9;hpb=d2b59bd89f761a16a2dbc663f446b4f95c767b83;p=helm.git diff --git a/matita/matita/lib/formal_topology/relations_to_o-algebra.ma b/matita/matita/lib/formal_topology/relations_to_o-algebra.ma index bc5153d5d..8030e28f6 100644 --- a/matita/matita/lib/formal_topology/relations_to_o-algebra.ma +++ b/matita/matita/lib/formal_topology/relations_to_o-algebra.ma @@ -14,7 +14,7 @@ include "formal_topology/relations.ma". include "formal_topology/o-algebra.ma". - +(* definition POW': objs1 SET → OAlgebra. intro A; constructor 1; [ apply (Ω^A); @@ -238,4 +238,5 @@ change with (∀a1.(∃x:carr S. a1 ∈ f {(x):S} ∧ x ∈ a) → a1 ∈ f a); [ intros 2; change in f3 with (eq1 ? a1 a2); change with (a2 ∈ f* a); apply (. f3^-1‡#); assumption; | assumption ]]] -qed. \ No newline at end of file +qed. +*)