X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fdelayed_updating%2Funwind%2Funwind_gen_after.ma;h=a9b2683b66e2f83105c57254279fdf1beaaf140d;hb=77479649510792efe4d9cbff508e118360862594;hp=9d4955ff9be28ed5272e8a66c862c42a2fafa1d8;hpb=9b4e20442ec5a4028cfe2b6fe836c94acdb033b8;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/delayed_updating/unwind/unwind_gen_after.ma b/matita/matita/contribs/lambdadelta/delayed_updating/unwind/unwind_gen_after.ma index 9d4955ff9..a9b2683b6 100644 --- a/matita/matita/contribs/lambdadelta/delayed_updating/unwind/unwind_gen_after.ma +++ b/matita/matita/contribs/lambdadelta/delayed_updating/unwind/unwind_gen_after.ma @@ -20,7 +20,7 @@ include "ground/relocation/tr_compose_pap.ma". (* Properties with tr_compose ***********************************************) lemma unwind_gen_after (f2) (f1) (p): - ◆[f2]◆[f1]p = ◆[λn.(f2 ((f1 n)@❨n❩))∘(f1 n)]p. + ◆[f2]◆[f1]p = ◆[λn.(f2 ((f1 n)@⧣❨n❩))∘(f1 n)]p. #f2 #f1 #p @(path_ind_unwind … p) -p // #n #_