Step
*
1
1
1
6
2
of Lemma
rectangle-sides-cong
1. g : EuclideanPlane
2. a : Point
3. b : Point
4. c : Point
5. d : Point
6. e : Point
7. f : Point
8. e # ac
9. f # eb
10. ac  ⊥b be
11. df  ⊥e eb
12. d-e-f
13. a-b-c
14. ab ≅ eb
15. bc ≅ eb
16. de ≅ eb
17. ef ≅ eb
18. ae ≅ ce
19. db ≅ fb
20. db ≅ ae
21. feb ≅a deb
22. abe ≅a cbe
23. a leftof eb
24. f leftof eb
25. d leftof be
26. x : Point
27. Colinear(e;b;x)
28. a-x-d
29. x-e-b
30. p : Point
31. d-e-p
32. a-p-b
33. Rbed 
⇐ bed ≅a bep
34. bed ≅a bep
⊢ False
BY
{ ((InstLemma  `right-angles-not-complementary` [⌜g⌝;⌜p⌝;⌜e⌝;⌜b⌝]⋅ THENA Auto)
   THEN D -1
   THEN InstLemma  `sep-if-all-lsep` [⌜g⌝;⌜e⌝;⌜a⌝;⌜b⌝]⋅
   THEN Auto) }
Latex:
Latex:
1.  g  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  d  :  Point
6.  e  :  Point
7.  f  :  Point
8.  e  \#  ac
9.  f  \#  eb
10.  ac    \mbot{}b  be
11.  df    \mbot{}e  eb
12.  d-e-f
13.  a-b-c
14.  ab  \mcong{}  eb
15.  bc  \mcong{}  eb
16.  de  \mcong{}  eb
17.  ef  \mcong{}  eb
18.  ae  \mcong{}  ce
19.  db  \mcong{}  fb
20.  db  \mcong{}  ae
21.  feb  \mcong{}\msuba{}  deb
22.  abe  \mcong{}\msuba{}  cbe
23.  a  leftof  eb
24.  f  leftof  eb
25.  d  leftof  be
26.  x  :  Point
27.  Colinear(e;b;x)
28.  a-x-d
29.  x-e-b
30.  p  :  Point
31.  d-e-p
32.  a-p-b
33.  Rbed  \mLeftarrow{}{}  bed  \mcong{}\msuba{}  bep
34.  bed  \mcong{}\msuba{}  bep
\mvdash{}  False
By
Latex:
((InstLemma    `right-angles-not-complementary`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  D  -1
  THEN  InstLemma    `sep-if-all-lsep`  [\mkleeneopen{}g\mkleeneclose{};\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}b\mkleeneclose{}]\mcdot{}
  THEN  Auto)
Home
Index