Step
*
of Lemma
eo-forward-E-subtype2
∀[Info:Type]. ∀[eo:EO+(Info)]. ∀[e:E]. ({e':E| (loc(e') = loc(e) ∈ Id)
⇒ e ≤loc e' } ⊆r E)
BY
{ (Auto
THEN RWO "eo-forward-E" 0
THEN Auto
THEN D 0
THEN Auto
THEN Try ((Unfold `es-E` 0 THEN Folds ``es-base-E es-dom`` 0 THEN Auto)⋅)) }
1
.....subterm..... T:t
1:n
1. Info : Type
2. eo : EO+(Info)
3. e : E
4. x : {e':E| (loc(e') = loc(e) ∈ Id)
⇒ e ≤loc e' } @i
⊢ x ∈ {e@0:es-base-E(eo)| ↑((es-dom(eo) e@0) ∧b (e ≤loc e@0 ∨b(¬bloc(e@0) = loc(e))))}
Latex:
\mforall{}[Info:Type]. \mforall{}[eo:EO+(Info)]. \mforall{}[e:E]. (\{e':E| (loc(e') = loc(e)) {}\mRightarrow{} e \mleq{}loc e' \} \msubseteq{}r E)
By
(Auto
THEN RWO "eo-forward-E" 0
THEN Auto
THEN D 0
THEN Auto
THEN Try ((Unfold `es-E` 0 THEN Folds ``es-base-E es-dom`` 0 THEN Auto)\mcdot{}))
Home
Index