Step
*
1
7
2
of Lemma
not-not-inner-pasch
1. e : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. p : Point
6. q : Point
7. b_q_c
8. ∀X:ℙ
     (Stable{X}
     
⇒ (((¬(a = b ∈ Point)) ∧ (c = a ∈ Point)) 
⇒ X)
     
⇒ (((¬(a = b ∈ Point)) ∧ (c = b ∈ Point)) 
⇒ X)
     
⇒ (((¬(a = b ∈ Point)) ∧ c-a-b) 
⇒ X)
     
⇒ (((¬(a = b ∈ Point)) ∧ a-c-b) 
⇒ X)
     
⇒ (((¬(a = b ∈ Point)) ∧ a-b-c) 
⇒ X)
     
⇒ ((¬Colinear(a;b;c)) 
⇒ X)
     
⇒ X)
9. ¬Colinear(a;b;c)
10. c = p ∈ Point
⊢ ∃x:Point. (p_x_b ∧ q_x_a)
BY
{ ((RevHypSubst (-1) 0 THENA Auto) THEN With ⌜q⌝ (D 0)⋅ THEN EAuto 1) }
Latex:
Latex:
1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  p  :  Point
6.  q  :  Point
7.  b\_q\_c
8.  \mforall{}X:\mBbbP{}
          (Stable\{X\}
          {}\mRightarrow{}  (((\mneg{}(a  =  b))  \mwedge{}  (c  =  a))  {}\mRightarrow{}  X)
          {}\mRightarrow{}  (((\mneg{}(a  =  b))  \mwedge{}  (c  =  b))  {}\mRightarrow{}  X)
          {}\mRightarrow{}  (((\mneg{}(a  =  b))  \mwedge{}  c-a-b)  {}\mRightarrow{}  X)
          {}\mRightarrow{}  (((\mneg{}(a  =  b))  \mwedge{}  a-c-b)  {}\mRightarrow{}  X)
          {}\mRightarrow{}  (((\mneg{}(a  =  b))  \mwedge{}  a-b-c)  {}\mRightarrow{}  X)
          {}\mRightarrow{}  ((\mneg{}Colinear(a;b;c))  {}\mRightarrow{}  X)
          {}\mRightarrow{}  X)
9.  \mneg{}Colinear(a;b;c)
10.  c  =  p
\mvdash{}  \mexists{}x:Point.  (p\_x\_b  \mwedge{}  q\_x\_a)
By
Latex:
((RevHypSubst  (-1)  0  THENA  Auto)  THEN  With  \mkleeneopen{}q\mkleeneclose{}  (D  0)\mcdot{}  THEN  EAuto  1)
Home
Index