Step
*
of Lemma
r2-left-right-lemma
∀a,b,x,y:ℝ^2. (r2-left(x;a;b)
⇒ r2-left(y;b;a)
⇒ (∃t:ℝ. ((t ∈ [r0, r1]) ∧ (|t*x + r1 - t*yab| = r0))))
BY
{ (Unfold `r2-left` 0
THEN Auto
THEN (RWO "r2-det-add" 0 THENA Auto)
THEN (RWO "r2-det-mul" 0 THENA Auto)
THEN (nRNorm 0 THENA Auto)) }
1
1. a : ℝ^2
2. b : ℝ^2
3. x : ℝ^2
4. y : ℝ^2
5. r0 < |xab|
6. r0 < |yba|
⊢ ∃t:ℝ. (((r0 ≤ t) ∧ (t ≤ r1)) ∧ ((|yab| + (|xab| * t) + -(|yab| * t)) = r0))
Latex:
Latex:
\mforall{}a,b,x,y:\mBbbR{}\^{}2.
(r2-left(x;a;b) {}\mRightarrow{} r2-left(y;b;a) {}\mRightarrow{} (\mexists{}t:\mBbbR{}. ((t \mmember{} [r0, r1]) \mwedge{} (|t*x + r1 - t*yab| = r0))))
By
Latex:
(Unfold `r2-left` 0
THEN Auto
THEN (RWO "r2-det-add" 0 THENA Auto)
THEN (RWO "r2-det-mul" 0 THENA Auto)
THEN (nRNorm 0 THENA Auto))
Home
Index