X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambda_delta%2FBasic_2%2Fgrammar%2Flenv.ma;h=5aacaf57ccaffe8127fa33a21982074ffe9fb681;hb=fcd30dfead2fbc2889aa993fba0577dce8a90c88;hp=15ca1ed17be05a1a6b643645a29af284b75982c6;hpb=78f21d7d9014e5c7655f58239e4f1a128ea2c558;p=helm.git diff --git a/matita/matita/contribs/lambda_delta/Basic_2/grammar/lenv.ma b/matita/matita/contribs/lambda_delta/Basic_2/grammar/lenv.ma index 15ca1ed17..5aacaf57c 100644 --- a/matita/matita/contribs/lambda_delta/Basic_2/grammar/lenv.ma +++ b/matita/matita/contribs/lambda_delta/Basic_2/grammar/lenv.ma @@ -22,6 +22,17 @@ inductive lenv: Type[0] ≝ | LPair: lenv → bind2 → term → lenv (* binary binding construction *) . -interpretation "sort (local environment)" 'Star = LAtom. +interpretation "sort (local environment)" + 'Star = LAtom. -interpretation "environment binding construction (binary)" 'DBind L I T = (LPair L I T). +interpretation "environment construction (binary)" + 'DxItem2 L I T = (LPair L I T). + +interpretation "environment binding construction (binary)" + 'DxBind2 L I T = (LPair L I T). + +interpretation "abbreviation (local environment)" + 'DxAbbr L T = (LPair L Abbr T). + +interpretation "abstraction (local environment)" + 'DxAbst L T = (LPair L Abst T).