X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fapps_2%2Fmodels%2Fveq_lifts.ma;h=e25f47051d053d5c892d67fb599d57b55fa44e41;hp=2c624e69fa36f6b20010d02d8d295b1f6336d7ed;hb=25c634037771dff0138e5e8e3d4378183ff49b86;hpb=bd53c4e895203eb049e75434f638f26b5a161a2b diff --git a/matita/matita/contribs/lambdadelta/apps_2/models/veq_lifts.ma b/matita/matita/contribs/lambdadelta/apps_2/models/veq_lifts.ma index 2c624e69f..e25f47051 100644 --- a/matita/matita/contribs/lambdadelta/apps_2/models/veq_lifts.ma +++ b/matita/matita/contribs/lambdadelta/apps_2/models/veq_lifts.ma @@ -66,6 +66,6 @@ fact lifts_fwd_vpush_aux (M): is_model M → is_extensional M → qed-. lemma lifts_SO_fwd_vpush (M) (gv): is_model M → is_extensional M → - ∀T1,T2. ⇧*[1] T1 ≘ T2 → + ∀T1,T2. ⇧[1] T1 ≘ T2 → ∀lv,d. ⟦T1⟧[gv,lv] ≗{M} ⟦T2⟧[gv,⫯[0←d]lv]. /2 width=3 by lifts_fwd_vpush_aux/ qed-.