Theorem iscgra 26595

Description: Property for two angles ABC and DEF to be congruent. This is a modified version of the definition 11.3 of [Schwabhauser] p. 95. where the number of constructed points has been reduced to two. We chose this version rather than the textbook version because it is shorter and therefore simpler to work with. Theorem dfcgra2 26616 shows that those definitions are indeed equivalent. (Contributed by Thierry Arnoux, 31-Jul-2020.)

Hypotheses

Ref	Expression
iscgra.p	⊢ 𝑃 = (Base‘𝐺)
iscgra.i	⊢ 𝐼 = (Itv‘𝐺)
iscgra.k	⊢ 𝐾 = (hlG‘𝐺)
iscgra.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
iscgra.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
iscgra.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)
iscgra.c	⊢ (𝜑 → 𝐶 ∈ 𝑃)
iscgra.d	⊢ (𝜑 → 𝐷 ∈ 𝑃)
iscgra.e	⊢ (𝜑 → 𝐸 ∈ 𝑃)
iscgra.f	⊢ (𝜑 → 𝐹 ∈ 𝑃)

Assertion

Ref	Expression
iscgra	⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩ ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹)))

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦   𝑥,𝐶,𝑦   𝑥,𝐷,𝑦   𝑥,𝐸,𝑦   𝑥,𝐹,𝑦   𝑥,𝐾,𝑦   𝜑,𝑥,𝑦   𝑥,𝐺,𝑦   𝑥,𝐼,𝑦   𝑥,𝑃,𝑦

Proof of Theorem iscgra

