]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/pr_isi_eq.ma
update in ground, static_2 and apps_2
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / pr_isi_eq.ma
index 58317065d96bf49ebd8332de8148ff4e1a7658ea..1895672907d0871337eb5d1d9b25b98eb4767ce8 100644 (file)
@@ -36,7 +36,7 @@ lemma pr_isi_eq_repl_fwd:
 (* Main inversions with pr_eq ***********************************************)
 
 (*** isid_inv_eq_repl *)
-corec theorem pr_isi_inv_eq_repl (g1) (g2): ð\9d\90\88â\9d¨g1â\9d© â\86\92 ð\9d\90\88â\9d¨g2â\9d© â\86\92 g1 â\89¡ g2.
+corec theorem pr_isi_inv_eq_repl (g1) (g2): ð\9d\90\88â\9d¨g1â\9d© â\86\92 ð\9d\90\88â\9d¨g2â\9d© â\86\92 g1 â\89\90 g2.
 #H1 #H2
 cases (pr_isi_inv_gen … H1) -H1
 cases (pr_isi_inv_gen … H2) -H2
@@ -46,13 +46,13 @@ qed-.
 (* Alternative definition with pr_eq ****************************************)
 
 (*** eq_push_isid *)
-corec lemma pr_eq_push_isi (f): â«¯f â\89¡ f → 𝐈❨f❩.
+corec lemma pr_eq_push_isi (f): â«¯f â\89\90 f → 𝐈❨f❩.
 #H cases (pr_eq_inv_push_sn … H) -H
 /4 width=3 by pr_isi_push, pr_eq_trans/
 qed.
 
 (*** eq_push_inv_isid *)
-corec lemma pr_isi_inv_eq_push (g): ð\9d\90\88â\9d¨gâ\9d© â\86\92 â«¯g â\89¡ g.
+corec lemma pr_isi_inv_eq_push (g): ð\9d\90\88â\9d¨gâ\9d© â\86\92 â«¯g â\89\90 g.
 * -g #f #g #Hf *
 /3 width=5 by pr_eq_push/
 qed-.