X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Funfold%2Fldrops_ldrops.ma;h=7709561a29f7fbbc1b9371d5e7c90d563eb41a7d;hb=69644bb333b2862a5ff2ff434df8830e854e3385;hp=1bb40cb5d87f1c2518875eab58545e55ab66895f;hpb=eb918fc784eacd2094e3986ba321ef47690d9983;p=helm.git

diff --git a/matita/matita/contribs/lambda_delta/basic_2/unfold/ldrops_ldrops.ma b/matita/matita/contribs/lambda_delta/basic_2/unfold/ldrops_ldrops.ma
index 1bb40cb5d..7709561a2 100644
--- a/matita/matita/contribs/lambda_delta/basic_2/unfold/ldrops_ldrops.ma
+++ b/matita/matita/contribs/lambda_delta/basic_2/unfold/ldrops_ldrops.ma
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-include "Basic_2/unfold/ldrops_ldrop.ma".
+include "basic_2/unfold/ldrops_ldrop.ma".
 
 (* GENERIC LOCAL ENVIRONMENT SLICING ****************************************)
 
@@ -20,6 +20,6 @@ include "Basic_2/unfold/ldrops_ldrop.ma".
 
 (* Basic_1: was: drop1_trans *)
 theorem ldrops_trans: ∀L,L2,des2. ⇩*[des2] L ≡ L2 → ∀L1,des1. ⇩*[des1] L1 ≡ L →
-                      ⇩*[des2 @ des1] L1 ≡ L2.
+                      ⇩*[des2 @@ des1] L1 ≡ L2.
 #L #L2 #des2 #H elim H -L -L2 -des2 // /3 width=3/
 qed.