Dummy variables 𝑎 𝑏 𝑔 𝑘 𝑝 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpl 485	. . . . . . 7 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → 𝑎 = ⟨“𝐴𝐵𝐶”⟩)
2		eqidd 2822	. . . . . . . 8 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → 𝑥 = 𝑥)
3		simpr 487	. . . . . . . . 9 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → 𝑏 = ⟨“𝐷𝐸𝐹”⟩)
4	3	fveq1d 6672	. . . . . . . 8 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑏‘1) = (⟨“𝐷𝐸𝐹”⟩‘1))
5		eqidd 2822	. . . . . . . 8 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → 𝑦 = 𝑦)
6	2, 4, 5	s3eqd 14226	. . . . . . 7 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → ⟨“𝑥(𝑏‘1)𝑦”⟩ = ⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩)
7	1, 6	breq12d 5079	. . . . . 6 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ↔ ⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩))
8	4	fveq2d 6674	. . . . . . 7 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝐾‘(𝑏‘1)) = (𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1)))
9	3	fveq1d 6672	. . . . . . 7 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑏‘0) = (⟨“𝐷𝐸𝐹”⟩‘0))
10	2, 8, 9	breq123d 5080	. . . . . 6 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ↔ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0)))
11	3	fveq1d 6672	. . . . . . 7 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑏‘2) = (⟨“𝐷𝐸𝐹”⟩‘2))
12	5, 8, 11	breq123d 5080	. . . . . 6 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (𝑦(𝐾‘(𝑏‘1))(𝑏‘2) ↔ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2)))
13	7, 10, 12	3anbi123d 1432	. . . . 5 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → ((𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2))))
14	13	2rexbidv 3300	. . . 4 ⊢ ((𝑎 = ⟨“𝐴𝐵𝐶”⟩ ∧ 𝑏 = ⟨“𝐷𝐸𝐹”⟩) → (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2))))
15		eqid 2821	. . . 4 ⊢ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))}
16	14, 15	brab2a 5644	. . 3 ⊢ (⟨“𝐴𝐵𝐶”⟩{⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))}⟨“𝐷𝐸𝐹”⟩ ↔ ((⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2))))
17		eqidd 2822	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → 𝑥 = 𝑥)
18		iscgra.e	. . . . . . . . . 10 ⊢ (𝜑 → 𝐸 ∈ 𝑃)
19		s3fv1 14254	. . . . . . . . . 10 ⊢ (𝐸 ∈ 𝑃 → (⟨“𝐷𝐸𝐹”⟩‘1) = 𝐸)
20	18, 19	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (⟨“𝐷𝐸𝐹”⟩‘1) = 𝐸)
21	20	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (⟨“𝐷𝐸𝐹”⟩‘1) = 𝐸)
22		eqidd 2822	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → 𝑦 = 𝑦)
23	17, 21, 22	s3eqd 14226	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → ⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ = ⟨“𝑥𝐸𝑦”⟩)
24	23	breq2d 5078	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ↔ ⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩))
25	21	fveq2d 6674	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1)) = (𝐾‘𝐸))
26		iscgra.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑃)
27		s3fv0 14253	. . . . . . . . 9 ⊢ (𝐷 ∈ 𝑃 → (⟨“𝐷𝐸𝐹”⟩‘0) = 𝐷)
28	26, 27	syl 17	. . . . . . . 8 ⊢ (𝜑 → (⟨“𝐷𝐸𝐹”⟩‘0) = 𝐷)
29	28	adantr 483	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (⟨“𝐷𝐸𝐹”⟩‘0) = 𝐷)
30	17, 25, 29	breq123d 5080	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ↔ 𝑥(𝐾‘𝐸)𝐷))
31		iscgra.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ 𝑃)
32		s3fv2 14255	. . . . . . . . 9 ⊢ (𝐹 ∈ 𝑃 → (⟨“𝐷𝐸𝐹”⟩‘2) = 𝐹)
33	31, 32	syl 17	. . . . . . . 8 ⊢ (𝜑 → (⟨“𝐷𝐸𝐹”⟩‘2) = 𝐹)
34	33	adantr 483	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (⟨“𝐷𝐸𝐹”⟩‘2) = 𝐹)
35	22, 25, 34	breq123d 5080	. . . . . 6 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2) ↔ 𝑦(𝐾‘𝐸)𝐹))
36	24, 30, 35	3anbi123d 1432	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → ((⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2)) ↔ (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹)))
37	36	2rexbidva 3299	. . . 4 ⊢ (𝜑 → (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2)) ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹)))
38	37	anbi2d 630	. . 3 ⊢ (𝜑 → (((⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥(⟨“𝐷𝐸𝐹”⟩‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘0) ∧ 𝑦(𝐾‘(⟨“𝐷𝐸𝐹”⟩‘1))(⟨“𝐷𝐸𝐹”⟩‘2))) ↔ ((⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹))))
39	16, 38	syl5bb 285	. 2 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩{⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))}⟨“𝐷𝐸𝐹”⟩ ↔ ((⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹))))
40		iscgra.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
41		elex 3512	. . . 4 ⊢ (𝐺 ∈ TarskiG → 𝐺 ∈ V)
42		iscgra.p	. . . . . . . 8 ⊢ 𝑃 = (Base‘𝐺)
43		iscgra.k	. . . . . . . 8 ⊢ 𝐾 = (hlG‘𝐺)
44		simpl 485	. . . . . . . . . . . . 13 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → 𝑝 = 𝑃)
45	44	eqcomd 2827	. . . . . . . . . . . 12 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → 𝑃 = 𝑝)
46	45	oveq1d 7171	. . . . . . . . . . 11 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑃 ↑m (0..^3)) = (𝑝 ↑m (0..^3)))
47	46	eleq2d 2898	. . . . . . . . . 10 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑎 ∈ (𝑃 ↑m (0..^3)) ↔ 𝑎 ∈ (𝑝 ↑m (0..^3))))
48	46	eleq2d 2898	. . . . . . . . . 10 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑏 ∈ (𝑃 ↑m (0..^3)) ↔ 𝑏 ∈ (𝑝 ↑m (0..^3))))
49	47, 48	anbi12d 632	. . . . . . . . 9 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ↔ (𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3)))))
50		simpr 487	. . . . . . . . . . . . . . 15 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → 𝑘 = 𝐾)
51	50	fveq1d 6672	. . . . . . . . . . . . . 14 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑘‘(𝑏‘1)) = (𝐾‘(𝑏‘1)))
52	51	breqd 5077	. . . . . . . . . . . . 13 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ↔ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0)))
53	51	breqd 5077	. . . . . . . . . . . . 13 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (𝑦(𝑘‘(𝑏‘1))(𝑏‘2) ↔ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))
54	52, 53	3anbi23d 1435	. . . . . . . . . . . 12 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → ((𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2)) ↔ (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2))))
55	54	bicomd 225	. . . . . . . . . . 11 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → ((𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2))))
56	45, 55	rexeqbidv 3402	. . . . . . . . . 10 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2))))
57	45, 56	rexeqbidv 3402	. . . . . . . . 9 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2))))
58	49, 57	anbi12d 632	. . . . . . . 8 ⊢ ((𝑝 = 𝑃 ∧ 𝑘 = 𝐾) → (((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2))) ↔ ((𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2)))))
59	42, 43, 58	sbcie2s 16540	. . . . . . 7 ⊢ (𝑔 = 𝐺 → ([(Base‘𝑔) / 𝑝][(hlG‘𝑔) / 𝑘]((𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2))) ↔ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))))
60	59	opabbidv 5132	. . . . . 6 ⊢ (𝑔 = 𝐺 → {⟨𝑎, 𝑏⟩ ∣ [(Base‘𝑔) / 𝑝][(hlG‘𝑔) / 𝑘]((𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2)))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))})
61		fveq2 6670	. . . . . . . . . . 11 ⊢ (𝑔 = 𝐺 → (cgrG‘𝑔) = (cgrG‘𝐺))
62	61	breqd 5077	. . . . . . . . . 10 ⊢ (𝑔 = 𝐺 → (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ↔ 𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩))
63	62	3anbi1d 1436	. . . . . . . . 9 ⊢ (𝑔 = 𝐺 → ((𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2))))
64	63	2rexbidv 3300	. . . . . . . 8 ⊢ (𝑔 = 𝐺 → (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)) ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2))))
65	64	anbi2d 630	. . . . . . 7 ⊢ (𝑔 = 𝐺 → (((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2))) ↔ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))))
66	65	opabbidv 5132	. . . . . 6 ⊢ (𝑔 = 𝐺 → {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))})
67	60, 66	eqtrd 2856	. . . . 5 ⊢ (𝑔 = 𝐺 → {⟨𝑎, 𝑏⟩ ∣ [(Base‘𝑔) / 𝑝][(hlG‘𝑔) / 𝑘]((𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2)))} = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))})
68		df-cgra 26594	. . . . 5 ⊢ cgrA = (𝑔 ∈ V ↦ {⟨𝑎, 𝑏⟩ ∣ [(Base‘𝑔) / 𝑝][(hlG‘𝑔) / 𝑘]((𝑎 ∈ (𝑝 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑝 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑝 ∃𝑦 ∈ 𝑝 (𝑎(cgrG‘𝑔)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝑘‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝑘‘(𝑏‘1))(𝑏‘2)))})
69		ovex 7189	. . . . . . 7 ⊢ (𝑃 ↑m (0..^3)) ∈ V
70	69, 69	xpex 7476	. . . . . 6 ⊢ ((𝑃 ↑m (0..^3)) × (𝑃 ↑m (0..^3))) ∈ V
71		opabssxp 5643	. . . . . 6 ⊢ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))} ⊆ ((𝑃 ↑m (0..^3)) × (𝑃 ↑m (0..^3)))
72	70, 71	ssexi 5226	. . . . 5 ⊢ {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))} ∈ V
73	67, 68, 72	fvmpt 6768	. . . 4 ⊢ (𝐺 ∈ V → (cgrA‘𝐺) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))})
74	40, 41, 73	3syl 18	. . 3 ⊢ (𝜑 → (cgrA‘𝐺) = {⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))})
75	74	breqd 5077	. 2 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩ ↔ ⟨“𝐴𝐵𝐶”⟩{⟨𝑎, 𝑏⟩ ∣ ((𝑎 ∈ (𝑃 ↑m (0..^3)) ∧ 𝑏 ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (𝑎(cgrG‘𝐺)⟨“𝑥(𝑏‘1)𝑦”⟩ ∧ 𝑥(𝐾‘(𝑏‘1))(𝑏‘0) ∧ 𝑦(𝐾‘(𝑏‘1))(𝑏‘2)))}⟨“𝐷𝐸𝐹”⟩))
76		iscgra.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
77		iscgra.b	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
78		iscgra.c	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ 𝑃)
79	76, 77, 78	s3cld 14234	. . . . 5 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ Word 𝑃)
80		s3len 14256	. . . . 5 ⊢ (♯‘⟨“𝐴𝐵𝐶”⟩) = 3
81	42	fvexi 6684	. . . . . 6 ⊢ 𝑃 ∈ V
82		3nn0 11916	. . . . . 6 ⊢ 3 ∈ ℕ0
83		wrdmap 13897	. . . . . 6 ⊢ ((𝑃 ∈ V ∧ 3 ∈ ℕ0) → ((⟨“𝐴𝐵𝐶”⟩ ∈ Word 𝑃 ∧ (♯‘⟨“𝐴𝐵𝐶”⟩) = 3) ↔ ⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3))))
84	81, 82, 83	mp2an 690	. . . . 5 ⊢ ((⟨“𝐴𝐵𝐶”⟩ ∈ Word 𝑃 ∧ (♯‘⟨“𝐴𝐵𝐶”⟩) = 3) ↔ ⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)))
85	79, 80, 84	sylanblc 591	. . . 4 ⊢ (𝜑 → ⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)))
86	26, 18, 31	s3cld 14234	. . . . 5 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ Word 𝑃)
87		s3len 14256	. . . . 5 ⊢ (♯‘⟨“𝐷𝐸𝐹”⟩) = 3
88		wrdmap 13897	. . . . . 6 ⊢ ((𝑃 ∈ V ∧ 3 ∈ ℕ0) → ((⟨“𝐷𝐸𝐹”⟩ ∈ Word 𝑃 ∧ (♯‘⟨“𝐷𝐸𝐹”⟩) = 3) ↔ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))))
89	81, 82, 88	mp2an 690	. . . . 5 ⊢ ((⟨“𝐷𝐸𝐹”⟩ ∈ Word 𝑃 ∧ (♯‘⟨“𝐷𝐸𝐹”⟩) = 3) ↔ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3)))
90	86, 87, 89	sylanblc 591	. . . 4 ⊢ (𝜑 → ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3)))
91	85, 90	jca 514	. . 3 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))))
92	91	biantrurd 535	. 2 ⊢ (𝜑 → (∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹) ↔ ((⟨“𝐴𝐵𝐶”⟩ ∈ (𝑃 ↑m (0..^3)) ∧ ⟨“𝐷𝐸𝐹”⟩ ∈ (𝑃 ↑m (0..^3))) ∧ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹))))
93	39, 75, 92	3bitr4d 313	1 ⊢ (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐷𝐸𝐹”⟩ ↔ ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐸𝑦”⟩ ∧ 𝑥(𝐾‘𝐸)𝐷 ∧ 𝑦(𝐾‘𝐸)𝐹)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114  ∃wrex 3139  Vcvv 3494  [wsbc 3772   class class class wbr 5066  {copab 5128   × cxp 5553  ‘cfv 6355  (class class class)co 7156   ↑_m cmap 8406  0cc0 10537  1c1 10538  2c2 11693  3c3 11694  ℕ₀cn0 11898  ..^cfzo 13034  ♯chash 13691  Word cword 13862  ⟨“cs3 14204  Basecbs 16483  TarskiGcstrkg 26216  Itvcitv 26222  cgrGccgrg 26296  hlGchlg 26386  cgrAccgra 26593

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-int 4877  df-iun 4921  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-om 7581  df-1st 7689  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-oadd 8106  df-er 8289  df-map 8408  df-en 8510  df-dom 8511  df-sdom 8512  df-fin 8513  df-card 9368  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-nn 11639  df-2 11701  df-3 11702  df-n0 11899  df-z 11983  df-uz 12245  df-fz 12894  df-fzo 13035  df-hash 13692  df-word 13863  df-concat 13923  df-s1 13950  df-s2 14210  df-s3 14211  df-cgra 26594

This theorem is referenced by:  iscgra1  26596  iscgrad  26597  cgrane1  26598  cgrane2  26599  cgrane3  26600  cgrane4  26601  cgrahl1  26602  cgrahl2  26603  cgracgr  26604  cgraswap  26606  cgracom  26608  cgratr  26609  flatcgra  26610  cgrabtwn  26612  cgrahl  26613  sacgr  26617