X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fdynamic%2Fsnv_fsb.ma;h=ddffd5e9d175030c9ded590e33f561cc9b9271ed;hb=c903bdd93123e6fc2ad63a951024da80c9c28307;hp=466f19627912eebae66a68be73511fd5cb6afb5b;hpb=5a35a42e23b2f343f0241eeb6648bf05f31720db;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/dynamic/snv_fsb.ma b/matita/matita/contribs/lambdadelta/basic_2/dynamic/snv_fsb.ma
index 466f19627..ddffd5e9d 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/dynamic/snv_fsb.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/dynamic/snv_fsb.ma
@@ -19,6 +19,6 @@ include "basic_2/dynamic/snv_aaa.ma".
 
 (* forward lemmas on "qrst" strongly normalizing closures *********************)
 
-lemma snv_fwd_fsb: ∀h,g,G,L,T. ⦃G, L⦄ ⊢ T ¡[h, g] → ⦥[h, g] ⦃G, L, T⦄.
-#h #g #G #L #T #H elim (snv_fwd_aaa … H) -H /2 width=2 by aaa_fsb/
+lemma snv_fwd_fsb: ∀h,o,G,L,T. ⦃G, L⦄ ⊢ T ¡[h, o] → ⦥[h, o] ⦃G, L, T⦄.
+#h #o #G #L #T #H elim (snv_fwd_aaa … H) -H /2 width=2 by aaa_fsb/
 qed-.