X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Falpha_1%2Fsyntax%2Fterm_append.ma;h=63ddda16f9622d4fb2c390000dfb1de20bdfed51;hb=dfa1cda217f6b9a871ecbdd9bc54920f4a78d301;hp=a2db5fedd6cf1b23104a5fb0d0237dcc66c9df53;hpb=a77d0bd6a04e94f765d329d47b37d9e04d349b14;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/alpha_1/syntax/term_append.ma b/matita/matita/contribs/lambdadelta/alpha_1/syntax/term_append.ma
index a2db5fedd..63ddda16f 100644
--- a/matita/matita/contribs/lambdadelta/alpha_1/syntax/term_append.ma
+++ b/matita/matita/contribs/lambdadelta/alpha_1/syntax/term_append.ma
@@ -18,8 +18,8 @@ include "alpha_1/syntax/term.ma".
 
 let rec tappend T U on T ≝ match T with
 [ TAtom       ⇒ U
-| TUnit I T   ⇒ ①{I}.(tappend T U)
-| TPair I V T ⇒ ②{I}V.(tappend T U)
+| TUnit I T   ⇒ ①[I].(tappend T U)
+| TPair I V T ⇒ ②[I]V.(tappend T U)
 ].
 
 interpretation "append (term)" 'plus T U = (tappend T U).