]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/tr_compose_pap.ma
update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / tr_compose_pap.ma
index 97ffc0d309fde18a45580e6c654fedc96e5e2503..7854b2a69a6323058937fdf2fa9b1908c5b83ccc 100644 (file)
@@ -21,7 +21,7 @@ include "ground/relocation/tr_pap_tls.ma".
 
 (*** compose_apply *)
 lemma tr_compose_pap (i) (f1) (f2):
-      f2@❨f1@❨i❩❩ = (f2∘f1)@❨i❩.
+      f2@⧣❨f1@⧣❨i❩❩ = (f2∘f1)@⧣❨i❩.
 #i elim i -i
 [ * #p1 #f1 #f2
   <tr_compose_unfold <tr_pap_unit <tr_pap_unit //