Step
*
1
2
2
1
1
of Lemma
qless-witness
1. a : ℚ
2. b : ℚ
3. a < b
4. inl ⋅ ∈ a < b + (¬a < b)
5. 0 < b - a
6. inl ⋅ ∈ {z:a < b + (¬a < b)| ↑isl(z)} 
⊢ ⋅ ∈ a < b
BY
{ TACTIC:(Unfold `member` -1 THEN ApFunToHypEquands `Z' ⌜outl(Z)⌝ ⌜a < b⌝ (-1)⋅ THEN All Reduce THEN Auto) }
Latex:
Latex:
1.  a  :  \mBbbQ{}
2.  b  :  \mBbbQ{}
3.  a  <  b
4.  inl  \mcdot{}  \mmember{}  a  <  b  +  (\mneg{}a  <  b)
5.  0  <  b  -  a
6.  inl  \mcdot{}  \mmember{}  \{z:a  <  b  +  (\mneg{}a  <  b)|  \muparrow{}isl(z)\} 
\mvdash{}  \mcdot{}  \mmember{}  a  <  b
By
Latex:
TACTIC:(Unfold  `member`  -1
                THEN  ApFunToHypEquands  `Z'  \mkleeneopen{}outl(Z)\mkleeneclose{}  \mkleeneopen{}a  <  b\mkleeneclose{}  (-1)\mcdot{}
                THEN  All  Reduce
                THEN  Auto)
Home
Index