X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Fbasics%2Frussell.ma;h=0769ca59fa2f82db1ca3ab2d012bcce9448d5aa3;hb=a65c5b3337075672736b1583b8519ff14bb16976;hp=059e024f9a4c9b73d7a711b60d7bab00082fba2a;hpb=a591f77721b3d4fd83afe222aa7cb0a7dbcc994e;p=helm.git

diff --git a/matita/matita/lib/basics/russell.ma b/matita/matita/lib/basics/russell.ma
index 059e024f9..0769ca59f 100644
--- a/matita/matita/lib/basics/russell.ma
+++ b/matita/matita/lib/basics/russell.ma
@@ -12,5 +12,5 @@
 include "basics/jmeq.ma".
 include "basics/types.ma".
 
-coercion inject nocomposites: ∀A.∀P:A → Type[0].∀a.∀p:P a.Σx:A.P x ≝ λA,P,a,p. mk_Sig … a p on a:? to Σx:?.?.
-coercion eject nocomposites: ∀A.∀P:A → Type[0].∀c:Σx:A.P x.A ≝ λA,P,c. pi1 … c on _c:Σx:?.? to ?.
+coercion inject nocomposites: ∀A.∀P:A → Prop.∀a.∀p:P a.Sig A P ≝ mk_Sig on a:? to Sig ??.
+coercion eject nocomposites: ∀A.∀P:A → Prop.∀c:Sig A P.A ≝ pi1 on _c:Sig ?? to ?.