since the moo content is not OK... we need an hack.

diff --git a/helm/matita/contribs/PREDICATIVE-TOPOLOGY/coa_props.ma b/helm/matita/contribs/PREDICATIVE-TOPOLOGY/coa_props.ma
index acbc2ecf1b1989fb3b7cbfa9137af18404b71cfe..47fd8ab6191797127778025c41375ecb923b5d71 100644 (file)
--- a/helm/matita/contribs/PREDICATIVE-TOPOLOGY/coa_props.ma
+++ b/helm/matita/contribs/PREDICATIVE-TOPOLOGY/coa_props.ma
@@ -16,7 +16,10 @@ set "baseuri" "cic:/matita/PREDICATIVE-TOPOLOGY/coa_props".
 
 include "coa_defs.ma".
 
-theorem zero_le: \forall (P:COA). \forall (p:Type_of_COA P). le ? (zero P) p.
+coercion Type_of_COA. (* this should be generated by the following line *)
+coercion coa. (* this should be inside coa_defs.moo but it isn't *)
+
+theorem zero_le: \forall (P:COA). \forall (p:P). le ? (zero P) p.