X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Fformal_topology%2Fbasic_topologies_to_o-basic_topologies.ma;h=6b07dfeb0863a9c493d9b71d90bb42361054de7d;hb=3c257bf84769adf162510ed86a89872e3003629a;hp=58b75fb680ececa60755fcb2e77b7105b9245254;hpb=d2b59bd89f761a16a2dbc663f446b4f95c767b83;p=helm.git diff --git a/matita/matita/lib/formal_topology/basic_topologies_to_o-basic_topologies.ma b/matita/matita/lib/formal_topology/basic_topologies_to_o-basic_topologies.ma index 58b75fb68..6b07dfeb0 100644 --- a/matita/matita/lib/formal_topology/basic_topologies_to_o-basic_topologies.ma +++ b/matita/matita/lib/formal_topology/basic_topologies_to_o-basic_topologies.ma @@ -15,7 +15,7 @@ include "formal_topology/basic_topologies.ma". include "formal_topology/o-basic_topologies.ma". include "formal_topology/relations_to_o-algebra.ma". - +(* definition o_basic_topology_of_basic_topology: basic_topology → Obasic_topology. intros (b); constructor 1; [ apply (POW' b) | apply (A b) | apply (J b); @@ -89,3 +89,4 @@ theorem BTop_to_OBTop_full: full2 ?? BTop_to_OBTop. unfold image_coercion; cases Hg; whd; simplify; intro; simplify; qed. *) +