Step
*
1
2
of Lemma
eo-forward-pred
1. Info : Type
2. eo : EO+(Info)
3. e : E
4. e' : E
5. ¬↑first(e')
6. loc(pred(e')) = loc(e') ∈ Id
7. (pred(e') < e')
8. ∀e'@0:E. (e'@0 < e') 
⇒ ((e'@0 = pred(e') ∈ E) ∨ (e'@0 < pred(e'))) supposing loc(e'@0) = loc(e') ∈ Id
9. ¬↑first(e')
10. loc(pred(e')) = loc(e') ∈ Id
11. (pred(e') < e')
12. ∀e'@0:E. (e'@0 < e') 
⇒ ((e'@0 = pred(e') ∈ E) ∨ (e'@0 < pred(e'))) supposing loc(e'@0) = loc(e') ∈ Id
13. (pred(e') < pred(e'))
14. (pred(e') = pred(e') ∈ E) ∨ (pred(e') < pred(e'))
⊢ pred(e') = pred(e') ∈ E
BY
{ (InstLemma `eo-forward-E-subtype` [⌈eo⌉;⌈e⌉]⋅ THEN Auto THEN D -2 THEN Auto) }
Latex:
1.  Info  :  Type
2.  eo  :  EO+(Info)
3.  e  :  E
4.  e'  :  E
5.  \mneg{}\muparrow{}first(e')
6.  loc(pred(e'))  =  loc(e')
7.  (pred(e')  <  e')
8.  \mforall{}e'@0:E.  (e'@0  <  e')  {}\mRightarrow{}  ((e'@0  =  pred(e'))  \mvee{}  (e'@0  <  pred(e')))  supposing  loc(e'@0)  =  loc(e')
9.  \mneg{}\muparrow{}first(e')
10.  loc(pred(e'))  =  loc(e')
11.  (pred(e')  <  e')
12.  \mforall{}e'@0:E.  (e'@0  <  e')  {}\mRightarrow{}  ((e'@0  =  pred(e'))  \mvee{}  (e'@0  <  pred(e')))  supposing  loc(e'@0)  =  loc(e')
13.  (pred(e')  <  pred(e'))
14.  (pred(e')  =  pred(e'))  \mvee{}  (pred(e')  <  pred(e'))
\mvdash{}  pred(e')  =  pred(e')
By
(InstLemma  `eo-forward-E-subtype`  [\mkleeneopen{}eo\mkleeneclose{};\mkleeneopen{}e\mkleeneclose{}]\mcdot{}  THEN  Auto  THEN  D  -2  THEN  Auto)
Home
Index