Step * 1 2 2 of Lemma r2-straightedge-compass


1. : ℝ^2
2. : ℝ^2
3. : ℝ^2
4. {b:ℝ^2| b ≠ a ∧ c_b_d} 
5. : ℝ^2
6. b-a-q
7. (d(c;d) d(c;b)) < d(b;q)
8. q_a_b
⊢ d(c;d) < d(c;q)
BY
((InstLemma `real-vec-triangle-inequality` [⌜2⌝;⌜b⌝;⌜c⌝;⌜q⌝]⋅ THEN Auto)
   THEN (Assert (d(c;d) d(c;b)) < (d(b;c) d(c;q)) BY
               Auto)
   }

1
1. : ℝ^2
2. : ℝ^2
3. : ℝ^2
4. {b:ℝ^2| b ≠ a ∧ c_b_d} 
5. : ℝ^2
6. b-a-q
7. (d(c;d) d(c;b)) < d(b;q)
8. q_a_b
9. d(b;q) ≤ (d(b;c) d(c;q))
10. (d(c;d) d(c;b)) < (d(b;c) d(c;q))
⊢ d(c;d) < d(c;q)


Latex:


Latex:

1.  c  :  \mBbbR{}\^{}2
2.  d  :  \mBbbR{}\^{}2
3.  a  :  \mBbbR{}\^{}2
4.  b  :  \{b:\mBbbR{}\^{}2|  b  \mneq{}  a  \mwedge{}  c\_b\_d\} 
5.  q  :  \mBbbR{}\^{}2
6.  b-a-q
7.  (d(c;d)  +  d(c;b))  <  d(b;q)
8.  q\_a\_b
\mvdash{}  d(c;d)  <  d(c;q)


By


Latex:
((InstLemma  `real-vec-triangle-inequality`  [\mkleeneopen{}2\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{};\mkleeneopen{}c\mkleeneclose{};\mkleeneopen{}q\mkleeneclose{}]\mcdot{}  THEN  Auto)
  THEN  (Assert  (d(c;d)  +  d(c;b))  <  (d(b;c)  +  d(c;q))  BY
                          Auto)
  )




Home Index