Step * of Lemma euclidean-plane-axioms

No Annotations
g:EuclideanPlane
  (((∀a,b:Point.  (a  a))
   ∧ (∀a:Point. a))
   ∧ (∀a,b,x,y:Point.  (a ≡  B(xay)  B(xby)))
   ∧ ((∀a,b,c:Point.  (a ≡  ac ≅ cb)) ∧ (∀a,b,c:Point.  (a ≡  ac ≅ bc)))
   ∧ (∀a,b,c,d:Point.  (cd ≥ ab   d))
   ∧ (∀a,b,c:Point.  (a ≡  B(abc)))
   ∧ (∀a,b,c:Point.  (B(abc)  B(cba)))
   ∧ (∀a,b,c,d:Point.  (B(abd)  B(bcd)  B(abc)))
   ∧ (∀a,b:Point.  ab ≅ ba)
   ∧ (∀a,b,p,q,r,s:Point.  (ab ≅ pq  ab ≅ rs  pq ≅ rs))
   ∧ (∀a,b:Point.  aa ≅ bb)
   ∧ (∀a,b,c,d,A,B,C,D:Point.  (a  B(abc)  B(ABC)  ab ≅ AB  bc ≅ BC  ad ≅ AD  bd ≅ BD  cd ≅ CD)))
  ∧ (∀a,b,c:Point.  bc ⇐⇒ Colinear(a;b;c)))
  ∧ (∀a,b,c:Point.  (a leftof bc  leftof ca))
  ∧ (∀a,b,c:Point.  (a leftof bc  c))
  ∧ (∀a,b,x,y,z:Point.  (x leftof ab  leftof ab  B(xzy)  ab))
  ∧ (∀a,b,c,y:Point.  (a bc   Colinear(y;a;b)  bc)))
BY
((D THENA Auto)
   THEN (Assert BasicGeometryAxioms(g) ∧ (∀a,b,c:Point.  (a bc  Colinear(a;b;c)))) BY
               (D THEN Unhide THEN Auto THEN (D THEN Auto) THEN (D THENA Auto) THEN RWO "3<(-1) THEN Auto))
   }

1
1. EuclideanPlane
2. BasicGeometryAxioms(g) ∧ (∀a,b,c:Point.  (a bc  Colinear(a;b;c))))
⊢ ((∀a,b:Point.  (a  a))
  ∧ (∀a:Point. a))
  ∧ (∀a,b,x,y:Point.  (a ≡  B(xay)  B(xby)))
  ∧ ((∀a,b,c:Point.  (a ≡  ac ≅ cb)) ∧ (∀a,b,c:Point.  (a ≡  ac ≅ bc)))
  ∧ (∀a,b,c,d:Point.  (cd ≥ ab   d))
  ∧ (∀a,b,c:Point.  (a ≡  B(abc)))
  ∧ (∀a,b,c:Point.  (B(abc)  B(cba)))
  ∧ (∀a,b,c,d:Point.  (B(abd)  B(bcd)  B(abc)))
  ∧ (∀a,b:Point.  ab ≅ ba)
  ∧ (∀a,b,p,q,r,s:Point.  (ab ≅ pq  ab ≅ rs  pq ≅ rs))
  ∧ (∀a,b:Point.  aa ≅ bb)
  ∧ (∀a,b,c,d,A,B,C,D:Point.  (a  B(abc)  B(ABC)  ab ≅ AB  bc ≅ BC  ad ≅ AD  bd ≅ BD  cd ≅ CD)))
∧ (∀a,b,c:Point.  bc ⇐⇒ Colinear(a;b;c)))
∧ (∀a,b,c:Point.  (a leftof bc  leftof ca))
∧ (∀a,b,c:Point.  (a leftof bc  c))
∧ (∀a,b,x,y,z:Point.  (x leftof ab  leftof ab  B(xzy)  ab))
∧ (∀a,b,c,y:Point.  (a bc   Colinear(y;a;b)  bc))


Latex:


