X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_sor_coafter_ist_isf.ma;h=cc49463e104f92e4e3e4a7d58eb7635fcf43b196;hb=291fe1d3b56faf91d07099f43f3ebde2988649e1;hp=f7124644f9158e895d6b0c289191bf61296bb228;hpb=f8b4eb67c2437f7b5174d7dca46e102e0ac0d19d;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_sor_coafter_ist_isf.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_sor_coafter_ist_isf.ma
index f7124644f..cc49463e1 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_sor_coafter_ist_isf.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_sor_coafter_ist_isf.ma
@@ -23,7 +23,7 @@ include "ground/relocation/pr_sor_isi.ma".
 
 (*** coafter_sor *)
 lemma pr_sor_coafter_dx_tans:
-      ∀f. 𝐅❪f❫ → ∀f2. 𝐓❪f2❫ → ∀f1. f2 ~⊚ f1 ≘ f → ∀f1a,f1b. f1a ⋓ f1b ≘ f1 →
+      ∀f. 𝐅❨f❩ → ∀f2. 𝐓❨f2❩ → ∀f1. f2 ~⊚ f1 ≘ f → ∀f1a,f1b. f1a ⋓ f1b ≘ f1 →
       ∃∃fa,fb. f2 ~⊚ f1a ≘ fa & f2 ~⊚ f1b ≘ fb & fa ⋓ fb ≘ f.
 @pr_isf_ind
 [ #f #Hf #f2 #Hf2 #f1 #Hf #f1a #f1b #Hf1
@@ -53,7 +53,7 @@ qed-.
 
 (*** coafter_inv_sor *)
 lemma pr_sor_coafter_div:
-      ∀f. 𝐅❪f❫ → ∀f2. 𝐓❪f2❫ → ∀f1. f2 ~⊚ f1 ≘ f → ∀fa,fb. fa ⋓ fb ≘ f →
+      ∀f. 𝐅❨f❩ → ∀f2. 𝐓❨f2❩ → ∀f1. f2 ~⊚ f1 ≘ f → ∀fa,fb. fa ⋓ fb ≘ f →
       ∃∃f1a,f1b. f2 ~⊚ f1a ≘ fa & f2 ~⊚ f1b ≘ fb & f1a ⋓ f1b ≘ f1.
 @pr_isf_ind
 [ #f #Hf #f2 #Hf2 #f1 #H1f #fa #fb #H2f