]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/contribs/PREDICATIVE-TOPOLOGY/coa_props.ma
__ files are removed
[helm.git] / helm / matita / contribs / PREDICATIVE-TOPOLOGY / coa_props.ma
index a25f8c79a1abc8e51c70408028f0186070204513..6c004073e7390e4c2fe172cb105316be13911763 100644 (file)
@@ -16,4 +16,14 @@ set "baseuri" "cic:/matita/PREDICATIVE-TOPOLOGY/coa_props".
 
 include "coa_defs.ma".
 
-theorem zero_le: \forall (P:COA). \forall (p:P). le ? (zero P) p.
+inductive True:Prop \def T:True.
+
+theorem zero_le: 
+  \forall (P:COA). \forall (p:P). (le ? (zero P) p) \to True.
+  intros.
+  exact T.
+qed.
+
+  
+  
+