Step
*
1
2
2
1
1
2
2
1
1
of Lemma
rv-circle-circle-lemma3'
1. a : ℝ^2
2. b : ℝ^2
3. c : ℝ^2
4. d : ℝ^2
5. p : {p:ℝ^2| d(a;b) = d(a;p)} 
6. q : {q:ℝ^2| d(c;d) = d(c;q)} 
7. i : {x:ℝ^2| (d(c;p) = d(c;x)) ∧ (¬(c ≠ x ∧ x ≠ d ∧ (¬c-x-d)))} 
8. o : {y:ℝ^2| (d(a;q) = d(a;y)) ∧ (¬(a ≠ y ∧ y ≠ b ∧ (¬a-y-b)))} 
9. a ≠ c
10. d(c;p) = d(c;i)
11. ¬(c ≠ i ∧ i ≠ d ∧ (¬c-i-d))
12. d(a;q) = d(a;o)
13. ¬(a ≠ o ∧ o ≠ b ∧ (¬a-o-b))
14. ∀x,y,z:ℝ^2.  (d(x;y) = d(x;z) 
⇐⇒ ||z - x|| = d(x;y))
15. d(c;p) ≤ d(c;d)
16. d(a;q) ≤ d(a;b)
17. r0 ≤ (d(a;b) + d(c;a)^2 + -(d(c;d)^2))
18. r0 ≤ (-(d(a;b) + -(d(c;a))^2) + d(c;d)^2)
⊢ (d(a;b)^2 - d(c;d)^2) + d(c;a)^2^2 ≤ (r(4) * d(c;a)^2 * d(a;b)^2)
BY
{ (RepeatFor 2 (MoveToConcl (-1))
   THEN (GenConcl ⌜d(a;b) = r1 ∈ ℝ⌝⋅ THENA Auto)
   THEN (GenConcl ⌜d(c;d) = r2 ∈ ℝ⌝⋅ THENA Auto)
   THEN (GenConcl ⌜d(c;a) = dd ∈ ℝ⌝⋅ THENA Auto)
   THEN All Thin
   THEN Auto) }
1
1. r1 : ℝ
2. r2 : ℝ
3. dd : ℝ
4. r0 ≤ (r1 + dd^2 + -(r2^2))
5. r0 ≤ (-(r1 + -(dd)^2) + r2^2)
⊢ (r1^2 - r2^2) + dd^2^2 ≤ (r(4) * dd^2 * r1^2)
Latex:
Latex:
1.  a  :  \mBbbR{}\^{}2
2.  b  :  \mBbbR{}\^{}2
3.  c  :  \mBbbR{}\^{}2
4.  d  :  \mBbbR{}\^{}2
5.  p  :  \{p:\mBbbR{}\^{}2|  d(a;b)  =  d(a;p)\} 
6.  q  :  \{q:\mBbbR{}\^{}2|  d(c;d)  =  d(c;q)\} 
7.  i  :  \{x:\mBbbR{}\^{}2|  (d(c;p)  =  d(c;x))  \mwedge{}  (\mneg{}(c  \mneq{}  x  \mwedge{}  x  \mneq{}  d  \mwedge{}  (\mneg{}c-x-d)))\} 
8.  o  :  \{y:\mBbbR{}\^{}2|  (d(a;q)  =  d(a;y))  \mwedge{}  (\mneg{}(a  \mneq{}  y  \mwedge{}  y  \mneq{}  b  \mwedge{}  (\mneg{}a-y-b)))\} 
9.  a  \mneq{}  c
10.  d(c;p)  =  d(c;i)
11.  \mneg{}(c  \mneq{}  i  \mwedge{}  i  \mneq{}  d  \mwedge{}  (\mneg{}c-i-d))
12.  d(a;q)  =  d(a;o)
13.  \mneg{}(a  \mneq{}  o  \mwedge{}  o  \mneq{}  b  \mwedge{}  (\mneg{}a-o-b))
14.  \mforall{}x,y,z:\mBbbR{}\^{}2.    (d(x;y)  =  d(x;z)  \mLeftarrow{}{}\mRightarrow{}  ||z  -  x||  =  d(x;y))
15.  d(c;p)  \mleq{}  d(c;d)
16.  d(a;q)  \mleq{}  d(a;b)
17.  r0  \mleq{}  (d(a;b)  +  d(c;a)\^{}2  +  -(d(c;d)\^{}2))
18.  r0  \mleq{}  (-(d(a;b)  +  -(d(c;a))\^{}2)  +  d(c;d)\^{}2)
\mvdash{}  (d(a;b)\^{}2  -  d(c;d)\^{}2)  +  d(c;a)\^{}2\^{}2  \mleq{}  (r(4)  *  d(c;a)\^{}2  *  d(a;b)\^{}2)
By
Latex:
(RepeatFor  2  (MoveToConcl  (-1))
  THEN  (GenConcl  \mkleeneopen{}d(a;b)  =  r1\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  (GenConcl  \mkleeneopen{}d(c;d)  =  r2\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  (GenConcl  \mkleeneopen{}d(c;a)  =  dd\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  All  Thin
  THEN  Auto)
Home
Index