X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flsubsx.ma;h=0f46012343a86093eb52c43438100bff443becb6;hb=222044da28742b24584549ba86b1805a87def070;hp=d7d552461c1244c8a23281f6d432d963316772b2;hpb=f129bbbfda0e65a5f92ec086246f6e288376d4f9;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lsubsx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lsubsx.ma index d7d552461..0f4601234 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lsubsx.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lsubsx.ma @@ -13,11 +13,11 @@ (**************************************************************************) include "basic_2/notation/relations/lsubeqx_6.ma". -include "basic_2/rt_computation/lfsx.ma". +include "basic_2/rt_computation/rdsx.ma". (* CLEAR OF STRONGLY NORMALIZING ENTRIES FOR UNBOUND RT-TRANSITION **********) -(* Note: this should be an instance of a more general lexs *) +(* Note: this should be an instance of a more general sex *) (* Basic_2A1: uses: lcosx *) inductive lsubsx (h) (o) (G): rtmap → relation lenv ≝ | lsubsx_atom: ∀f. lsubsx h o G f (⋆) (⋆)