]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/tr_uni_compose.ma
update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / tr_uni_compose.ma
index 7d7aa437e147df279bdf4e626ccc0843ff611738..54cf97875272b3995f5bea6b84279ae21f3ec9d4 100644 (file)
@@ -44,8 +44,8 @@ qed.
 
 (* Main constructions with tr_compose and tr_tls ****************************)
 
-theorem tr_compose_uni_dx (f) (n):
-        (𝐮❨f@❨n❩❩∘⇂*[n]f ≗ f∘𝐮❨n❩).
+theorem tr_compose_uni_dx (f) (p):
+        (𝐮❨f@❨p❩❩∘⇂*[p]f) ≗ f∘𝐮❨p❩.
 #f #p
 @nstream_eq_inv_ext #q
 <tr_compose_pap <tr_compose_pap