]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/tr_pap_tls.ma
update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / tr_pap_tls.ma
index 678792ff543c447bcec1b8442471e27a9254821c..da8ea1519527fc2299f606b796ea0a4ae5b1496c 100644 (file)
@@ -20,7 +20,7 @@ include "ground/lib/stream_tls.ma".
 (* Constructions with stream_tls ********************************************)
 
 lemma tr_pap_plus (p1) (p2) (f):
-      (⇂*[ninj p2]f)@❨p1❩+f@❨p2❩ = f@❨p1+p2❩.
+      (⇂*[ninj p2]f)@⧣❨p1❩+f@⧣❨p2❩ = f@⧣❨p1+p2❩.
 #p1 #p2 elim p2 -p2
 [ * #p #f //
 | #i #IH * #p #f