X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Flenv.ma;h=58a82cd25aac700e519040ac072f84c8485c212d;hb=603c8b3cdab901c26f63b5fed2c65e49693cc9a3;hp=9988b3d4cc80275fa5f7211ca21b88a0bef6798c;hpb=e8998d29ab83e7b6aa495a079193705b2f6743d3;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv.ma index 9988b3d4c..58a82cd25 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv.ma @@ -37,6 +37,10 @@ interpretation "abbreviation (local environment)" interpretation "abstraction (local environment)" 'DxAbst L T = (LPair L Abst T). +(* Basic properties *********************************************************) + +axiom lenv_eq_dec: ∀L1,L2:lenv. Decidable (L1 = L2). + (* Basic inversion lemmas ***************************************************) lemma destruct_lpair_lpair: ∀I1,I2,L1,L2,V1,V2. L1.ⓑ{I1}V1 = L2.ⓑ{I2}V2 →