Step
*
of Lemma
r2-straightedge-compass-simple
No Annotations
∀c,d,a:ℝ^2. ∀b:{b:ℝ^2| 
                (d(b;b) < d(b;a))
                ∧ ((¬(d(c;d) < d(c;b))) ∧ (¬(d(c;d) < d(b;d))))
                ∧ (¬(r2-left(c;b;d) ∨ r2-left(c;d;b)))} .
  (∃u:ℝ^2 [((¬((d(c;u) < d(c;d)) ∨ (d(c;d) < d(c;u))))
          ∧ (((¬(d(a;u) < d(a;b))) ∧ (¬(d(a;u) < d(b;u)))) ∧ (¬(r2-left(a;b;u) ∨ r2-left(a;u;b))))
          ∧ ((d(b;b) < d(b;d)) 
⇒ (d(b;b) < d(b;u))))])
BY
{ (InstLemma `r2-straightedge-compass-simple1` [] THEN RepeatFor 3 (ParallelLast') THEN Auto) }
1
1. c : ℝ^2
2. d : ℝ^2
3. a : ℝ^2
4. ∀b:{b:ℝ^2| b ≠ a ∧ c_b_d} . (∃u:ℝ^2 [(cu=cd ∧ a_b_u ∧ (b ≠ d 
⇒ b ≠ u))])
5. b : {b:ℝ^2| 
        (d(b;b) < d(b;a)) ∧ ((¬(d(c;d) < d(c;b))) ∧ (¬(d(c;d) < d(b;d)))) ∧ (¬(r2-left(c;b;d) ∨ r2-left(c;d;b)))} 
⊢ ∃u:ℝ^2 [((¬((d(c;u) < d(c;d)) ∨ (d(c;d) < d(c;u))))
         ∧ (((¬(d(a;u) < d(a;b))) ∧ (¬(d(a;u) < d(b;u)))) ∧ (¬(r2-left(a;b;u) ∨ r2-left(a;u;b))))
         ∧ ((d(b;b) < d(b;d)) 
⇒ (d(b;b) < d(b;u))))]
Latex:
Latex:
No  Annotations
\mforall{}c,d,a:\mBbbR{}\^{}2.  \mforall{}b:\{b:\mBbbR{}\^{}2| 
                                (d(b;b)  <  d(b;a))
                                \mwedge{}  ((\mneg{}(d(c;d)  <  d(c;b)))  \mwedge{}  (\mneg{}(d(c;d)  <  d(b;d))))
                                \mwedge{}  (\mneg{}(r2-left(c;b;d)  \mvee{}  r2-left(c;d;b)))\}  .
    (\mexists{}u:\mBbbR{}\^{}2  [((\mneg{}((d(c;u)  <  d(c;d))  \mvee{}  (d(c;d)  <  d(c;u))))
                    \mwedge{}  (((\mneg{}(d(a;u)  <  d(a;b)))  \mwedge{}  (\mneg{}(d(a;u)  <  d(b;u))))  \mwedge{}  (\mneg{}(r2-left(a;b;u)  \mvee{}  r2-left(a;u;b))))
                    \mwedge{}  ((d(b;b)  <  d(b;d))  {}\mRightarrow{}  (d(b;b)  <  d(b;u))))])
By
Latex:
(InstLemma  `r2-straightedge-compass-simple1`  []  THEN  RepeatFor  3  (ParallelLast')  THEN  Auto)
Home
Index