X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Flambda-delta%2Fsubstitution%2Fthin.ma;h=ab1c5f2717e472a25108c32dc7abc987c9fdd83c;hb=861d99cbe515be1a8e6ca204c2cafa40ccdec8a3;hp=00e52947de0b7fef67eaddd4e8d7b6772fd3fbe5;hpb=1abd18f614b6691547662cc8608f259233b246c7;p=helm.git

diff --git a/matita/matita/lib/lambda-delta/substitution/thin.ma b/matita/matita/lib/lambda-delta/substitution/thin.ma
index 00e52947d..ab1c5f271 100644
--- a/matita/matita/lib/lambda-delta/substitution/thin.ma
+++ b/matita/matita/lib/lambda-delta/substitution/thin.ma
@@ -32,4 +32,4 @@ axiom thin_conf_ge: ∀d1,e1,L,L1. ↓[d1,e1] L ≡ L1 →
 axiom thin_conf_lt: ∀d1,e1,L,L1. ↓[d1,e1] L ≡ L1 →
                     ∀e2,K2,I,V2. ↓[0,e2] L ≡ K2. ♭I V2 →
                     e2 < d1 → let d ≝ d1 - e2 - 1 in
-                    ∃K1,V1. ↓[0,e2] L1 ≡ K1. ♭I V1 ∧ ↓[d,e1] K2 ≡ K1 ∧ ↑[d,e1] V1 ≡ V2.
+                    ∃∃K1,V1. ↓[0,e2] L1 ≡ K1. ♭I V1 & ↓[d,e1] K2 ≡ K1 & ↑[d,e1] V1 ≡ V2.