Step * of Lemma geo-intersect-points-iff

e:EuclideanPlane. ∀a,b,c,d:Point.
  (ab \/ cd
  ⇐⇒ a ≠ b
      ∧ c ≠ d
      ∧ (∃a1,b1,c1,d1,v:Point
          (a1-v-b1
          ∧ c1-v-d1
          ∧ Colinear(a1;a;b)
          ∧ Colinear(b1;a;b)
          ∧ Colinear(c1;c;d)
          ∧ Colinear(d1;c;d)
          ∧ a1 leftof c1d1
          ∧ b1 leftof d1c1)))
BY
Auto }

1
1. EuclideanPlane
2. Point
3. Point
4. Point
5. Point
6. ab \/ cd
⊢ c ≠ d

2
1. EuclideanPlane
2. Point
3. Point
4. Point
5. Point
6. ab \/ cd
⊢ ∃a1,b1,c1,d1,v:Point
   (a1-v-b1
   ∧ c1-v-d1
   ∧ Colinear(a1;a;b)
   ∧ Colinear(b1;a;b)
   ∧ Colinear(c1;c;d)
   ∧ Colinear(d1;c;d)
   ∧ a1 leftof c1d1
   ∧ b1 leftof d1c1)

3
1. EuclideanPlane
2. Point
3. Point
4. Point
5. Point
6. a ≠ b
7. c ≠ d
8. ∃a1,b1,c1,d1,v:Point
    (a1-v-b1
    ∧ c1-v-d1
    ∧ Colinear(a1;a;b)
    ∧ Colinear(b1;a;b)
    ∧ Colinear(c1;c;d)
    ∧ Colinear(d1;c;d)
    ∧ a1 leftof c1d1
    ∧ b1 leftof d1c1)
⊢ ab \/ cd


Latex:


Latex:
\mforall{}e:EuclideanPlane.  \mforall{}a,b,c,d:Point.
    (ab  \mbackslash{}/  cd
    \mLeftarrow{}{}\mRightarrow{}  a  \mneq{}  b
            \mwedge{}  c  \mneq{}  d
            \mwedge{}  (\mexists{}a1,b1,c1,d1,v:Point
                    (a1-v-b1
                    \mwedge{}  c1-v-d1
                    \mwedge{}  Colinear(a1;a;b)
                    \mwedge{}  Colinear(b1;a;b)
                    \mwedge{}  Colinear(c1;c;d)
                    \mwedge{}  Colinear(d1;c;d)
                    \mwedge{}  a1  leftof  c1d1
                    \mwedge{}  b1  leftof  d1c1)))


By


Latex:
Auto




Home Index