---

Step * 1 1 1 2 2 of Lemma es-pred-maximal-base


1. es : EO@i'
2. ∀[e:es-base-E(es)]. (loc(e) ∈ Id)
3. ∀[e,e':es-base-E(es)].  ((e < e') ∈ ℙ)
4. es-eq(es) ∈ EqDecider(es-base-E(es))
5. ∀[e:es-base-E(es)]. (pred(e) ∈ es-base-E(es))
6. e : es-base-E(es)@i
7. ¬↑pred1(e) = e
8. ¬↑(es-dom(es) pred1(e))
9. ∀e1:es-base-E(es). ((e1 < e) ⇒ (∀e':E. ((loc(e') = loc(e1) ∈ Id) ⇒ (e' < e1) ⇒ (pred(e1) < e') ⇒ False)))
10. e' : E@i
11. loc(e') = loc(e) ∈ Id@i
12. (e' < e)@i
13. ff ∈ 𝔹
14. (pred(pred1(e)) < e')@i
⊢ False
BY
{ ((InstLemma `es-base-pred-properties` [⌈es⌉;⌈e⌉]⋅ THEN Auto) THEN InstHyp [⌈pred1(e)⌉;⌈e'⌉] 9⋅ THEN Auto) }

1
.....antecedent..... 
1. es : EO@i'
2. ∀[e:es-base-E(es)]. (loc(e) ∈ Id)
3. ∀[e,e':es-base-E(es)].  ((e < e') ∈ ℙ)
4. es-eq(es) ∈ EqDecider(es-base-E(es))
5. ∀[e:es-base-E(es)]. (pred(e) ∈ es-base-E(es))
6. e : es-base-E(es)@i
7. ¬↑pred1(e) = e
8. ¬↑(es-dom(es) pred1(e))
9. ∀e1:es-base-E(es). ((e1 < e) ⇒ (∀e':E. ((loc(e') = loc(e1) ∈ Id) ⇒ (e' < e1) ⇒ (pred(e1) < e') ⇒ False)))
10. e' : E@i
11. loc(e') = loc(e) ∈ Id@i
12. (e' < e)@i
13. ff ∈ 𝔹
14. (pred(pred1(e)) < e')@i
15. loc(pred1(e)) = loc(e) ∈ Id
16. ¬(e < pred1(e))
17. ∀x:es-base-E(es). ((x < e) ⇒ (loc(x) = loc(e) ∈ Id) ⇒ ((pred1(e) < e) ∧ (¬(pred1(e) < x))))
⊢ (e' < pred1(e))

---

Latex:



1.  es  :  EO@i'
2.  \mforall{}[e:es-base-E(es)].  (loc(e)  \mmember{}  Id)
3.  \mforall{}[e,e':es-base-E(es)].    ((e  <  e')  \mmember{}  \mBbbP{})
4.  es-eq(es)  \mmember{}  EqDecider(es-base-E(es))
5.  \mforall{}[e:es-base-E(es)].  (pred(e)  \mmember{}  es-base-E(es))
6.  e  :  es-base-E(es)@i
7.  \mneg{}\muparrow{}pred1(e)  =  e
8.  \mneg{}\muparrow{}(es-dom(es)  pred1(e))
9.  \mforall{}e1:es-base-E(es)
          ((e1  <  e)  {}\mRightarrow{}  (\mforall{}e':E.  ((loc(e')  =  loc(e1))  {}\mRightarrow{}  (e'  <  e1)  {}\mRightarrow{}  (pred(e1)  <  e')  {}\mRightarrow{}  False)))
10.  e'  :  E@i
11.  loc(e')  =  loc(e)@i
12.  (e'  <  e)@i
13.  ff  \mmember{}  \mBbbB{}
14.  (pred(pred1(e))  <  e')@i
\mvdash{}  False


By

((InstLemma  `es-base-pred-properties`  [\mkleeneopen{}es\mkleeneclose{};\mkleeneopen{}e\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  InstHyp  [\mkleeneopen{}pred1(e)\mkleeneclose{};\mkleeneopen{}e'\mkleeneclose{}]  9\mcdot{}
  THEN  Auto)

---

Home Index