]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/ground_2/steps/rtc_ist_shift.ma
update in ground_2, static_2, basic_2, apps_2, alpha_1
[helm.git] / matita / matita / contribs / lambdadelta / ground_2 / steps / rtc_ist_shift.ma
index 99ad5a092fe37ef3049c4e70223b0d2dc0c9fcc4..66af3f4a5cd52cb5e4a7b46154e44f64c8a38d5c 100644 (file)
@@ -19,13 +19,13 @@ include "ground_2/steps/rtc_ist.ma".
 
 (* Properties with test for t-transition counter ****************************)
 
-lemma ist_zero_shift: â\88\80c. ð\9d\90\93â¦\830,câ¦\84 â\86\92 ð\9d\90\93â¦\830,â\86\95*câ¦\84.
+lemma ist_zero_shift: â\88\80c. ð\9d\90\93â\9dª0,câ\9d« â\86\92 ð\9d\90\93â\9dª0,â\86\95*câ\9d«.
 #c #H destruct //
 qed.
 
 (* Inversion properties with test for t-transition counter ******************)
 
-lemma ist_inv_shift: â\88\80n,c. ð\9d\90\93â¦\83n,â\86\95*câ¦\84 â\86\92 â\88§â\88§ ð\9d\90\93â¦\830,câ¦\84 & 0 = n.
+lemma ist_inv_shift: â\88\80n,c. ð\9d\90\93â\9dªn,â\86\95*câ\9d« â\86\92 â\88§â\88§ ð\9d\90\93â\9dª0,câ\9d« & 0 = n.
 #n #c #H
 elim (shift_inv_dx … H) -H #rt0 #rs0 #ti0 #ts0 #H1 #_ #H2 #H3 #H4 destruct
 elim (max_inv_O3 … H1) -H1 #H11 #H12 destruct
@@ -33,6 +33,6 @@ elim (max_inv_O3 … H2) -H2 #H21 #H22 destruct
 /2 width=1 by conj/
 qed-.
 
-lemma ist_inv_zero_shift: â\88\80c. ð\9d\90\93â¦\830,â\86\95*câ¦\84 â\86\92 ð\9d\90\93â¦\830,câ¦\84.
+lemma ist_inv_zero_shift: â\88\80c. ð\9d\90\93â\9dª0,â\86\95*câ\9d« â\86\92 ð\9d\90\93â\9dª0,câ\9d«.
 #c #H elim (ist_inv_shift … H) -H //
 qed-.