X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Fgenv.ma;h=38757ca1643dad295ab0d5a814fbe1eb56e2929f;hb=d7ccf1bd91637d3c59a285df6f215ecfde2a2450;hp=30b5dfd2ab92a409f7b0d17bae6aced9a1a8a202;hpb=e8998d29ab83e7b6aa495a079193705b2f6743d3;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/genv.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/genv.ma index 30b5dfd2a..38757ca16 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/genv.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/genv.ma @@ -13,6 +13,10 @@ (**************************************************************************) include "ground_2/list.ma". +include "basic_2/notation/constructors/star_0.ma". +include "basic_2/notation/constructors/dxbind2_3.ma". +include "basic_2/notation/constructors/dxabbr_2.ma". +include "basic_2/notation/constructors/dxabst_2.ma". include "basic_2/grammar/term.ma". (* GLOBAL ENVIRONMENTS ******************************************************) @@ -23,9 +27,6 @@ definition genv ≝ list2 bind2 term. interpretation "sort (global environment)" 'Star = (nil2 bind2 term). -interpretation "environment construction (binary)" - 'DxItem2 L I T = (cons2 bind2 term I T L). - interpretation "environment binding construction (binary)" 'DxBind2 L I T = (cons2 bind2 term I T L). @@ -37,4 +38,4 @@ interpretation "abstraction (global environment)" (* Basic properties *********************************************************) -axiom genv_eq_dec: ∀T1,T2:genv. Decidable (T1 = T2). +axiom genv_eq_dec: ∀G1,G2:genv. Decidable (G1 = G2).