Latex:
No  Annotations
\mforall{}g:EuclideanPlane
    (((\mforall{}a,b:Point.    (a  \#  b  {}\mRightarrow{}  b  \#  a))
      \mwedge{}  (\mforall{}a:Point.  (\mneg{}a  \#  a))
      \mwedge{}  (\mforall{}a,b,x,y:Point.    (a  \mequiv{}  b  {}\mRightarrow{}  B(xay)  {}\mRightarrow{}  B(xby)))
      \mwedge{}  ((\mforall{}a,b,c:Point.    (a  \mequiv{}  b  {}\mRightarrow{}  ac  \mcong{}  cb))  \mwedge{}  (\mforall{}a,b,c:Point.    (a  \mequiv{}  b  {}\mRightarrow{}  ac  \mcong{}  bc)))
      \mwedge{}  (\mforall{}a,b,c,d:Point.    (cd  \mgeq{}  ab  {}\mRightarrow{}  a  \#  b  {}\mRightarrow{}  c  \#  d))
      \mwedge{}  (\mforall{}a,b,c:Point.    (a  \mequiv{}  b  {}\mRightarrow{}  B(abc)))
      \mwedge{}  (\mforall{}a,b,c:Point.    (B(abc)  {}\mRightarrow{}  B(cba)))
      \mwedge{}  (\mforall{}a,b,c,d:Point.    (B(abd)  {}\mRightarrow{}  B(bcd)  {}\mRightarrow{}  B(abc)))
      \mwedge{}  (\mforall{}a,b:Point.    ab  \mcong{}  ba)
      \mwedge{}  (\mforall{}a,b,p,q,r,s:Point.    (ab  \mcong{}  pq  {}\mRightarrow{}  ab  \mcong{}  rs  {}\mRightarrow{}  pq  \mcong{}  rs))
      \mwedge{}  (\mforall{}a,b:Point.    aa  \mcong{}  bb)
      \mwedge{}  (\mforall{}a,b,c,d,A,B,C,D:Point.
                (a  \#  b  {}\mRightarrow{}  B(abc)  {}\mRightarrow{}  B(ABC)  {}\mRightarrow{}  ab  \mcong{}  AB  {}\mRightarrow{}  bc  \mcong{}  BC  {}\mRightarrow{}  ad  \mcong{}  AD  {}\mRightarrow{}  bd  \mcong{}  BD  {}\mRightarrow{}  cd  \mcong{}  CD)))
    \mwedge{}  (\mforall{}a,b,c:Point.    (\mneg{}a  \#  bc  \mLeftarrow{}{}\mRightarrow{}  Colinear(a;b;c)))
    \mwedge{}  (\mforall{}a,b,c:Point.    (a  leftof  bc  {}\mRightarrow{}  b  leftof  ca))
    \mwedge{}  (\mforall{}a,b,c:Point.    (a  leftof  bc  {}\mRightarrow{}  b  \#  c))
    \mwedge{}  (\mforall{}a,b,x,y,z:Point.    (x  leftof  ab  {}\mRightarrow{}  y  leftof  ab  {}\mRightarrow{}  B(xzy)  {}\mRightarrow{}  z  \#  ab))
    \mwedge{}  (\mforall{}a,b,c,y:Point.    (a  \#  bc  {}\mRightarrow{}  y  \#  b  {}\mRightarrow{}  Colinear(y;a;b)  {}\mRightarrow{}  y  \#  bc)))


By


Latex:
((D  0  THENA  Auto)
  THEN  (Assert  BasicGeometryAxioms(g)  \mwedge{}  (\mforall{}a,b,c:Point.    (a  \#  bc  {}\mRightarrow{}  (\mneg{}Colinear(a;b;c))))  BY
                          (D  1
                            THEN  Unhide
                            THEN  Auto
                            THEN  (D  3  THEN  Auto)
                            THEN  (D  0  THENA  Auto)
                            THEN  RWO  "3<"  (-1)
                            THEN  Auto))
  )




Home Index