notation bug fix

[helm.git] / matita / matita / lib / lambda-delta / substitution / thin.ma

diff --git a/matita/matita/lib/lambda-delta/substitution/thin.ma b/matita/matita/lib/lambda-delta/substitution/thin.ma
index 03cc81b06bbb60eff18965fdaa8958b658713988..dd3d0ffa94b38761a775a486e88ba8cbf5c4b53d 100644 (file)
--- a/matita/matita/lib/lambda-delta/substitution/thin.ma
+++ b/matita/matita/lib/lambda-delta/substitution/thin.ma
@@ -18,8 +18,8 @@ inductive thin: lenv → nat → nat → lenv → Prop ≝
    | thin_thin: ∀L1,L2,I,V,e.
                 thin L1 0 e L2 → thin (L1. ♭I V) 0 (e + 1) L2
    | thin_skip: ∀L1,L2,I,V1,V2,d,e.
-                thin L1 d e L2 → [d,e]← L1 / V1 ≡ V2 → 
+                thin L1 d e L2 → L1 ⊢ ↓[d,e] V1 ≡ V2 →
                 thin (L1. ♭I V1) (d + 1) e (L2. ♭I V2)
 .
 
-interpretation "thinning" 'RThin L1 d e L2 = (thin L1 d e L2).
+interpretation "thinning" 'RSubst L1 d e L2 = (thin L1 d e L2).