X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Fgenv.ma;h=2ab808305ef78214f6b28284262e7e24e7444f15;hb=f725a35c9014595293cfe43081ef11b059d5e3a7;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..2ab808305 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,10 +27,7 @@ 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)"
+interpretation "global environment binding construction (binary)"
    'DxBind2 L I T = (cons2 bind2 term I T L).
 
 interpretation "abbreviation (global environment)"
@@ -37,4 +38,4 @@ interpretation "abstraction (global environment)"
 
 (* Basic properties *********************************************************)
 
-axiom genv_eq_dec: ∀T1,T2:genv. Decidable (T1 = T2).
+axiom eq_genv_dec: ∀G1,G2:genv. Decidable (G1 = G2).