Theorem qustgplem 24467

Description: Lemma for qustgp 24468. (Contributed by Mario Carneiro, 18-Sep-2015.)

Hypotheses

Ref	Expression
qustgp.h	⊢ 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌))
qustgpopn.x	⊢ 𝑋 = (Base‘𝐺)
qustgpopn.j	⊢ 𝐽 = (TopOpen‘𝐺)
qustgpopn.k	⊢ 𝐾 = (TopOpen‘𝐻)
qustgpopn.f	⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ [𝑥](𝐺 ~QG 𝑌))
qustgplem.m	⊢ − = (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌))

Assertion

Ref	Expression
qustgplem	⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 ∈ TopGrp)

Distinct variable groups:   𝑥,𝑤,𝑧,𝐺   𝑤,𝐽,𝑥,𝑧   𝑤,𝐹,𝑧   𝑤,𝑋,𝑥,𝑧   𝑤,𝐻,𝑥,𝑧   𝑤,𝐾,𝑥,𝑧   𝑤,𝑌,𝑥,𝑧

Allowed substitution hints:   𝐹(𝑥)   − (𝑥, 𝑧, 𝑤)

Proof of Theorem qustgplem

Dummy variables 𝑡 𝑏 𝑎 𝑐 𝑑 𝑝 𝑞 𝑟 𝑠 𝑢 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		qustgp.h	. . . 4 ⊢ 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌))
2	1	qusgrp 19427	. . 3 ⊢ (𝑌 ∈ (NrmSGrp‘𝐺) → 𝐻 ∈ Grp)
3	2	adantl 487	. 2 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 ∈ Grp)
4	1	a1i 11	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 = (𝐺 /s (𝐺 ~QG 𝑌)))
5		qustgpopn.x	. . . . . . . 8 ⊢ 𝑋 = (Base‘𝐺)
6	5	a1i 11	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝑋 = (Base‘𝐺))
7		qustgpopn.f	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ 𝑋 ↦ [𝑥](𝐺 ~QG 𝑌))
8		ovex 7473	. . . . . . . 8 ⊢ (𝐺 ~QG 𝑌) ∈ V
9	8	a1i 11	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝐺 ~QG 𝑌) ∈ V)
10		simpl 488	. . . . . . 7 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐺 ∈ TopGrp)
11	4, 6, 7, 9, 10	qusval 17740	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 = (𝐹 “s 𝐺))
12	4, 6, 7, 9, 10	quslem 17741	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐹:𝑋⟶onto(𝑋 / (𝐺 ~QG 𝑌)))
13		qustgpopn.j	. . . . . 6 ⊢ 𝐽 = (TopOpen‘𝐺)
14		qustgpopn.k	. . . . . 6 ⊢ 𝐾 = (TopOpen‘𝐻)
15	11, 6, 12, 10, 13, 14	imastopn 24066	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐾 = (𝐽 qTop 𝐹))
16	13, 5	tgptopon 24428	. . . . . . 7 ⊢ (𝐺 ∈ TopGrp → 𝐽 ∈ (TopOn‘𝑋))
17	16	adantr 486	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐽 ∈ (TopOn‘𝑋))
18		qtoptopon 24050	. . . . . 6 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐹:𝑋⟶onto(𝑋 / (𝐺 ~QG 𝑌))) → (𝐽 qTop 𝐹) ∈ (TopOn‘(𝑋 / (𝐺 ~QG 𝑌))))
19	17, 12, 18	syl2anc 596	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝐽 qTop 𝐹) ∈ (TopOn‘(𝑋 / (𝐺 ~QG 𝑌))))
20	15, 19	eqeltrd 2864	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐾 ∈ (TopOn‘(𝑋 / (𝐺 ~QG 𝑌))))
21	4, 6, 9, 10	qusbas 17743	. . . . 5 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝑋 / (𝐺 ~QG 𝑌)) = (Base‘𝐻))
22	21	fveq2d 6909	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (TopOn‘(𝑋 / (𝐺 ~QG 𝑌))) = (TopOn‘(Base‘𝐻)))
23	20, 22	eleqtrd 2866	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐾 ∈ (TopOn‘(Base‘𝐻)))
24		eqid 2763	. . . 4 ⊢ (Base‘𝐻) = (Base‘𝐻)
25	24, 14	istps 23279	. . 3 ⊢ (𝐻 ∈ TopSp ↔ 𝐾 ∈ (TopOn‘(Base‘𝐻)))
26	23, 25	sylibr 237	. 2 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 ∈ TopSp)
27		eqid 2763	. . . . 5 ⊢ (-g‘𝐻) = (-g‘𝐻)
28	24, 27	grpsubf 19255	. . . 4 ⊢ (𝐻 ∈ Grp → (-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻))
29	3, 28	syl 18	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻))
30		cnvimass 6210	. . . . . . . . 9 ⊢ (◡(-g‘𝐻) “ 𝑢) ⊆ dom (-g‘𝐻)
31	29	fdmd 6739	. . . . . . . . . 10 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → dom (-g‘𝐻) = ((Base‘𝐻) × (Base‘𝐻)))
32	31	adantr 486	. . . . . . . . 9 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → dom (-g‘𝐻) = ((Base‘𝐻) × (Base‘𝐻)))
33	30, 32	sseqtrid 3955	. . . . . . . 8 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (◡(-g‘𝐻) “ 𝑢) ⊆ ((Base‘𝐻) × (Base‘𝐻)))
34		relxp 5673	. . . . . . . 8 ⊢ Rel ((Base‘𝐻) × (Base‘𝐻))
35		relss 5763	. . . . . . . 8 ⊢ ((◡(-g‘𝐻) “ 𝑢) ⊆ ((Base‘𝐻) × (Base‘𝐻)) → (Rel ((Base‘𝐻) × (Base‘𝐻)) → Rel (◡(-g‘𝐻) “ 𝑢)))
36	33, 34, 35	mpisyl 22	. . . . . . 7 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → Rel (◡(-g‘𝐻) “ 𝑢))
37	33	sseld 3912	. . . . . . . 8 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ ((Base‘𝐻) × (Base‘𝐻))))
38		vex 3458	. . . . . . . . . . . . . 14 ⊢ 𝑥 ∈ V
39	38	elqs 8810	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (𝑋 / (𝐺 ~QG 𝑌)) ↔ ∃𝑎 ∈ 𝑋 𝑥 = [𝑎](𝐺 ~QG 𝑌))
40	21	adantr 486	. . . . . . . . . . . . . 14 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (𝑋 / (𝐺 ~QG 𝑌)) = (Base‘𝐻))
41	40	eleq2d 2850	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (𝑥 ∈ (𝑋 / (𝐺 ~QG 𝑌)) ↔ 𝑥 ∈ (Base‘𝐻)))
42	39, 41	bitr3id 288	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (∃𝑎 ∈ 𝑋 𝑥 = [𝑎](𝐺 ~QG 𝑌) ↔ 𝑥 ∈ (Base‘𝐻)))
43		vex 3458	. . . . . . . . . . . . . 14 ⊢ 𝑦 ∈ V
44	43	elqs 8810	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (𝑋 / (𝐺 ~QG 𝑌)) ↔ ∃𝑏 ∈ 𝑋 𝑦 = [𝑏](𝐺 ~QG 𝑌))
45	40	eleq2d 2850	. . . . . . . . . . . . 13 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (𝑦 ∈ (𝑋 / (𝐺 ~QG 𝑌)) ↔ 𝑦 ∈ (Base‘𝐻)))
46	44, 45	bitr3id 288	. . . . . . . . . . . 12 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (∃𝑏 ∈ 𝑋 𝑦 = [𝑏](𝐺 ~QG 𝑌) ↔ 𝑦 ∈ (Base‘𝐻)))
47	42, 46	anbi12d 644	. . . . . . . . . . 11 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → ((∃𝑎 ∈ 𝑋 𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ ∃𝑏 ∈ 𝑋 𝑦 = [𝑏](𝐺 ~QG 𝑌)) ↔ (𝑥 ∈ (Base‘𝐻) ∧ 𝑦 ∈ (Base‘𝐻))))
48		reeanv 3238	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝑋 ∃𝑏 ∈ 𝑋 (𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) ↔ (∃𝑎 ∈ 𝑋 𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ ∃𝑏 ∈ 𝑋 𝑦 = [𝑏](𝐺 ~QG 𝑌)))
49		opelxp 5691	. . . . . . . . . . 11 ⊢ (⟨𝑥, 𝑦⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ↔ (𝑥 ∈ (Base‘𝐻) ∧ 𝑦 ∈ (Base‘𝐻)))
50	47, 48, 49	3bitr4g 317	. . . . . . . . . 10 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (∃𝑎 ∈ 𝑋 ∃𝑏 ∈ 𝑋 (𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) ↔ ⟨𝑥, 𝑦⟩ ∈ ((Base‘𝐻) × (Base‘𝐻))))
51	3	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝐻 ∈ Grp)
52	51, 28	syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻))
53		ffn 6728	. . . . . . . . . . . . . 14 ⊢ ((-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻) → (-g‘𝐻) Fn ((Base‘𝐻) × (Base‘𝐻)))
54		elpreima 7077	. . . . . . . . . . . . . 14 ⊢ ((-g‘𝐻) Fn ((Base‘𝐻) × (Base‘𝐻)) → (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ∧ ((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) ∈ 𝑢)))
55	52, 53, 54	3syl 19	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ∧ ((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) ∈ 𝑢)))
56		df-ov 7443	. . . . . . . . . . . . . . . . 17 ⊢ ([𝑎](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑏](𝐺 ~QG 𝑌)) = ((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩)
57		simpllr 788	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑌 ∈ (NrmSGrp‘𝐺))
58		simprl 783	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑎 ∈ 𝑋)
59		simprr 785	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑏 ∈ 𝑋)
60		eqid 2763	. . . . . . . . . . . . . . . . . . 19 ⊢ (-g‘𝐺) = (-g‘𝐺)
61	1, 5, 60, 27	qussub 19432	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → ([𝑎](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑏](𝐺 ~QG 𝑌)) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
62	57, 58, 59, 61	syl3anc 1399	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ([𝑎](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑏](𝐺 ~QG 𝑌)) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
63	56, 62	eqtr3id 2812	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
64	63	eleq1d 2849	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) ∈ 𝑢 ↔ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢))
65		simpr 490	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋))
66		qustgplem.m	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ − = (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌))
67		tgpgrp 24424	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝐺 ∈ TopGrp → 𝐺 ∈ Grp)
68	67	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐺 ∈ Grp)
69	5, 60	grpsubf 19255	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝐺 ∈ Grp → (-g‘𝐺):(𝑋 × 𝑋)⟶𝑋)
70		ffn 6728	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((-g‘𝐺):(𝑋 × 𝑋)⟶𝑋 → (-g‘𝐺) Fn (𝑋 × 𝑋))
71	68, 69, 70	3syl 19	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (-g‘𝐺) Fn (𝑋 × 𝑋))
72		fnov 7571	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((-g‘𝐺) Fn (𝑋 × 𝑋) ↔ (-g‘𝐺) = (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ (𝑧(-g‘𝐺)𝑤)))
73	71, 72	sylib 221	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (-g‘𝐺) = (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ (𝑧(-g‘𝐺)𝑤)))
74	13, 60	tgpsubcn 24436	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝐺 ∈ TopGrp → (-g‘𝐺) ∈ ((𝐽 ×t 𝐽) Cn 𝐽))
75	74	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (-g‘𝐺) ∈ ((𝐽 ×t 𝐽) Cn 𝐽))
76	73, 75	eqeltrrd 2865	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ (𝑧(-g‘𝐺)𝑤)) ∈ ((𝐽 ×t 𝐽) Cn 𝐽))
77		ecexg 8746	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝐺 ~QG 𝑌) ∈ V → [𝑥](𝐺 ~QG 𝑌) ∈ V)
78	8, 77	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ [𝑥](𝐺 ~QG 𝑌) ∈ V
79	78, 7	fnmpti 6701	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ 𝐹 Fn 𝑋
80		qtopid 24051	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐹 Fn 𝑋) → 𝐹 ∈ (𝐽 Cn (𝐽 qTop 𝐹)))
81	17, 79, 80	sylancl 598	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐹 ∈ (𝐽 Cn (𝐽 qTop 𝐹)))
82	15	oveq2d 7456	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝐽 Cn 𝐾) = (𝐽 Cn (𝐽 qTop 𝐹)))
83	81, 82	eleqtrrd 2867	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐹 ∈ (𝐽 Cn 𝐾))
84	7, 83	eqeltrrid 2869	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝑥 ∈ 𝑋 ↦ [𝑥](𝐺 ~QG 𝑌)) ∈ (𝐽 Cn 𝐾))
85		eceq1 8782	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = (𝑧(-g‘𝐺)𝑤) → [𝑥](𝐺 ~QG 𝑌) = [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌))
86	17, 17, 76, 17, 84, 85	cnmpt21 24017	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝑧 ∈ 𝑋, 𝑤 ∈ 𝑋 ↦ [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌)) ∈ ((𝐽 ×t 𝐽) Cn 𝐾))
87	66, 86	eqeltrid 2868	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → − ∈ ((𝐽 ×t 𝐽) Cn 𝐾))
88	87	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → − ∈ ((𝐽 ×t 𝐽) Cn 𝐾))
89		simplr 781	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝑢 ∈ 𝐾)
90		cnima 23610	. . . . . . . . . . . . . . . . . . . 20 ⊢ (( − ∈ ((𝐽 ×t 𝐽) Cn 𝐾) ∧ 𝑢 ∈ 𝐾) → (◡ − “ 𝑢) ∈ (𝐽 ×t 𝐽))
91	88, 89, 90	syl2anc 596	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (◡ − “ 𝑢) ∈ (𝐽 ×t 𝐽))
92	17	ad2antrr 739	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → 𝐽 ∈ (TopOn‘𝑋))
93		eltx 23914	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝐽 ∈ (TopOn‘𝑋)) → ((◡ − “ 𝑢) ∈ (𝐽 ×t 𝐽) ↔ ∀𝑡 ∈ (◡ − “ 𝑢)∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
94	92, 92, 93	syl2anc 596	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((◡ − “ 𝑢) ∈ (𝐽 ×t 𝐽) ↔ ∀𝑡 ∈ (◡ − “ 𝑢)∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
95	91, 94	mpbid 235	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ∀𝑡 ∈ (◡ − “ 𝑢)∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))
96		ecexg 8746	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐺 ~QG 𝑌) ∈ V → [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌) ∈ V)
97	8, 96	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌) ∈ V
98	66, 97	fnmpoi 8103	. . . . . . . . . . . . . . . . . . . . 21 ⊢ − Fn (𝑋 × 𝑋)
99		elpreima 7077	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ( − Fn (𝑋 × 𝑋) → (⟨𝑎, 𝑏⟩ ∈ (◡ − “ 𝑢) ↔ (⟨𝑎, 𝑏⟩ ∈ (𝑋 × 𝑋) ∧ ( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢)))
100	98, 99	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⟨𝑎, 𝑏⟩ ∈ (◡ − “ 𝑢) ↔ (⟨𝑎, 𝑏⟩ ∈ (𝑋 × 𝑋) ∧ ( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢))
101		opelxp 5691	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⟨𝑎, 𝑏⟩ ∈ (𝑋 × 𝑋) ↔ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋))
102	101	anbi1i 636	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((⟨𝑎, 𝑏⟩ ∈ (𝑋 × 𝑋) ∧ ( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢) ↔ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ ( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢))
103		df-ov 7443	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑎 − 𝑏) = ( − ‘⟨𝑎, 𝑏⟩)
104		oveq12 7449	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → (𝑧(-g‘𝐺)𝑤) = (𝑎(-g‘𝐺)𝑏))
105	104	eceq1d 8783	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
106		ecexg 8746	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐺 ~QG 𝑌) ∈ V → [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ V)
107	8, 106	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ V
108	105, 66, 107	ovmpoa 7596	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → (𝑎 − 𝑏) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
109	103, 108	eqtr3id 2812	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → ( − ‘⟨𝑎, 𝑏⟩) = [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌))
110	109	eleq1d 2849	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) → (( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢 ↔ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢))
111	110	pm5.32i 585	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ ( − ‘⟨𝑎, 𝑏⟩) ∈ 𝑢) ↔ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢))
112	100, 102, 111	3bitri 300	. . . . . . . . . . . . . . . . . . 19 ⊢ (⟨𝑎, 𝑏⟩ ∈ (◡ − “ 𝑢) ↔ ((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢))
113		eleq1 2852	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑡 = ⟨𝑎, 𝑏⟩ → (𝑡 ∈ (𝑐 × 𝑑) ↔ ⟨𝑎, 𝑏⟩ ∈ (𝑐 × 𝑑)))
114		opelxp 5691	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (⟨𝑎, 𝑏⟩ ∈ (𝑐 × 𝑑) ↔ (𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑))
115	113, 114	bitrdi 290	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑡 = ⟨𝑎, 𝑏⟩ → (𝑡 ∈ (𝑐 × 𝑑) ↔ (𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑)))
116	115	anbi1d 643	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑡 = ⟨𝑎, 𝑏⟩ → ((𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) ↔ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
117	116	2rexbidv 3231	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑡 = ⟨𝑎, 𝑏⟩ → (∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) ↔ ∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
118	117	rspccv 3577	. . . . . . . . . . . . . . . . . . 19 ⊢ (∀𝑡 ∈ (◡ − “ 𝑢)∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) → (⟨𝑎, 𝑏⟩ ∈ (◡ − “ 𝑢) → ∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
119	112, 118	biimtrrid 246	. . . . . . . . . . . . . . . . . 18 ⊢ (∀𝑡 ∈ (◡ − “ 𝑢)∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 (𝑡 ∈ (𝑐 × 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) → (((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢) → ∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
120	95, 119	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋) ∧ [(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢) → ∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
121	65, 120	mpand 708	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ([(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢 → ∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))))
122		simp-4l 795	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝐺 ∈ TopGrp)
123	57	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑌 ∈ (NrmSGrp‘𝐺))
124		simprll 791	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑐 ∈ 𝐽)
125	1, 5, 13, 14, 7	qustgpopn 24466	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑐 ∈ 𝐽) → (𝐹 “ 𝑐) ∈ 𝐾)
126	122, 123, 124, 125	syl3anc 1399	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹 “ 𝑐) ∈ 𝐾)
127		simprlr 792	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑑 ∈ 𝐽)
128	1, 5, 13, 14, 7	qustgpopn 24466	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑑 ∈ 𝐽) → (𝐹 “ 𝑑) ∈ 𝐾)
129	122, 123, 127, 128	syl3anc 1399	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹 “ 𝑑) ∈ 𝐾)
130	58	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑎 ∈ 𝑋)
131		eceq1 8782	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑎 → [𝑥](𝐺 ~QG 𝑌) = [𝑎](𝐺 ~QG 𝑌))
132	131, 7, 78	fvmpt3i 7019	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑎 ∈ 𝑋 → (𝐹‘𝑎) = [𝑎](𝐺 ~QG 𝑌))
133	130, 132	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹‘𝑎) = [𝑎](𝐺 ~QG 𝑌))
134	122, 16	syl 18	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝐽 ∈ (TopOn‘𝑋))
135		toponss 23272	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑐 ∈ 𝐽) → 𝑐 ⊆ 𝑋)
136	134, 124, 135	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑐 ⊆ 𝑋)
137		simprrl 793	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑))
138	137	simpld 500	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑎 ∈ 𝑐)
139		fnfvima 7259	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐹 Fn 𝑋 ∧ 𝑐 ⊆ 𝑋 ∧ 𝑎 ∈ 𝑐) → (𝐹‘𝑎) ∈ (𝐹 “ 𝑐))
140	79, 136, 138, 139	mp3an2i 1496	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹‘𝑎) ∈ (𝐹 “ 𝑐))
141	133, 140	eqeltrrd 2865	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → [𝑎](𝐺 ~QG 𝑌) ∈ (𝐹 “ 𝑐))
142	59	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑏 ∈ 𝑋)
143		eceq1 8782	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = 𝑏 → [𝑥](𝐺 ~QG 𝑌) = [𝑏](𝐺 ~QG 𝑌))
144	143, 7, 78	fvmpt3i 7019	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑏 ∈ 𝑋 → (𝐹‘𝑏) = [𝑏](𝐺 ~QG 𝑌))
145	142, 144	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹‘𝑏) = [𝑏](𝐺 ~QG 𝑌))
146		toponss 23272	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝐽 ∈ (TopOn‘𝑋) ∧ 𝑑 ∈ 𝐽) → 𝑑 ⊆ 𝑋)
147	134, 127, 146	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑑 ⊆ 𝑋)
148	137	simprd 501	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → 𝑏 ∈ 𝑑)
149		fnfvima 7259	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐹 Fn 𝑋 ∧ 𝑑 ⊆ 𝑋 ∧ 𝑏 ∈ 𝑑) → (𝐹‘𝑏) ∈ (𝐹 “ 𝑑))
150	79, 147, 148, 149	mp3an2i 1496	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝐹‘𝑏) ∈ (𝐹 “ 𝑑))
151	145, 150	eqeltrrd 2865	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → [𝑏](𝐺 ~QG 𝑌) ∈ (𝐹 “ 𝑑))
152	141, 151	opelxpd 5694	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)))
153	136	sselda 3913	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ 𝑝 ∈ 𝑐) → 𝑝 ∈ 𝑋)
154	147	sselda 3913	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ 𝑞 ∈ 𝑑) → 𝑞 ∈ 𝑋)
155	153, 154	anim12dan 631	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → (𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋))
156		eceq1 8782	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 = 𝑝 → [𝑥](𝐺 ~QG 𝑌) = [𝑝](𝐺 ~QG 𝑌))
157	156, 7, 78	fvmpt3i 7019	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑝 ∈ 𝑋 → (𝐹‘𝑝) = [𝑝](𝐺 ~QG 𝑌))
158		eceq1 8782	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑥 = 𝑞 → [𝑥](𝐺 ~QG 𝑌) = [𝑞](𝐺 ~QG 𝑌))
159	158, 7, 78	fvmpt3i 7019	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑞 ∈ 𝑋 → (𝐹‘𝑞) = [𝑞](𝐺 ~QG 𝑌))
160		opeq12 4845	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝐹‘𝑝) = [𝑝](𝐺 ~QG 𝑌) ∧ (𝐹‘𝑞) = [𝑞](𝐺 ~QG 𝑌)) → ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ = ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩)
161	157, 159, 160	syl2an 608	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋) → ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ = ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩)
162	155, 161	syl 18	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ = ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩)
163	123	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → 𝑌 ∈ (NrmSGrp‘𝐺))
164	1, 5, 24	quseccl 19428	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑝 ∈ 𝑋) → [𝑝](𝐺 ~QG 𝑌) ∈ (Base‘𝐻))
165	1, 5, 24	quseccl 19428	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑞 ∈ 𝑋) → [𝑞](𝐺 ~QG 𝑌) ∈ (Base‘𝐻))
166	164, 165	anim12dan 631	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ (𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋)) → ([𝑝](𝐺 ~QG 𝑌) ∈ (Base‘𝐻) ∧ [𝑞](𝐺 ~QG 𝑌) ∈ (Base‘𝐻)))
167	163, 155, 166	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ([𝑝](𝐺 ~QG 𝑌) ∈ (Base‘𝐻) ∧ [𝑞](𝐺 ~QG 𝑌) ∈ (Base‘𝐻)))
168		opelxpi 5692	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (([𝑝](𝐺 ~QG 𝑌) ∈ (Base‘𝐻) ∧ [𝑞](𝐺 ~QG 𝑌) ∈ (Base‘𝐻)) → ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)))
169	167, 168	syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)))
170	1, 5, 60, 27	qussub 19432	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ 𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋) → ([𝑝](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑞](𝐺 ~QG 𝑌)) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
171	170	3expb 1138	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑌 ∈ (NrmSGrp‘𝐺) ∧ (𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋)) → ([𝑝](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑞](𝐺 ~QG 𝑌)) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
172	163, 155, 171	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ([𝑝](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑞](𝐺 ~QG 𝑌)) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
173		oveq12 7449	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((𝑧 = 𝑝 ∧ 𝑤 = 𝑞) → (𝑧(-g‘𝐺)𝑤) = (𝑝(-g‘𝐺)𝑞))
174	173	eceq1d 8783	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝑧 = 𝑝 ∧ 𝑤 = 𝑞) → [(𝑧(-g‘𝐺)𝑤)](𝐺 ~QG 𝑌) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
175		ecexg 8746	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((𝐺 ~QG 𝑌) ∈ V → [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌) ∈ V)
176	8, 175	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌) ∈ V
177	174, 66, 176	ovmpoa 7596	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑝 ∈ 𝑋 ∧ 𝑞 ∈ 𝑋) → (𝑝 − 𝑞) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
178	155, 177	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → (𝑝 − 𝑞) = [(𝑝(-g‘𝐺)𝑞)](𝐺 ~QG 𝑌))
179	172, 178	eqtr4d 2801	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ([𝑝](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑞](𝐺 ~QG 𝑌)) = (𝑝 − 𝑞))
180		df-ov 7443	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ([𝑝](𝐺 ~QG 𝑌)(-g‘𝐻)[𝑞](𝐺 ~QG 𝑌)) = ((-g‘𝐻)‘⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩)
181		df-ov 7443	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑝 − 𝑞) = ( − ‘⟨𝑝, 𝑞⟩)
182	179, 180, 181	3eqtr3g 2821	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ((-g‘𝐻)‘⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩) = ( − ‘⟨𝑝, 𝑞⟩))
183		opelxpi 5692	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑) → ⟨𝑝, 𝑞⟩ ∈ (𝑐 × 𝑑))
184		simprrr 794	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢))
185	184	sselda 3913	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ ⟨𝑝, 𝑞⟩ ∈ (𝑐 × 𝑑)) → ⟨𝑝, 𝑞⟩ ∈ (◡ − “ 𝑢))
186	183, 185	sylan2 605	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ⟨𝑝, 𝑞⟩ ∈ (◡ − “ 𝑢))
187		elpreima 7077	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ( − Fn (𝑋 × 𝑋) → (⟨𝑝, 𝑞⟩ ∈ (◡ − “ 𝑢) ↔ (⟨𝑝, 𝑞⟩ ∈ (𝑋 × 𝑋) ∧ ( − ‘⟨𝑝, 𝑞⟩) ∈ 𝑢)))
188	98, 187	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (⟨𝑝, 𝑞⟩ ∈ (◡ − “ 𝑢) ↔ (⟨𝑝, 𝑞⟩ ∈ (𝑋 × 𝑋) ∧ ( − ‘⟨𝑝, 𝑞⟩) ∈ 𝑢))
189	188	simprbi 503	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (⟨𝑝, 𝑞⟩ ∈ (◡ − “ 𝑢) → ( − ‘⟨𝑝, 𝑞⟩) ∈ 𝑢)
190	186, 189	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ( − ‘⟨𝑝, 𝑞⟩) ∈ 𝑢)
191	182, 190	eqeltrd 2864	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ((-g‘𝐻)‘⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩) ∈ 𝑢)
192	52, 53	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (-g‘𝐻) Fn ((Base‘𝐻) × (Base‘𝐻)))
193	192	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → (-g‘𝐻) Fn ((Base‘𝐻) × (Base‘𝐻)))
194		elpreima 7077	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((-g‘𝐻) Fn ((Base‘𝐻) × (Base‘𝐻)) → (⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ (⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ∧ ((-g‘𝐻)‘⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩) ∈ 𝑢)))
195	193, 194	syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → (⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ (⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ∧ ((-g‘𝐻)‘⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩) ∈ 𝑢)))
196	169, 191, 195	mpbir2and 726	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ⟨[𝑝](𝐺 ~QG 𝑌), [𝑞](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
197	162, 196	eqeltrd 2864	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) ∧ (𝑝 ∈ 𝑐 ∧ 𝑞 ∈ 𝑑)) → ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
198	197	ralrimivva 3209	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → ∀𝑝 ∈ 𝑐 ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
199		opeq1 4843	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑧 = (𝐹‘𝑝) → ⟨𝑧, 𝑤⟩ = ⟨(𝐹‘𝑝), 𝑤⟩)
200	199	eleq1d 2849	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑧 = (𝐹‘𝑝) → (⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
201	200	ralbidv 3189	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑧 = (𝐹‘𝑝) → (∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
202	201	ralima 7263	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝐹 Fn 𝑋 ∧ 𝑐 ⊆ 𝑋) → (∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑝 ∈ 𝑐 ∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
203	79, 202	mpan 703	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑐 ⊆ 𝑋 → (∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑝 ∈ 𝑐 ∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
204		opeq2 4844	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 = (𝐹‘𝑞) → ⟨(𝐹‘𝑝), 𝑤⟩ = ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩)
205	204	eleq1d 2849	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑤 = (𝐹‘𝑞) → (⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
206	205	ralima 7263	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐹 Fn 𝑋 ∧ 𝑑 ⊆ 𝑋) → (∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
207	79, 206	mpan 703	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑑 ⊆ 𝑋 → (∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
208	207	ralbidv 3189	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑑 ⊆ 𝑋 → (∀𝑝 ∈ 𝑐 ∀𝑤 ∈ (𝐹 “ 𝑑)⟨(𝐹‘𝑝), 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑝 ∈ 𝑐 ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
209	203, 208	sylan9bb 519	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑐 ⊆ 𝑋 ∧ 𝑑 ⊆ 𝑋) → (∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑝 ∈ 𝑐 ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
210	136, 147, 209	syl2anc 596	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → (∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑝 ∈ 𝑐 ∀𝑞 ∈ 𝑑 ⟨(𝐹‘𝑝), (𝐹‘𝑞)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
211	198, 210	mpbird 260	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → ∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
212		dfss3 3902	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑦 ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑))𝑦 ∈ (◡(-g‘𝐻) “ 𝑢))
213		eleq1 2852	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 = ⟨𝑧, 𝑤⟩ → (𝑦 ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
214	213	ralxp 5823	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (∀𝑦 ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑))𝑦 ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
215	212, 214	bitri 278	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢) ↔ ∀𝑧 ∈ (𝐹 “ 𝑐)∀𝑤 ∈ (𝐹 “ 𝑑)⟨𝑧, 𝑤⟩ ∈ (◡(-g‘𝐻) “ 𝑢))
216	211, 215	sylibr 237	. . . . . . . . . . . . . . . . . . 19 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢))
217		xpeq1 5669	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑟 = (𝐹 “ 𝑐) → (𝑟 × 𝑠) = ((𝐹 “ 𝑐) × 𝑠))
218	217	eleq2d 2850	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑟 = (𝐹 “ 𝑐) → (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ↔ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × 𝑠)))
219	217	sseq1d 3944	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑟 = (𝐹 “ 𝑐) → ((𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢) ↔ ((𝐹 “ 𝑐) × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
220	218, 219	anbi12d 644	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑟 = (𝐹 “ 𝑐) → ((⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × 𝑠) ∧ ((𝐹 “ 𝑐) × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
221		xpeq2 5676	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑠 = (𝐹 “ 𝑑) → ((𝐹 “ 𝑐) × 𝑠) = ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)))
222	221	eleq2d 2850	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 = (𝐹 “ 𝑑) → (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × 𝑠) ↔ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑))))
223	221	sseq1d 3944	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 = (𝐹 “ 𝑑) → (((𝐹 “ 𝑐) × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢) ↔ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢)))
224	222, 223	anbi12d 644	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑠 = (𝐹 “ 𝑑) → ((⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × 𝑠) ∧ ((𝐹 “ 𝑐) × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ∧ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢))))
225	220, 224	rspc2ev 3592	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐹 “ 𝑐) ∈ 𝐾 ∧ (𝐹 “ 𝑑) ∈ 𝐾 ∧ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ∧ ((𝐹 “ 𝑐) × (𝐹 “ 𝑑)) ⊆ (◡(-g‘𝐻) “ 𝑢))) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
226	126, 129, 152, 216, 225	syl112anc 1402	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ ((𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽) ∧ ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)))) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
227	226	expr 462	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) ∧ (𝑐 ∈ 𝐽 ∧ 𝑑 ∈ 𝐽)) → (((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
228	227	rexlimdvva 3223	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (∃𝑐 ∈ 𝐽 ∃𝑑 ∈ 𝐽 ((𝑎 ∈ 𝑐 ∧ 𝑏 ∈ 𝑑) ∧ (𝑐 × 𝑑) ⊆ (◡ − “ 𝑢)) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
229	121, 228	syld 48	. . . . . . . . . . . . . . 15 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ([(𝑎(-g‘𝐺)𝑏)](𝐺 ~QG 𝑌) ∈ 𝑢 → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
230	64, 229	sylbid 243	. . . . . . . . . . . . . 14 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) ∈ 𝑢 → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
231	230	adantld 496	. . . . . . . . . . . . 13 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) ∧ ((-g‘𝐻)‘⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩) ∈ 𝑢) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
232	55, 231	sylbid 243	. . . . . . . . . . . 12 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
233		opeq12 4845	. . . . . . . . . . . . . 14 ⊢ ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → ⟨𝑥, 𝑦⟩ = ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩)
234	233	eleq1d 2849	. . . . . . . . . . . . 13 ⊢ ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) ↔ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢)))
235	233	eleq1d 2849	. . . . . . . . . . . . . 14 ⊢ ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → (⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))} ↔ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))}))
236		opex 5436	. . . . . . . . . . . . . . 15 ⊢ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ V
237		eleq1 2852	. . . . . . . . . . . . . . . . 17 ⊢ (𝑤 = ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ → (𝑤 ∈ (𝑟 × 𝑠) ↔ ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠)))
238	237	anbi1d 643	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ → ((𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
239	238	2rexbidv 3231	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = ⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ → (∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)) ↔ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
240	236, 239	elab 3636	. . . . . . . . . . . . . 14 ⊢ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))} ↔ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
241	235, 240	bitrdi 290	. . . . . . . . . . . . 13 ⊢ ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → (⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))} ↔ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
242	234, 241	imbi12d 347	. . . . . . . . . . . 12 ⊢ ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → ((⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))}) ↔ (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (⟨[𝑎](𝐺 ~QG 𝑌), [𝑏](𝐺 ~QG 𝑌)⟩ ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))))
243	232, 242	syl5ibrcom 250	. . . . . . . . . . 11 ⊢ ((((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) ∧ (𝑎 ∈ 𝑋 ∧ 𝑏 ∈ 𝑋)) → ((𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))})))
244	243	rexlimdvva 3223	. . . . . . . . . 10 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (∃𝑎 ∈ 𝑋 ∃𝑏 ∈ 𝑋 (𝑥 = [𝑎](𝐺 ~QG 𝑌) ∧ 𝑦 = [𝑏](𝐺 ~QG 𝑌)) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))})))
245	50, 244	sylbird 263	. . . . . . . . 9 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (⟨𝑥, 𝑦⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))})))
246	245	com23 87	. . . . . . . 8 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → (⟨𝑥, 𝑦⟩ ∈ ((Base‘𝐻) × (Base‘𝐻)) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))})))
247	37, 246	mpdd 44	. . . . . . 7 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (⟨𝑥, 𝑦⟩ ∈ (◡(-g‘𝐻) “ 𝑢) → ⟨𝑥, 𝑦⟩ ∈ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))}))
248	36, 247	relssdv 5769	. . . . . 6 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (◡(-g‘𝐻) “ 𝑢) ⊆ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))})
249		ssabral 3992	. . . . . 6 ⊢ ((◡(-g‘𝐻) “ 𝑢) ⊆ {𝑤 ∣ ∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))} ↔ ∀𝑤 ∈ (◡(-g‘𝐻) “ 𝑢)∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
250	248, 249	sylib 221	. . . . 5 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → ∀𝑤 ∈ (◡(-g‘𝐻) “ 𝑢)∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢)))
251		eltx 23914	. . . . . . 7 ⊢ ((𝐾 ∈ (TopOn‘(Base‘𝐻)) ∧ 𝐾 ∈ (TopOn‘(Base‘𝐻))) → ((◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾) ↔ ∀𝑤 ∈ (◡(-g‘𝐻) “ 𝑢)∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
252	23, 23, 251	syl2anc 596	. . . . . 6 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → ((◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾) ↔ ∀𝑤 ∈ (◡(-g‘𝐻) “ 𝑢)∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
253	252	adantr 486	. . . . 5 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → ((◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾) ↔ ∀𝑤 ∈ (◡(-g‘𝐻) “ 𝑢)∃𝑟 ∈ 𝐾 ∃𝑠 ∈ 𝐾 (𝑤 ∈ (𝑟 × 𝑠) ∧ (𝑟 × 𝑠) ⊆ (◡(-g‘𝐻) “ 𝑢))))
254	250, 253	mpbird 260	. . . 4 ⊢ (((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) ∧ 𝑢 ∈ 𝐾) → (◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾))
255	254	ralrimiva 3158	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → ∀𝑢 ∈ 𝐾 (◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾))
256		txtopon 23937	. . . . 5 ⊢ ((𝐾 ∈ (TopOn‘(Base‘𝐻)) ∧ 𝐾 ∈ (TopOn‘(Base‘𝐻))) → (𝐾 ×t 𝐾) ∈ (TopOn‘((Base‘𝐻) × (Base‘𝐻))))
257	23, 23, 256	syl2anc 596	. . . 4 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (𝐾 ×t 𝐾) ∈ (TopOn‘((Base‘𝐻) × (Base‘𝐻))))
258		iscn 23580	. . . 4 ⊢ (((𝐾 ×t 𝐾) ∈ (TopOn‘((Base‘𝐻) × (Base‘𝐻))) ∧ 𝐾 ∈ (TopOn‘(Base‘𝐻))) → ((-g‘𝐻) ∈ ((𝐾 ×t 𝐾) Cn 𝐾) ↔ ((-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻) ∧ ∀𝑢 ∈ 𝐾 (◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾))))
259	257, 23, 258	syl2anc 596	. . 3 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → ((-g‘𝐻) ∈ ((𝐾 ×t 𝐾) Cn 𝐾) ↔ ((-g‘𝐻):((Base‘𝐻) × (Base‘𝐻))⟶(Base‘𝐻) ∧ ∀𝑢 ∈ 𝐾 (◡(-g‘𝐻) “ 𝑢) ∈ (𝐾 ×t 𝐾))))
260	29, 255, 259	mpbir2and 726	. 2 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → (-g‘𝐻) ∈ ((𝐾 ×t 𝐾) Cn 𝐾))
261	14, 27	istgp2 24437	. 2 ⊢ (𝐻 ∈ TopGrp ↔ (𝐻 ∈ Grp ∧ 𝐻 ∈ TopSp ∧ (-g‘𝐻) ∈ ((𝐾 ×t 𝐾) Cn 𝐾)))
262	3, 26, 260, 261	syl3anbrc 1362	1 ⊢ ((𝐺 ∈ TopGrp ∧ 𝑌 ∈ (NrmSGrp‘𝐺)) → 𝐻 ∈ TopGrp)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2147  {cab 2741  ∀wral 3080  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900  ⟨cop 4838   ↦ cmpt 5189   × cxp 5653  ^◡ccnv 5654  dom cdm 5655   “ cima 5658  Rel wrel 5660   Fn wfn 6550  ⟶wf 6551  ⟶ontowfo 6553  ‘cfv 6555  (class class class)co 7440   ∈ cmpo 7442  [cec 8740   / cqs 8741  Basecbs 17413  TopOpenctopn 17618   qTop cqtop 17701   /_s cqus 17703  Grpcgrp 19170  -_gcsg 19172  NrmSGrpcnsg 19357   ~_QG cqg 19358  TopOnctopon 23255  TopSpctps 23277   Cn ccn 23569   ×_t ctx 23906  TopGrpctgp 24417

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pow 5331  ax-pr 5395  ax-un 7772  ax-cnex 11280  ax-resscn 11281  ax-1cn 11282  ax-icn 11283  ax-addcl 11284  ax-addrcl 11285  ax-mulcl 11286  ax-mulrcl 11287  ax-mulcom 11288  ax-addass 11289  ax-mulass 11290  ax-distr 11291  ax-i2m1 11292  ax-1ne0 11293  ax-1rid 11294  ax-rnegex 11295  ax-rrecex 11296  ax-cnre 11297  ax-pre-lttri 11298  ax-pre-lttrn 11299  ax-pre-ltadd 11300  ax-pre-mulgt0 11301

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6319  df-ord 6380  df-on 6381  df-lim 6382  df-suc 6383  df-iota 6509  df-fun 6557  df-fn 6558  df-f 6559  df-f1 6560  df-fo 6561  df-f1o 6562  df-fv 6563  df-riota 7397  df-ov 7443  df-oprab 7444  df-mpo 7445  df-om 7899  df-1st 8022  df-2nd 8023  df-tpos 8268  df-frecs 8324  df-wrecs 8355  df-recs 8404  df-rdg 8443  df-1o 8501  df-er 8742  df-ec 8744  df-qs 8748  df-map 8874  df-en 8999  df-dom 9000  df-sdom 9001  df-fin 9002  df-sup 9458  df-inf 9459  df-pnf 11369  df-mnf 11370  df-xr 11371  df-ltxr 11372  df-le 11373  df-sub 11567  df-neg 11568  df-nn 12360  df-2 12429  df-3 12430  df-4 12431  df-5 12432  df-6 12433  df-7 12434  df-8 12435  df-9 12436  df-n0 12631  df-z 12718  df-dec 12839  df-uz 12990  df-fz 13664  df-struct 17351  df-sets 17368  df-slot 17386  df-ndx 17398  df-base 17414  df-ress 17435  df-plusg 17467  df-mulr 17468  df-sca 17470  df-vsca 17471  df-ip 17472  df-tset 17473  df-ple 17474  df-ds 17476  df-rest 17619  df-topn 17620  df-0g 17638  df-topgen 17640  df-qtop 17705  df-imas 17706  df-qus 17707  df-plusf 18841  df-mgm 18842  df-sgrp 18934  df-mnd 18950  df-grp 19173  df-minusg 19174  df-sbg 19175  df-subg 19359  df-nsg 19360  df-eqg 19361  df-oppg 19587  df-top 23239  df-topon 23256  df-topsp 23278  df-bases 23291  df-cn 23572  df-cnp 23573  df-tx 23908  df-hmeo 24101  df-tmd 24418  df-tgp 24419

This theorem is used by:  qustgp  24468