X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2Fbasic_2%2Funfold%2Flifts_lift.ma;h=6ad3ff0156d7d0defea7ff93c263897eb53d7409;hb=99c7be7031e506c7ad4a6c5e3f12ad5ae542b049;hp=23a488072b214ce45658590e3c6ad936513b7c76;hpb=a8c166f1e1baeeae04553058bd179420ada8bbe7;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/basic_2/unfold/lifts_lift.ma b/matita/matita/contribs/lambda_delta/basic_2/unfold/lifts_lift.ma index 23a488072..6ad3ff015 100644 --- a/matita/matita/contribs/lambda_delta/basic_2/unfold/lifts_lift.ma +++ b/matita/matita/contribs/lambda_delta/basic_2/unfold/lifts_lift.ma @@ -32,7 +32,7 @@ lemma lifts_lift_trans_le: ∀T1,T,des. ⇧*[des] T1 ≡ T → ∀T2. ⇧[0, 1] qed-. (* Basic_1: was: lift1_free (right to left) *) -lemma lifts_lift_trans: ∀des,i,i0. @[i] des ≡ i0 → +lemma lifts_lift_trans: ∀des,i,i0. @⦃i, des⦄ ≡ i0 → ∀des0. des + 1 ▭ i + 1 ≡ des0 + 1 → ∀T1,T0. ⇧*[des0] T1 ≡ T0 → ∀T2. ⇧[O, i0 + 1] T0 ≡ T2 →