X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fpr_pat_pat_id.ma;h=90bee366be7cbcb8aaf0accab126509cb2f0d09e;hb=cc178d85bc4fec05b6a9dd176f338b3275beb3d9;hp=3fb5d1789294be9fc974cdd66d280dd9a983a8dd;hpb=5489d0b66ed7bff17b9dedb89708f57f1d542adc;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_pat_id.ma b/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_pat_id.ma
index 3fb5d1789..90bee366b 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_pat_id.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/pr_pat_pat_id.ma
@@ -28,7 +28,7 @@ lemma pr_pat_id_des (i1) (i2):
 
 (*** at_div_id_dx *)
 theorem pr_pat_div_id_dx (f):
-        H_pr_pat_div f 𝐢 𝐢 f.
+        H_pr_pat_div f (𝐢 ) (𝐢) f.
 #f #jf #j0 #j #Hf #H0
 lapply (pr_pat_id_des … H0) -H0 #H destruct
 /2 width=3 by ex2_intro/
@@ -36,5 +36,5 @@ qed-.
 
 (*** at_div_id_sn *)
 theorem pr_pat_div_id_sn (f):
-        H_pr_pat_div 𝐢 f f 𝐢.
+        H_pr_pat_div (𝐢) f f (𝐢).
 /3 width=6 by pr_pat_div_id_dx, pr_pat_div_comm/ qed-.