X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flpxs_drops.ma;h=9af34d4feaadbf122e6afa40188a83ec32da486d;hb=3c7b4071a9ac096b02334c1d47468776b948e2de;hp=9578dad4edaacdd6abed8c5fa0eefe2da90ec276;hpb=ff612dc35167ec0c145864c9aa8ae5e1ebe20a48;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_drops.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_drops.ma index 9578dad4e..9af34d4fe 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_drops.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lpxs_drops.ma @@ -15,20 +15,23 @@ include "static_2/relocation/drops_lex.ma". include "basic_2/rt_computation/cpxs_drops.ma". -(* UNBOUND PARALLEL RT-COMPUTATION FOR FULL LOCAL ENVIRONMENTS **************) +(* EXTENDED PARALLEL RT-COMPUTATION FOR FULL LOCAL ENVIRONMENTS *************) (* Properties with generic slicing for local environments *******************) (* Basic_2A1: was: drop_lpxs_trans *) -lemma drops_lpxs_trans (h) (G): dedropable_sn (cpxs h G). +lemma drops_lpxs_trans (G): + dedropable_sn (cpxs G). /3 width=6 by lex_liftable_dedropable_sn, cpxs_lifts_sn/ qed-. (* Inversion lemmas with generic slicing for local environments *************) (* Basic_2A1: was: lpxs_drop_conf *) -lemma lpxs_drops_conf (h) (G): dropable_sn (cpxs h G). +lemma lpxs_drops_conf (G): + dropable_sn (cpxs G). /2 width=3 by lex_dropable_sn/ qed-. (* Basic_2A1: was: lpxs_drop_trans_O1 *) -lemma lpxs_drops_trans (h) (G): dropable_dx (cpxs h G). +lemma lpxs_drops_trans (G): + dropable_dx (cpxs G). /2 width=3 by lex_dropable_dx/ qed-.