]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_sle.ma
update in ground_2, static_2, basic_2, apps_2, alpha_1
[helm.git] / matita / matita / contribs / lambdadelta / ground_2 / relocation / rtmap_sle.ma
index 373be5488d50fd4e6ab1442b2714abc63e1ecbe0..c08d574cd83fe438d6a2b90e110803304a905502 100644 (file)
@@ -154,7 +154,7 @@ qed.
 
 (* Properties with isid *****************************************************)
 
-corec lemma sle_isid_sn: â\88\80f1. ð\9d\90\88â¦\83f1â¦\84 → ∀f2. f1 ⊆ f2.
+corec lemma sle_isid_sn: â\88\80f1. ð\9d\90\88â\9dªf1â\9d« → ∀f2. f1 ⊆ f2.
 #f1 * -f1
 #f1 #g1 #Hf1 #H1 #f2 cases (pn_split f2) *
 /3 width=5 by sle_weak, sle_push/
@@ -162,7 +162,7 @@ qed.
 
 (* Inversion lemmas with isid ***********************************************)
 
-corec lemma sle_inv_isid_dx: â\88\80f1,f2. f1 â\8a\86 f2 â\86\92 ð\9d\90\88â¦\83f2â¦\84 â\86\92 ð\9d\90\88â¦\83f1â¦\84.
+corec lemma sle_inv_isid_dx: â\88\80f1,f2. f1 â\8a\86 f2 â\86\92 ð\9d\90\88â\9dªf2â\9d« â\86\92 ð\9d\90\88â\9dªf1â\9d«.
 #f1 #f2 * -f1 -f2
 #f1 #f2 #g1 #g2 #Hf * * #H
 [2,3: elim (isid_inv_next … H) // ]
@@ -172,7 +172,7 @@ qed-.
 
 (* Properties with isdiv ****************************************************)
 
-corec lemma sle_isdiv_dx: â\88\80f2. ð\9d\9b\80â¦\83f2â¦\84 → ∀f1. f1 ⊆ f2.
+corec lemma sle_isdiv_dx: â\88\80f2. ð\9d\9b\80â\9dªf2â\9d« → ∀f1. f1 ⊆ f2.
 #f2 * -f2
 #f2 #g2 #Hf2 #H2 #f1 cases (pn_split f1) *
 /3 width=5 by sle_weak, sle_next/
@@ -180,7 +180,7 @@ qed.
 
 (* Inversion lemmas with isdiv **********************************************)
 
-corec lemma sle_inv_isdiv_sn: â\88\80f1,f2. f1 â\8a\86 f2 â\86\92 ð\9d\9b\80â¦\83f1â¦\84 â\86\92 ð\9d\9b\80â¦\83f2â¦\84.
+corec lemma sle_inv_isdiv_sn: â\88\80f1,f2. f1 â\8a\86 f2 â\86\92 ð\9d\9b\80â\9dªf1â\9d« â\86\92 ð\9d\9b\80â\9dªf2â\9d«.
 #f1 #f2 * -f1 -f2
 #f1 #f2 #g1 #g2 #Hf * * #H
 [1,3: elim (isdiv_inv_push … H) // ]