fix for coercions

diff --git a/helm/matita/contribs/PREDICATIVE-TOPOLOGY/qd_defs.ma b/helm/matita/contribs/PREDICATIVE-TOPOLOGY/qd_defs.ma
index 3e59a68d18eb997cce5e3354855833a3b774831f..cbe4f567ae471d24a19e7816bc0fd53a89b072ae 100644 (file)
--- a/helm/matita/contribs/PREDICATIVE-TOPOLOGY/qd_defs.ma
+++ b/helm/matita/contribs/PREDICATIVE-TOPOLOGY/qd_defs.ma
@@ -25,5 +25,6 @@ record QD: Type \def {
 
 coercion qd.
 
+(* se togli il D da acin D a non ce la fa ancora *)
 inductive iall (D:QD) (P:D \to Prop) : Prop \def
-   | iall_intro: (\forall (a:D). acin D a \to P a) \to iall D P.
+   | iall_intro: (\forall a:D. acin D a \to P a) \to iall D P.