Step * 6 of Lemma iproper-nonvoid


1. y1 : ℝ
2. Top
3. (True ∧ False)  (case inr y1  of inl(a) => inr(a) => a < case ⊥ of inl(b) => inr(b) => b)
⊢ ∃r:ℝ(y1 < r)
BY
((D With ⌜y1 r1⌝  THEN Auto) THEN nRAdd ⌜-(y1)⌝ 0⋅ THEN Auto) }


Latex:


Latex:

1.  y1  :  \mBbbR{}
2.  y  :  Top
3.  (True  \mwedge{}  False)
{}\mRightarrow{}  (case  inr  y1    of  inl(a)  =>  a  |  inr(a)  =>  a  <  case  \mbot{}  of  inl(b)  =>  b  |  inr(b)  =>  b)
\mvdash{}  \mexists{}r:\mBbbR{}.  (y1  <  r)


By


Latex:
((D  0  With  \mkleeneopen{}y1  +  r1\mkleeneclose{}    THEN  Auto)  THEN  nRAdd  \mkleeneopen{}-(y1)\mkleeneclose{}  0\mcdot{}  THEN  Auto)




Home Index