---

Step * 2 1 1 1 of Lemma es-pred-cle


1. es : EO@i'
2. ∀[e,e':es-base-E(es)].  ((e < e') ∈ ℙ)
3. ∀[e,e':es-base-E(es)].  (e = e' ∈ 𝔹)
4. ∀[e:es-base-E(es)]. (pred(e) ∈ es-base-E(es))
5. e : es-base-E(es)@i
6. ¬↑pred1(e) = e
7. ¬↑(es-dom(es) pred1(e))
8. ∀e1:es-base-E(es). ((e1 < e) ⇒ ((pred(e1) < e1) ∨ (pred(e1) = e1 ∈ es-base-E(es))))
9. (pred1(e) < e)
10. (pred(pred1(e)) < pred1(e)) ∨ (pred(pred1(e)) = pred1(e) ∈ es-base-E(es))
⊢ (pred(pred1(e)) < e) ∨ (pred(pred1(e)) = e ∈ es-base-E(es))
BY
{ (InstLemma `es-pred-wf-base` [⌈es⌉;⌈pred1(e)⌉]⋅ THENA Auto) }

1
1. es : EO@i'
2. ∀[e,e':es-base-E(es)].  ((e < e') ∈ ℙ)
3. ∀[e,e':es-base-E(es)].  (e = e' ∈ 𝔹)
4. ∀[e:es-base-E(es)]. (pred(e) ∈ es-base-E(es))
5. e : es-base-E(es)@i
6. ¬↑pred1(e) = e
7. ¬↑(es-dom(es) pred1(e))
8. ∀e1:es-base-E(es). ((e1 < e) ⇒ ((pred(e1) < e1) ∨ (pred(e1) = e1 ∈ es-base-E(es))))
9. (pred1(e) < e)
10. (pred(pred1(e)) < pred1(e)) ∨ (pred(pred1(e)) = pred1(e) ∈ es-base-E(es))
11. pred(pred1(e)) ∈ es-base-E(es)
⊢ (pred(pred1(e)) < e) ∨ (pred(pred1(e)) = e ∈ es-base-E(es))

---

Latex:



1.  es  :  EO@i'
2.  \mforall{}[e,e':es-base-E(es)].    ((e  <  e')  \mmember{}  \mBbbP{})
3.  \mforall{}[e,e':es-base-E(es)].    (e  =  e'  \mmember{}  \mBbbB{})
4.  \mforall{}[e:es-base-E(es)].  (pred(e)  \mmember{}  es-base-E(es))
5.  e  :  es-base-E(es)@i
6.  \mneg{}\muparrow{}pred1(e)  =  e
7.  \mneg{}\muparrow{}(es-dom(es)  pred1(e))
8.  \mforall{}e1:es-base-E(es).  ((e1  <  e)  {}\mRightarrow{}  ((pred(e1)  <  e1)  \mvee{}  (pred(e1)  =  e1)))
9.  (pred1(e)  <  e)
10.  (pred(pred1(e))  <  pred1(e))  \mvee{}  (pred(pred1(e))  =  pred1(e))
\mvdash{}  (pred(pred1(e))  <  e)  \mvee{}  (pred(pred1(e))  =  e)


By

(InstLemma  `es-pred-wf-base`  [\mkleeneopen{}es\mkleeneclose{};\mkleeneopen{}pred1(e)\mkleeneclose{}]\mcdot{}  THENA  Auto)

---

Home Index