X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fstatic_2%2Fsyntax%2Fappend.ma;h=0377292d68b1c4dc04406e0d31bff57f9ddce556;hb=98e786e1a6bd7b621e37ba7cd4098d4a0a6f8278;hp=7a26b886512abff1202ba7ff5c8d8582f852a789;hpb=bd53c4e895203eb049e75434f638f26b5a161a2b;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/static_2/syntax/append.ma b/matita/matita/contribs/lambdadelta/static_2/syntax/append.ma index 7a26b8865..0377292d6 100644 --- a/matita/matita/contribs/lambdadelta/static_2/syntax/append.ma +++ b/matita/matita/contribs/lambdadelta/static_2/syntax/append.ma @@ -12,7 +12,7 @@ (* *) (**************************************************************************) -include "ground_2/xoa/ex_1_2.ma". +include "ground/xoa/ex_1_2.ma". include "static_2/notation/functions/snitem_2.ma". include "static_2/notation/functions/snbind1_2.ma". include "static_2/notation/functions/snbind2_3.ma". @@ -28,7 +28,7 @@ rec definition append L K on K ≝ match K with | LBind K I ⇒ (append L K).ⓘ[I] ]. -interpretation "append (local environment)" 'plus L1 L2 = (append L1 L2). +interpretation "append (local environment)" 'nplus L1 L2 = (append L1 L2). interpretation "local environment tail binding construction (generic)" 'SnItem I L = (append (LBind LAtom I) L).