Step * 1 1 1 of Lemma hypotenuse-leg-congruence


1. EuclideanPlane
2. Point
3. Point
4. Point
5. Point
6. Point
7. Point
8. Rabc
9. Rxyz
10. ac ≅ xz
11. ab ≅ xy
12. a ≠ b
13. x ≠ y
14. b ≠ c
15. y ≠ z
16. b1 Point
17. a-b-b1
18. bb1 ≅ ab
19. y1 Point
20. x-y-y1
21. yy1 ≅ xy
22. ac ≅ b1c
⊢ y1z ≅ b1c
BY
(Assert xz ≅ y1z BY
         ((InstLemma  `adjacent-right-angles-supplementary` [⌜e⌝;⌜z⌝;⌜y⌝;⌜x⌝;⌜y1⌝]⋅ THENA Auto)
          THEN ((FLemma  `right-angle-symmetry` [9]  THEN Auto)
                THEN (InstLemma  `congruence-preserves-right-angle2` [⌜e⌝;⌜z⌝;⌜y⌝;⌜x⌝]⋅ THENA Auto)
                )
          THEN (InstHyp [⌜z⌝;⌜y⌝;⌜y1⌝(-1)⋅ THEN Auto)
          THEN (FLemma  `right-angle-symmetry` [-1]  THEN Auto)
          THEN InstLemma  `right-angle-SAS` [⌜e⌝;⌜x⌝;⌜y⌝;⌜z⌝;⌜y1⌝;⌜y⌝;⌜z⌝]⋅
          THEN Auto)) }

1
1. EuclideanPlane
2. Point
3. Point
4. Point
5. Point
6. Point
7. Point
8. Rabc
9. Rxyz
10. ac ≅ xz
11. ab ≅ xy
12. a ≠ b
13. x ≠ y
14. b ≠ c
15. y ≠ z
16. b1 Point
17. a-b-b1
18. bb1 ≅ ab
19. y1 Point
20. x-y-y1
21. yy1 ≅ xy
22. ac ≅ b1c
23. xz ≅ y1z
⊢ y1z ≅ b1c


Latex:


Latex:

1.  e  :  EuclideanPlane
2.  a  :  Point
3.  b  :  Point
4.  c  :  Point
5.  x  :  Point
6.  y  :  Point
7.  z  :  Point
8.  Rabc
9.  Rxyz
10.  ac  \mcong{}  xz
11.  ab  \mcong{}  xy
12.  a  \mneq{}  b
13.  x  \mneq{}  y
14.  b  \mneq{}  c
15.  y  \mneq{}  z
16.  b1  :  Point
17.  a-b-b1
18.  bb1  \mcong{}  ab
19.  y1  :  Point
20.  x-y-y1
21.  yy1  \mcong{}  xy
22.  ac  \mcong{}  b1c
\mvdash{}  y1z  \mcong{}  b1c


By


Latex:
(Assert  xz  \mcong{}  y1z  BY
              ((InstLemma    `adjacent-right-angles-supplementary`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}y1\mkleeneclose{}]\mcdot{}  THENA  Auto)
                THEN  ((FLemma    `right-angle-symmetry`  [9]    THEN  Auto)
                            THEN  (InstLemma    `congruence-preserves-right-angle2`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{}]\mcdot{}  THENA  Auto)
                            )
                THEN  (InstHyp  [\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}y1\mkleeneclose{}]  (-1)\mcdot{}  THEN  Auto)
                THEN  (FLemma    `right-angle-symmetry`  [-1]    THEN  Auto)
                THEN  InstLemma    `right-angle-SAS`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{};\mkleeneopen{}y1\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{}]\mcdot{}
                THEN  Auto))




Home Index