]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_id.ma
update in ground
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / pr_pat_id.ma
index 0134687965d50e37f50bcbf42e34bab3224eb1c3..dc29d3c6a86ce4fb6af729ab67d3da0d95a25d14 100644 (file)
@@ -20,13 +20,13 @@ include "ground/relocation/pr_pat_eq.ma".
 (* Constructions with pr_id *************************************************)
 
 (*** id_at *)
-lemma pr_pat_id (i): @❨i,𝐢❩ ≘ i.
+lemma pr_pat_id (i): @⧣❨i,𝐢❩ ≘ i.
 /2 width=1 by pr_pat_eq, pr_eq_refl/ qed.
 
 (* Inversions with pr_id ****************************************************)
 
 (*** id_inv_at *)
 lemma pr_pat_inv_id (f):
-      (∀i. @❨i,f❩ ≘ i) → 𝐢 ≐ f.
+      (∀i. @⧣❨i,f❩ ≘ i) → 𝐢 ≐ f.
 /3 width=1 by pr_pat_inv_eq, pr_id_eq/
 qed-.