X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_isu.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_isu.ma;h=b99964bc1d2b0d5561753d0d582cd968b59c8937;hb=8ec019202bff90959cf1a7158b309e7f83fa222e;hp=5fdee719f0e85e465ff780c327557bbe42bd4ae6;hpb=33d0a7a9029859be79b25b5a495e0f30dab11f37;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_isu.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_isu.ma
index 5fdee719f..b99964bc1 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_isu.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_isu.ma
@@ -20,7 +20,7 @@ include "ground/relocation/pr_isi.ma".
 (*** isuni *)
 inductive pr_isu: predicate pr_map ≝
 (*** isuni_isid *)
-| pr_isu_isi (f): 𝐈❪f❫ → pr_isu f
+| pr_isu_isi (f): 𝐈❨f❩ → pr_isu f
 (*** isuni_next *)
 | pr_isu_next (f): pr_isu f → ∀g. ↑f = g → pr_isu g
 .
@@ -32,7 +32,7 @@ interpretation
 (* Basic inversions *********************************************************)
 
 (*** isuni_inv_push *)
-lemma pr_isu_inv_push (g): 𝐔❪g❫ → ∀f. ⫯f = g → 𝐈❪f❫.
+lemma pr_isu_inv_push (g): 𝐔❨g❩ → ∀f. ⫯f = g → 𝐈❨f❩.
 #g * -g
 [ /2 width=3 by pr_isi_inv_push/
 | #f #_ #g #H #x #Hx destruct
@@ -41,7 +41,7 @@ lemma pr_isu_inv_push (g): 𝐔❪g❫ → ∀f. ⫯f = g → 𝐈❪f❫.
 qed-.
 
 (*** isuni_inv_next *)
-lemma pr_isu_inv_next (g): 𝐔❪g❫ → ∀f. ↑f = g → 𝐔❪f❫.
+lemma pr_isu_inv_next (g): 𝐔❨g❩ → ∀f. ↑f = g → 𝐔❨f❩.
 #g * -g #f #Hf
 [ #x #Hx elim (pr_isi_inv_next … Hf … Hx)
 | #g #H #x #Hx destruct
@@ -52,5 +52,5 @@ qed-.
 (* Basic destructions *******************************************************)
 
 (*** isuni_fwd_push *)
-lemma pr_isu_fwd_push (g): 𝐔❪g❫ → ∀f. ⫯f = g → 𝐔❪f❫.
+lemma pr_isu_fwd_push (g): 𝐔❨g❩ → ∀f. ⫯f = g → 𝐔❨f❩.
 /3 width=3 by pr_isu_inv_push, pr_isu_isi/ qed-.