Metamath Proof Explorer


Theorem ragcgra

Description: Right angles are congruent with each other. Theorem 11.16 of Schwabhauser p. 98. (Contributed by Thierry Arnoux, 5-Jul-2026)

Ref Expression
Hypotheses ragcgra.p P = Base G
ragcgra.g φ G 𝒢 Tarski
ragcgra.x φ X P
ragcgra.y φ Y P
ragcgra.z φ Z P
ragcgra.a φ A P
ragcgra.b φ B P
ragcgra.c φ C P
ragcgra.1 φ ⟨“ XYZ ”⟩ 𝒢 G
ragcgra.2 φ ⟨“ ABC ”⟩ 𝒢 G
ragcgra.3 φ A B
ragcgra.4 φ B C
ragcgra.5 φ X Y
ragcgra.6 φ Y Z
Assertion ragcgra φ ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩

Proof

Step Hyp Ref Expression
1 ragcgra.p P = Base G
2 ragcgra.g φ G 𝒢 Tarski
3 ragcgra.x φ X P
4 ragcgra.y φ Y P
5 ragcgra.z φ Z P
6 ragcgra.a φ A P
7 ragcgra.b φ B P
8 ragcgra.c φ C P
9 ragcgra.1 φ ⟨“ XYZ ”⟩ 𝒢 G
10 ragcgra.2 φ ⟨“ ABC ”⟩ 𝒢 G
11 ragcgra.3 φ A B
12 ragcgra.4 φ B C
13 ragcgra.5 φ X Y
14 ragcgra.6 φ Y Z
15 eqid Itv G = Itv G
16 eqid hl 𝒢 G = hl 𝒢 G
17 2 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z G 𝒢 Tarski
18 3 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z X P
19 4 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Y P
20 5 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Z P
21 6 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z A P
22 7 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z B P
23 8 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z C P
24 simp-6r φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z a P
25 simpllr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z c P
26 eqid dist G = dist G
27 eqid 𝒢 G = 𝒢 G
28 simp-4r φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z B dist G a = Y dist G X
29 28 eqcomd φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Y dist G X = B dist G a
30 1 26 15 17 19 18 22 24 29 tgcgrcomlr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z X dist G Y = a dist G B
31 simpr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z B dist G c = Y dist G Z
32 31 eqcomd φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Y dist G Z = B dist G c
33 eqid Line 𝒢 G = Line 𝒢 G
34 eqid pInv 𝒢 G = pInv 𝒢 G
35 12 necomd φ C B
36 1 26 15 33 34 2 6 7 8 10 11 35 ragncol φ ¬ C A Line 𝒢 G B A = B
37 1 33 15 2 6 7 8 36 ncoltgdim2 φ G Dim 𝒢 2
38 37 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z G Dim 𝒢 2
39 9 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ XYZ ”⟩ 𝒢 G
40 10 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ ABC ”⟩ 𝒢 G
41 1 26 15 33 34 17 21 22 23 40 ragcom φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ CBA ”⟩ 𝒢 G
42 35 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z C B
43 14 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Y Z
44 1 26 15 17 19 20 22 25 32 43 tgcgrneq φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z B c
45 simplr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z c hl 𝒢 G B C
46 1 15 16 25 23 22 17 33 45 hlln φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z c C Line 𝒢 G B
47 1 15 33 17 22 25 23 44 46 42 lnrot1 φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z C B Line 𝒢 G c
48 47 orcd φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z C B Line 𝒢 G c B = c
49 1 26 15 33 34 17 23 22 21 25 41 42 48 ragcol φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ cBA ”⟩ 𝒢 G
50 1 26 15 33 34 17 25 22 21 49 ragcom φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ ABc ”⟩ 𝒢 G
51 11 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z A B
52 13 necomd φ Y X
53 52 ad6antr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Y X
54 1 26 15 17 19 18 22 24 29 53 tgcgrneq φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z B a
55 simp-5r φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z a hl 𝒢 G B A
56 1 15 16 24 21 22 17 33 55 hlln φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z a A Line 𝒢 G B
57 1 15 33 17 22 24 21 54 56 51 lnrot1 φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z A B Line 𝒢 G a
58 57 orcd φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z A B Line 𝒢 G a B = a
59 1 26 15 33 34 17 21 22 25 24 50 51 58 ragcol φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ aBc ”⟩ 𝒢 G
60 1 26 15 17 38 18 19 20 24 22 25 39 59 30 32 hypcgr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z X dist G Z = a dist G c
61 1 26 15 17 18 20 24 25 60 tgcgrcomlr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z Z dist G X = c dist G a
62 1 26 27 17 18 19 20 24 22 25 30 32 61 trgcgr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ XYZ ”⟩ 𝒢 G ⟨“ aBc ”⟩
63 1 15 16 17 18 19 20 21 22 23 24 25 62 55 45 iscgrad φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩
64 63 anasss φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩
65 1 15 16 7 4 5 2 8 26 35 14 hlcgrex φ c P c hl 𝒢 G B C B dist G c = Y dist G Z
66 65 ad3antrrr φ a P a hl 𝒢 G B A B dist G a = Y dist G X c P c hl 𝒢 G B C B dist G c = Y dist G Z
67 64 66 r19.29a φ a P a hl 𝒢 G B A B dist G a = Y dist G X ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩
68 67 anasss φ a P a hl 𝒢 G B A B dist G a = Y dist G X ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩
69 1 15 16 7 4 3 2 6 26 11 52 hlcgrex φ a P a hl 𝒢 G B A B dist G a = Y dist G X
70 68 69 r19.29a φ ⟨“ XYZ ”⟩ 𝒢 G ⟨“ ABC ”⟩