X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FBasic_2%2Ffunctional%2Frtm.ma;h=845e8a04dea74b624467d13cb238060b38daff07;hb=48b202cd4ccd3ffc10f9a134314f747fdee30d36;hp=b15db86538a5d1da19dd410c2dee41f95f2a6c2f;hpb=e4328c9691fa85434acfb24eaedcb15ea2263b28;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/Basic_2/functional/rtm.ma b/matita/matita/contribs/lambda_delta/Basic_2/functional/rtm.ma index b15db8653..845e8a04d 100644 --- a/matita/matita/contribs/lambda_delta/Basic_2/functional/rtm.ma +++ b/matita/matita/contribs/lambda_delta/Basic_2/functional/rtm.ma @@ -26,8 +26,8 @@ inductive xenv: Type[0] ≝ interpretation "atom (ext. local environment)" 'Star = XAtom. -interpretation "environment binding construction (quad)" - 'DBind L I u K V = (XQuad L I u K V). +interpretation "environment construction (quad)" + 'DxItem4 L I u K V = (XQuad L I u K V). (* machine stack *) definition stack: Type[0] ≝ list2 xenv term.