cicInspect: now we can choose not to count the Cic.Implicit constructors

[helm.git] / helm / software / matita / contribs / LAMBDA-TYPES / LambdaDelta-1 / getl / drop.ma

diff --git a/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/getl/drop.ma b/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/getl/drop.ma
index 47d5168a48be6a6b773f0e0264fca97f58661f4b..507560f8857fa0c8fc1929d3db7915a9611e2ef1 100644 (file)
--- a/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/getl/drop.ma
+++ b/helm/software/matita/contribs/LAMBDA-TYPES/LambdaDelta-1/getl/drop.ma
@@ -14,11 +14,9 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "getl/props.ma".
+include "LambdaDelta-1/getl/props.ma".
 
-include "clear/drop.ma".
-
-include "r/props.ma".
+include "LambdaDelta-1/clear/drop.ma".
 
 theorem getl_drop:
  \forall (b: B).(\forall (c: C).(\forall (e: C).(\forall (u: T).(\forall (h: 
@@ -355,7 +353,7 @@ nat).(\lambda (H: (getl i c1 (CHead e (Bind b) u))).(\lambda (c2: C).(\lambda
 (H0: (drop (S O) i c1 c2)).(let H3 \def (eq_ind nat (minus (S i) (S O)) 
 (\lambda (n: nat).(drop n O c2 e)) (drop_conf_ge (S i) e c1 (getl_drop b c1 e 
 u i H) c2 (S O) i H0 (eq_ind_r nat (plus (S O) i) (\lambda (n: nat).(le n (S 
-i))) (le_n (S i)) (plus i (S O)) (plus_comm i (S O)))) i (minus_Sx_SO i)) in 
+i))) (le_n (S i)) (plus i (S O)) (plus_sym i (S O)))) i (minus_Sx_SO i)) in 
 H3)))))))).
 
 theorem getl_drop_conf_rev: