X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Flib%2Ftutorial%2Fchapter8.ma;h=427b148427f3e34efde54a55286a284424c0b1be;hb=a57efb7e02d1c0af621ab36bd345f2f79f063a0c;hp=b9bc64a9c79467212b8efeef2eb668ba8e77d940;hpb=2c4b4aaa6f1490346823a26cba5dd965cab0cd02;p=helm.git diff --git a/matita/matita/lib/tutorial/chapter8.ma b/matita/matita/lib/tutorial/chapter8.ma index b9bc64a9c..427b14842 100644 --- a/matita/matita/lib/tutorial/chapter8.ma +++ b/matita/matita/lib/tutorial/chapter8.ma @@ -270,8 +270,8 @@ lemma sem_star_w : ∀S.∀i:pitem S.∀w. (* Below are a few, simple, semantic properties of items. In particular: - not_epsilon_item : ∀S:DeqSet.∀i:pitem S. ¬ (\sem{i} ϵ). - epsilon_pre : ∀S.∀e:pre S. (\sem{i} ϵ) ↔ (\snd e = true). -- minus_eps_item: ∀S.∀i:pitem S. \sem{i} =1 \sem{i}-{[ ]}. -- minus_eps_pre: ∀S.∀e:pre S. \sem{\fst e} =1 \sem{e}-{[ ]}. +- minus_eps_item: ∀S.∀i:pitem S. \sem{i} ≐ \sem{i}-{[ ]}. +- minus_eps_pre: ∀S.∀e:pre S. \sem{\fst e} ≐ \sem{e}-{[ ]}. The first property is proved by a simple induction on $i$; the other results are easy corollaries. We need an auxiliary lemma first. *)