---

Step * 1 1 2 1 of Lemma primed-class-prior-val


1. Info : Type
2. T : Type
3. X : EClass(T)
4. Singlevalued(X)
5. es : EO+(Info)
6. e : E
7. x : E@i
8. (x <loc e)
9. ↑0 <z #(X es x)
10. ∀e'':E. ((x <loc e'') ⇒ (e'' <loc e) ⇒ (¬↑0 <z #(X es e'')))
11. y : (∃e':{E| ((e' <loc e) ∧ (↑(#(X es e') =z 1)))}) ─→ False
⊢ ∃e':{E| ((e' <loc e) ∧ (↑(#(X es e') =z 1)))}
BY
{ (With ⌈x⌉ (D 0)⋅
   THEN Auto
   THEN ((InstLemma `sv-class-iff` [⌈Info⌉;⌈λ2es e.T⌉;⌈X⌉]⋅ THENM ThinTrivial) THENA Auto)
   THEN MoveToConcl 9
   THEN (RWO "-1" 0 THENA Auto)
   THEN AutoSplit) }

---

Latex:

---

Latex:

1.  Info  :  Type
2.  T  :  Type
3.  X  :  EClass(T)
4.  Singlevalued(X)
5.  es  :  EO+(Info)
6.  e  :  E
7.  x  :  E@i
8.  (x  <loc  e)
9.  \muparrow{}0  <z  \#(X  es  x)
10.  \mforall{}e'':E.  ((x  <loc  e'')  {}\mRightarrow{}  (e''  <loc  e)  {}\mRightarrow{}  (\mneg{}\muparrow{}0  <z  \#(X  es  e'')))
11.  y  :  (\mexists{}e':\{E|  ((e'  <loc  e)  \mwedge{}  (\muparrow{}(\#(X  es  e')  =\msubz{}  1)))\})  {}\mrightarrow{}  False
\mvdash{}  \mexists{}e':\{E|  ((e'  <loc  e)  \mwedge{}  (\muparrow{}(\#(X  es  e')  =\msubz{}  1)))\}


By

---

Latex:
(With  \mkleeneopen{}x\mkleeneclose{}  (D  0)\mcdot{}
  THEN  Auto
  THEN  ((InstLemma  `sv-class-iff`  [\mkleeneopen{}Info\mkleeneclose{};\mkleeneopen{}\mlambda{}\msubtwo{}es  e.T\mkleeneclose{};\mkleeneopen{}X\mkleeneclose{}]\mcdot{}  THENM  ThinTrivial)  THENA  Auto)
  THEN  MoveToConcl  9
  THEN  (RWO  "-1"  0  THENA  Auto)
  THEN  AutoSplit)

---

Home Index