]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground/relocation/pr_uni_eq.ma
update in ground, static_2 and apps_2
[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / pr_uni_eq.ma
index 44e98910169f9070a3aa973fe2dcf6a15a908b9c..f705ca84b0868c296b866fed8f09c79b44a5904b 100644 (file)
@@ -21,7 +21,7 @@ include "ground/relocation/pr_uni.ma".
 (* Inversions with pr_eq ****************************************************)
 
 (*** uni_inv_push_dx *)
-lemma pr_eq_inv_uni_push (n) (g):  ð\9d\90®â\9d¨nâ\9d© â\89¡ â«¯g â\86\92 â\88§â\88§ ð\9d\9f\8e = n & ð\9d\90¢ â\89¡ g.
+lemma pr_eq_inv_uni_push (n) (g):  ð\9d\90®â\9d¨nâ\9d© â\89\90 â«¯g â\86\92 â\88§â\88§ ð\9d\9f\8e = n & ð\9d\90¢ â\89\90 g.
 #n @(nat_ind_succ … n) -n 
 [ /3 width=5 by pr_eq_inv_push_bi, conj/
 | #n #_ #f <pr_uni_succ #H elim (pr_eq_inv_next_push … H) -H //
@@ -29,11 +29,11 @@ lemma pr_eq_inv_uni_push (n) (g):  𝐮❨n❩ ≡ ⫯g → ∧∧ 𝟎 = n & 
 qed-.
 
 (*** uni_inv_push_sn *)
-lemma pr_eq_inv_push_uni (n) (g): â«¯g â\89¡ ð\9d\90®â\9d¨nâ\9d© â\86\92 â\88§â\88§ ð\9d\9f\8e = n & ð\9d\90¢ â\89¡ g.
+lemma pr_eq_inv_push_uni (n) (g): â«¯g â\89\90 ð\9d\90®â\9d¨nâ\9d© â\86\92 â\88§â\88§ ð\9d\9f\8e = n & ð\9d\90¢ â\89\90 g.
 /3 width=1 by pr_eq_inv_uni_push, pr_eq_sym/ qed-.
 
 (*** uni_inv_next_dx *)
-lemma pr_eq_inv_uni_next (n) (g): ð\9d\90®â\9d¨nâ\9d© â\89¡ â\86\91g â\86\92 â\88§â\88§ ð\9d\90®â\9d¨â\86\93\9d© â\89¡ g & ↑↓n = n.
+lemma pr_eq_inv_uni_next (n) (g): ð\9d\90®â\9d¨nâ\9d© â\89\90 â\86\91g â\86\92 â\88§â\88§ ð\9d\90®â\9d¨â\86\93\9d© â\89\90 g & ↑↓n = n.
 #n @(nat_ind_succ … n) -n
 [ #g <pr_uni_zero <pr_id_unfold #H elim (pr_eq_inv_push_next … H) -H //
 | #n #_ #g <pr_uni_succ /3 width=5 by pr_eq_inv_next_bi, conj/
@@ -41,16 +41,16 @@ lemma pr_eq_inv_uni_next (n) (g): 𝐮❨n❩ ≡ ↑g → ∧∧ 𝐮❨↓n❩
 qed-.
 
 (*** uni_inv_next_sn *)
-lemma pr_eq_inv_next_uni (n) (g): â\86\91g â\89¡ ð\9d\90®â\9d¨nâ\9d© â\86\92 â\88§â\88§ ð\9d\90®â\9d¨â\86\93\9d© â\89¡ g & ↑↓n = n.
+lemma pr_eq_inv_next_uni (n) (g): â\86\91g â\89\90 ð\9d\90®â\9d¨nâ\9d© â\86\92 â\88§â\88§ ð\9d\90®â\9d¨â\86\93\9d© â\89\90 g & ↑↓n = n.
 /3 width=1 by pr_eq_inv_uni_next, pr_eq_sym/ qed-.
 
 (* Inversions with pr_id and pr_eq ******************************************)
 
 (*** uni_inv_id_dx *)
-lemma pr_eq_inv_uni_id (n): ð\9d\90®â\9d¨nâ\9d© â\89¡ 𝐢 → 𝟎 = n.
+lemma pr_eq_inv_uni_id (n): ð\9d\90®â\9d¨nâ\9d© â\89\90 𝐢 → 𝟎 = n.
 #n <pr_id_unfold #H elim (pr_eq_inv_uni_push … H) -H //
 qed-.
 
 (*** uni_inv_id_sn *)
-lemma pr_eq_inv_id_uni (n):  ð\9d\90¢ â\89¡ 𝐮❨n❩ → 𝟎 = n.
+lemma pr_eq_inv_id_uni (n):  ð\9d\90¢ â\89\90 𝐮❨n❩ → 𝟎 = n.
 /3 width=1 by pr_eq_inv_uni_id, pr_eq_sym/ qed-.