symggen - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > symggen		Structured version Visualization version GIF version

Theorem symggen 18110

Description: The span of the transpositions is the subgroup that moves finitely many points. (Contributed by Stefan O'Rear, 28-Aug-2015.)

**Hypotheses**
Ref	Expression
symgtrf.t	⊢ 𝑇 = ran (pmTrsp‘𝐷)
symgtrf.g	⊢ 𝐺 = (SymGrp‘𝐷)
symgtrf.b	⊢ 𝐵 = (Base‘𝐺)
symggen.k	⊢ 𝐾 = (mrCls‘(SubMnd‘𝐺))

**Assertion**
Ref	Expression
symggen	⊢ (𝐷 ∈ 𝑉 → (𝐾‘𝑇) = {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})

Distinct variable groups: 𝑥,𝐵 𝑥,𝑇 𝑥,𝐾 𝑥,𝐷 𝑥,𝐺 𝑥,𝑉

Proof of Theorem symggen Dummy variables 𝑢 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elex 3417	. . . 4 ⊢ (𝐷 ∈ 𝑉 → 𝐷 ∈ V)
2		symgtrf.g	. . . . . . 7 ⊢ 𝐺 = (SymGrp‘𝐷)
3	2	symggrp 18040	. . . . . 6 ⊢ (𝐷 ∈ V → 𝐺 ∈ Grp)
4		grpmnd 17653	. . . . . 6 ⊢ (𝐺 ∈ Grp → 𝐺 ∈ Mnd)
5	3, 4	syl 17	. . . . 5 ⊢ (𝐷 ∈ V → 𝐺 ∈ Mnd)
6		symgtrf.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝐺)
7	6	submacs 17589	. . . . 5 ⊢ (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
8		acsmre 16536	. . . . 5 ⊢ ((SubMnd‘𝐺) ∈ (ACS‘𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
9	5, 7, 8	3syl 18	. . . 4 ⊢ (𝐷 ∈ V → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
10	1, 9	syl 17	. . 3 ⊢ (𝐷 ∈ 𝑉 → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
11		symgtrf.t	. . . . . 6 ⊢ 𝑇 = ran (pmTrsp‘𝐷)
12	11, 2, 6	symgtrf 18109	. . . . 5 ⊢ 𝑇 ⊆ 𝐵
13	12	a1i 11	. . . 4 ⊢ (𝐷 ∈ 𝑉 → 𝑇 ⊆ 𝐵)
14		2onn 7966	. . . . . 6 ⊢ 2_𝑜 ∈ ω
15		nnfi 8401	. . . . . 6 ⊢ (2_𝑜 ∈ ω → 2_𝑜 ∈ Fin)
16	14, 15	ax-mp 5	. . . . 5 ⊢ 2_𝑜 ∈ Fin
17		eqid 2817	. . . . . . . . 9 ⊢ (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
18	17, 11	pmtrfb 18105	. . . . . . . 8 ⊢ (𝑥 ∈ 𝑇 ↔ (𝐷 ∈ V ∧ 𝑥:𝐷–1-1-onto→𝐷 ∧ dom (𝑥 ∖ I ) ≈ 2_𝑜))
19	18	simp3bi 1170	. . . . . . 7 ⊢ (𝑥 ∈ 𝑇 → dom (𝑥 ∖ I ) ≈ 2_𝑜)
20		enfi 8424	. . . . . . 7 ⊢ (dom (𝑥 ∖ I ) ≈ 2_𝑜 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2_𝑜 ∈ Fin))
21	19, 20	syl 17	. . . . . 6 ⊢ (𝑥 ∈ 𝑇 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2_𝑜 ∈ Fin))
22	21	adantl 469	. . . . 5 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑥 ∈ 𝑇) → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2_𝑜 ∈ Fin))
23	16, 22	mpbiri 249	. . . 4 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑥 ∈ 𝑇) → dom (𝑥 ∖ I ) ∈ Fin)
24	13, 23	ssrabdv 3889	. . 3 ⊢ (𝐷 ∈ 𝑉 → 𝑇 ⊆ {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
25	2, 6	symgfisg 18108	. . . 4 ⊢ (𝐷 ∈ 𝑉 → {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺))
26		subgsubm 17837	. . . 4 ⊢ ({𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺) → {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
27	25, 26	syl 17	. . 3 ⊢ (𝐷 ∈ 𝑉 → {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
28		symggen.k	. . . 4 ⊢ 𝐾 = (mrCls‘(SubMnd‘𝐺))
29	28	mrcsscl 16504	. . 3 ⊢ (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∧ {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺)) → (𝐾‘𝑇) ⊆ {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
30	10, 24, 27, 29	syl3anc 1483	. 2 ⊢ (𝐷 ∈ 𝑉 → (𝐾‘𝑇) ⊆ {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
31		vex 3405	. . . . . . 7 ⊢ 𝑥 ∈ V
32	31	a1i 11	. . . . . 6 ⊢ (dom (𝑥 ∖ I ) ∈ Fin → 𝑥 ∈ V)
33		finnum 9066	. . . . . 6 ⊢ (dom (𝑥 ∖ I ) ∈ Fin → dom (𝑥 ∖ I ) ∈ dom card)
34		domfi 8429	. . . . . . . 8 ⊢ ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
35	2, 6	symgbasf1o 18023	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ 𝐵 → 𝑦:𝐷–1-1-onto→𝐷)
36	35	adantl 469	. . . . . . . . . . . . . 14 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → 𝑦:𝐷–1-1-onto→𝐷)
37		f1ofn 6363	. . . . . . . . . . . . . 14 ⊢ (𝑦:𝐷–1-1-onto→𝐷 → 𝑦 Fn 𝐷)
38		fnnfpeq0 6678	. . . . . . . . . . . . . 14 ⊢ (𝑦 Fn 𝐷 → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
39	36, 37, 38	3syl 18	. . . . . . . . . . . . 13 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
40	2, 6	elbasfv 16150	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ 𝐵 → 𝐷 ∈ V)
41	40	adantl 469	. . . . . . . . . . . . . . . 16 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → 𝐷 ∈ V)
42	2	symgid 18041	. . . . . . . . . . . . . . . 16 ⊢ (𝐷 ∈ V → ( I ↾ 𝐷) = (0_g‘𝐺))
43	41, 42	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → ( I ↾ 𝐷) = (0_g‘𝐺))
44	41, 9	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
45	28	mrccl 16495	. . . . . . . . . . . . . . . . 17 ⊢ (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ 𝐵) → (𝐾‘𝑇) ∈ (SubMnd‘𝐺))
46	44, 12, 45	sylancl 576	. . . . . . . . . . . . . . . 16 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (𝐾‘𝑇) ∈ (SubMnd‘𝐺))
47		eqid 2817	. . . . . . . . . . . . . . . . 17 ⊢ (0_g‘𝐺) = (0_g‘𝐺)
48	47	subm0cl 17576	. . . . . . . . . . . . . . . 16 ⊢ ((𝐾‘𝑇) ∈ (SubMnd‘𝐺) → (0_g‘𝐺) ∈ (𝐾‘𝑇))
49	46, 48	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (0_g‘𝐺) ∈ (𝐾‘𝑇))
50	43, 49	eqeltrd 2896	. . . . . . . . . . . . . 14 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → ( I ↾ 𝐷) ∈ (𝐾‘𝑇))
51		eleq1a 2891	. . . . . . . . . . . . . 14 ⊢ (( I ↾ 𝐷) ∈ (𝐾‘𝑇) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾‘𝑇)))
52	50, 51	syl 17	. . . . . . . . . . . . 13 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾‘𝑇)))
53	39, 52	sylbid 231	. . . . . . . . . . . 12 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾‘𝑇)))
54	53	adantr 468	. . . . . . . . . . 11 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾‘𝑇)))
55		n0 4143	. . . . . . . . . . . 12 ⊢ (dom (𝑦 ∖ I ) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ))
56	41	adantr 468	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐷 ∈ V)
57		simpr 473	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ dom (𝑦 ∖ I ))
58		f1omvdmvd 18083	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦:𝐷–1-1-onto→𝐷 ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦‘𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
59	36, 58	sylan 571	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦‘𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
60	59	eldifad 3792	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦‘𝑢) ∈ dom (𝑦 ∖ I ))
61		prssi 4553	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑢 ∈ dom (𝑦 ∖ I ) ∧ (𝑦‘𝑢) ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦‘𝑢)} ⊆ dom (𝑦 ∖ I ))
62	57, 60, 61	syl2anc 575	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦‘𝑢)} ⊆ dom (𝑦 ∖ I ))
63		difss 3947	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑦 ∖ I ) ⊆ 𝑦
64		dmss 5537	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦 ∖ I ) ⊆ 𝑦 → dom (𝑦 ∖ I ) ⊆ dom 𝑦)
65	63, 64	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ dom (𝑦 ∖ I ) ⊆ dom 𝑦
66		f1odm 6366	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑦:𝐷–1-1-onto→𝐷 → dom 𝑦 = 𝐷)
67	36, 66	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → dom 𝑦 = 𝐷)
68	65, 67	syl5sseq 3861	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → dom (𝑦 ∖ I ) ⊆ 𝐷)
69	68	adantr 468	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ 𝐷)
70	62, 69	sstrd 3819	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦‘𝑢)} ⊆ 𝐷)
71	36	adantr 468	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦:𝐷–1-1-onto→𝐷)
72	71, 37	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 Fn 𝐷)
73	68	sselda 3809	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ 𝐷)
74		fnelnfp 6677	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦 Fn 𝐷 ∧ 𝑢 ∈ 𝐷) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦‘𝑢) ≠ 𝑢))
75	72, 73, 74	syl2anc 575	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦‘𝑢) ≠ 𝑢))
76	57, 75	mpbid 223	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦‘𝑢) ≠ 𝑢)
77	76	necomd 3044	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ≠ (𝑦‘𝑢))
78		vex 3405	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑢 ∈ V
79		fvex 6430	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦‘𝑢) ∈ V
80		pr2nelem 9119	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑢 ∈ V ∧ (𝑦‘𝑢) ∈ V ∧ 𝑢 ≠ (𝑦‘𝑢)) → {𝑢, (𝑦‘𝑢)} ≈ 2_𝑜)
81	78, 79, 80	mp3an12 1568	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑢 ≠ (𝑦‘𝑢) → {𝑢, (𝑦‘𝑢)} ≈ 2_𝑜)
82	77, 81	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦‘𝑢)} ≈ 2_𝑜)
83	17, 11	pmtrrn 18097	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐷 ∈ V ∧ {𝑢, (𝑦‘𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦‘𝑢)} ≈ 2_𝑜) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝑇)
84	56, 70, 82, 83	syl3anc 1483	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝑇)
85	12, 84	sseldi 3807	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝐵)
86		simplr 776	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ 𝐵)
87		eqid 2817	. . . . . . . . . . . . . . . . . . . 20 ⊢ (+_g‘𝐺) = (+_g‘𝐺)
88	2, 6, 87	symgov 18030	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝐵 ∧ 𝑦 ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦))
89	85, 86, 88	syl2anc 575	. . . . . . . . . . . . . . . . . 18 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦))
90	89	oveq2d 6899	. . . . . . . . . . . . . . . . 17 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)))
91	41, 3	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → 𝐺 ∈ Grp)
92	91	adantr 468	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐺 ∈ Grp)
93	6, 87	grpcl 17654	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐺 ∈ Grp ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝐵 ∧ 𝑦 ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵)
94	92, 85, 86, 93	syl3anc 1483	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵)
95	89, 94	eqeltrrd 2897	. . . . . . . . . . . . . . . . . 18 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∈ 𝐵)
96	2, 6, 87	symgov 18030	. . . . . . . . . . . . . . . . . 18 ⊢ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝐵 ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)))
97	85, 95, 96	syl2anc 575	. . . . . . . . . . . . . . . . 17 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)))
98		coass 5881	. . . . . . . . . . . . . . . . . 18 ⊢ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})) ∘ 𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦))
99	17, 11	pmtrfinv 18101	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ 𝑇 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})) = ( I ↾ 𝐷))
100	84, 99	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})) = ( I ↾ 𝐷))
101	100	coeq1d 5498	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})) ∘ 𝑦) = (( I ↾ 𝐷) ∘ 𝑦))
102		f1of 6362	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦:𝐷–1-1-onto→𝐷 → 𝑦:𝐷⟶𝐷)
103		fcoi2 6303	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦:𝐷⟶𝐷 → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
104	71, 102, 103	3syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
105	101, 104	eqtrd 2851	. . . . . . . . . . . . . . . . . 18 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})) ∘ 𝑦) = 𝑦)
106	98, 105	syl5eqr 2865	. . . . . . . . . . . . . . . . 17 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)) = 𝑦)
107	90, 97, 106	3eqtrd 2855	. . . . . . . . . . . . . . . 16 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦)) = 𝑦)
108	107	adantlr 697	. . . . . . . . . . . . . . 15 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦)) = 𝑦)
109	46	ad2antrr 708	. . . . . . . . . . . . . . . 16 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝐾‘𝑇) ∈ (SubMnd‘𝐺))
110	28	mrcssid 16501	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ 𝐵) → 𝑇 ⊆ (𝐾‘𝑇))
111	44, 12, 110	sylancl 576	. . . . . . . . . . . . . . . . . . 19 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) → 𝑇 ⊆ (𝐾‘𝑇))
112	111	adantr 468	. . . . . . . . . . . . . . . . . 18 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑇 ⊆ (𝐾‘𝑇))
113	112, 84	sseldd 3810	. . . . . . . . . . . . . . . . 17 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ (𝐾‘𝑇))
114	113	adantlr 697	. . . . . . . . . . . . . . . 16 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ (𝐾‘𝑇))
115	89	difeq1d 3937	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ))
116	115	dmeqd 5540	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ))
117		simpll 774	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
118		mvdco 18085	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ⊆ (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I ))
119	17	pmtrmvd 18096	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐷 ∈ V ∧ {𝑢, (𝑦‘𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦‘𝑢)} ≈ 2_𝑜) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∖ I ) = {𝑢, (𝑦‘𝑢)})
120	56, 70, 82, 119	syl3anc 1483	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∖ I ) = {𝑢, (𝑦‘𝑢)})
121	120, 62	eqsstrd 3847	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∖ I ) ⊆ dom (𝑦 ∖ I ))
122		ssidd 3832	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ dom (𝑦 ∖ I ))
123	121, 122	unssd 3999	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I )) ⊆ dom (𝑦 ∖ I ))
124	118, 123	syl5ss 3820	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ⊆ dom (𝑦 ∖ I ))
125		fvco2 6503	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑦 Fn 𝐷 ∧ 𝑢 ∈ 𝐷) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})‘(𝑦‘𝑢)))
126	72, 73, 125	syl2anc 575	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})‘(𝑦‘𝑢)))
127		prcom 4469	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ {𝑢, (𝑦‘𝑢)} = {(𝑦‘𝑢), 𝑢}
128	127	fveq2i 6420	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) = ((pmTrsp‘𝐷)‘{(𝑦‘𝑢), 𝑢})
129	128	fveq1i 6418	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})‘(𝑦‘𝑢)) = (((pmTrsp‘𝐷)‘{(𝑦‘𝑢), 𝑢})‘(𝑦‘𝑢))
130	69, 60	sseldd 3810	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦‘𝑢) ∈ 𝐷)
131	17	pmtrprfv 18093	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐷 ∈ V ∧ ((𝑦‘𝑢) ∈ 𝐷 ∧ 𝑢 ∈ 𝐷 ∧ (𝑦‘𝑢) ≠ 𝑢)) → (((pmTrsp‘𝐷)‘{(𝑦‘𝑢), 𝑢})‘(𝑦‘𝑢)) = 𝑢)
132	56, 130, 73, 76, 131	syl13anc 1484	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{(𝑦‘𝑢), 𝑢})‘(𝑦‘𝑢)) = 𝑢)
133	129, 132	syl5eq 2863	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})‘(𝑦‘𝑢)) = 𝑢)
134	126, 133	eqtrd 2851	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢)
135	2, 6	symgbasf1o 18023	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦):𝐷–1-1-onto→𝐷)
136		f1ofn 6363	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦):𝐷–1-1-onto→𝐷 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) Fn 𝐷)
137	95, 135, 136	3syl 18	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) Fn 𝐷)
138		fnelnfp 6677	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) Fn 𝐷 ∧ 𝑢 ∈ 𝐷) → (𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) ≠ 𝑢))
139	138	necon2bbid 3032	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) Fn 𝐷 ∧ 𝑢 ∈ 𝐷) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I )))
140	137, 73, 139	syl2anc 575	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I )))
141	134, 140	mpbid 223	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ))
142	124, 57, 141	ssnelpssd 3928	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I ))
143		php3 8394	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((dom (𝑦 ∖ I ) ∈ Fin ∧ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
144	117, 142, 143	syl2anc 575	. . . . . . . . . . . . . . . . . . 19 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
145	116, 144	eqbrtrd 4877	. . . . . . . . . . . . . . . . . 18 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
146	145	adantlr 697	. . . . . . . . . . . . . . . . 17 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
147	94	adantlr 697	. . . . . . . . . . . . . . . . 17 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵)
148		ovex 6915	. . . . . . . . . . . . . . . . . . 19 ⊢ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ V
149		difeq1 3931	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → (𝑧 ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ))
150	149	dmeqd 5540	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → dom (𝑧 ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ))
151	150	breq1d 4865	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → (dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) ↔ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I )))
152		eleq1 2884	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → (𝑧 ∈ 𝐵 ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵))
153		eleq1 2884	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → (𝑧 ∈ (𝐾‘𝑇) ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇)))
154	152, 153	imbi12d 335	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → ((𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇))))
155	151, 154	imbi12d 335	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) → ((dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))) ↔ (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇)))))
156	148, 155	spcv 3503	. . . . . . . . . . . . . . . . . 18 ⊢ (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇))))
157	156	ad2antlr 709	. . . . . . . . . . . . . . . . 17 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇))))
158	146, 147, 157	mp2d 49	. . . . . . . . . . . . . . . 16 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇))
159	87	submcl 17577	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾‘𝑇) ∈ (SubMnd‘𝐺) ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)}) ∈ (𝐾‘𝑇) ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦) ∈ (𝐾‘𝑇)) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦)) ∈ (𝐾‘𝑇))
160	109, 114, 158, 159	syl3anc 1483	. . . . . . . . . . . . . . 15 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦‘𝑢)})(+_g‘𝐺)𝑦)) ∈ (𝐾‘𝑇))
161	108, 160	eqeltrrd 2897	. . . . . . . . . . . . . 14 ⊢ ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ (𝐾‘𝑇))
162	161	ex 399	. . . . . . . . . . . . 13 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → (𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾‘𝑇)))
163	162	exlimdv 2024	. . . . . . . . . . . 12 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → (∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾‘𝑇)))
164	55, 163	syl5bi 233	. . . . . . . . . . 11 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → (dom (𝑦 ∖ I ) ≠ ∅ → 𝑦 ∈ (𝐾‘𝑇)))
165	54, 164	pm2.61dne 3075	. . . . . . . . . 10 ⊢ (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦 ∈ 𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → 𝑦 ∈ (𝐾‘𝑇))
166	165	exp31 408	. . . . . . . . 9 ⊢ (dom (𝑦 ∖ I ) ∈ Fin → (𝑦 ∈ 𝐵 → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))) → 𝑦 ∈ (𝐾‘𝑇))))
167	166	com23 86	. . . . . . . 8 ⊢ (dom (𝑦 ∖ I ) ∈ Fin → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))) → (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐾‘𝑇))))
168	34, 167	syl 17	. . . . . . 7 ⊢ ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))) → (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐾‘𝑇))))
169	168	3impia 1138	. . . . . 6 ⊢ ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I ) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇)))) → (𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐾‘𝑇)))
170		eleq1w 2879	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ 𝐵 ↔ 𝑧 ∈ 𝐵))
171		eleq1w 2879	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ (𝐾‘𝑇) ↔ 𝑧 ∈ (𝐾‘𝑇)))
172	170, 171	imbi12d 335	. . . . . 6 ⊢ (𝑦 = 𝑧 → ((𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐾‘𝑇)) ↔ (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐾‘𝑇))))
173		eleq1w 2879	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (𝑦 ∈ 𝐵 ↔ 𝑥 ∈ 𝐵))
174		eleq1w 2879	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (𝑦 ∈ (𝐾‘𝑇) ↔ 𝑥 ∈ (𝐾‘𝑇)))
175	173, 174	imbi12d 335	. . . . . 6 ⊢ (𝑦 = 𝑥 → ((𝑦 ∈ 𝐵 → 𝑦 ∈ (𝐾‘𝑇)) ↔ (𝑥 ∈ 𝐵 → 𝑥 ∈ (𝐾‘𝑇))))
176		difeq1 3931	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∖ I ) = (𝑧 ∖ I ))
177	176	dmeqd 5540	. . . . . 6 ⊢ (𝑦 = 𝑧 → dom (𝑦 ∖ I ) = dom (𝑧 ∖ I ))
178		difeq1 3931	. . . . . . 7 ⊢ (𝑦 = 𝑥 → (𝑦 ∖ I ) = (𝑥 ∖ I ))
179	178	dmeqd 5540	. . . . . 6 ⊢ (𝑦 = 𝑥 → dom (𝑦 ∖ I ) = dom (𝑥 ∖ I ))
180	32, 33, 169, 172, 175, 177, 179	indcardi 9156	. . . . 5 ⊢ (dom (𝑥 ∖ I ) ∈ Fin → (𝑥 ∈ 𝐵 → 𝑥 ∈ (𝐾‘𝑇)))
181	180	impcom 396	. . . 4 ⊢ ((𝑥 ∈ 𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾‘𝑇))
182	181	3adant1 1153	. . 3 ⊢ ((𝐷 ∈ 𝑉 ∧ 𝑥 ∈ 𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾‘𝑇))
183	182	rabssdv 3890	. 2 ⊢ (𝐷 ∈ 𝑉 → {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ⊆ (𝐾‘𝑇))
184	30, 183	eqssd 3826	1 ⊢ (𝐷 ∈ 𝑉 → (𝐾‘𝑇) = {𝑥 ∈ 𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 197 ∧ wa 384 ∀wal 1635 = wceq 1637 ∃wex 1859 ∈ wcel 2157 ≠ wne 2989 {crab 3111 Vcvv 3402 ∖ cdif 3777 ∪ cun 3778 ⊆ wss 3780 ⊊ wpss 3781 ∅c0 4127 {csn 4381 {cpr 4383 class class class wbr 4855 I cid 5231 dom cdm 5324 ran crn 5325 ↾ cres 5326 ∘ ccom 5328 Fn wfn 6105 ⟶wf 6106 –1-1-onto→wf1o 6109 ‘cfv 6110 (class class class)co 6883 ωcom 7304 2_𝑜c2o 7799 ≈ cen 8198 ≼ cdom 8199 ≺ csdm 8200 Fincfn 8201 Basecbs 16087 +_gcplusg 16172 0_gc0g 16324 Moorecmre 16466 mrClscmrc 16467 ACScacs 16469 Mndcmnd 17518 SubMndcsubmnd 17558 Grpcgrp 17646 SubGrpcsubg 17809 SymGrpcsymg 18017 pmTrspcpmtr 18081

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1877 ax-4 1894 ax-5 2001 ax-6 2069 ax-7 2105 ax-8 2159 ax-9 2166 ax-10 2186 ax-11 2202 ax-12 2215 ax-13 2422 ax-ext 2795 ax-rep 4977 ax-sep 4988 ax-nul 4996 ax-pow 5048 ax-pr 5109 ax-un 7188 ax-cnex 10286 ax-resscn 10287 ax-1cn 10288 ax-icn 10289 ax-addcl 10290 ax-addrcl 10291 ax-mulcl 10292 ax-mulrcl 10293 ax-mulcom 10294 ax-addass 10295 ax-mulass 10296 ax-distr 10297 ax-i2m1 10298 ax-1ne0 10299 ax-1rid 10300 ax-rnegex 10301 ax-rrecex 10302 ax-cnre 10303 ax-pre-lttri 10304 ax-pre-lttrn 10305 ax-pre-ltadd 10306 ax-pre-mulgt0 10307

This theorem depends on definitions: df-bi 198 df-an 385 df-or 866 df-3or 1101 df-3an 1102 df-tru 1641 df-ex 1860 df-nf 1864 df-sb 2062 df-mo 2635 df-eu 2642 df-clab 2804 df-cleq 2810 df-clel 2813 df-nfc 2948 df-ne 2990 df-nel 3093 df-ral 3112 df-rex 3113 df-reu 3114 df-rmo 3115 df-rab 3116 df-v 3404 df-sbc 3645 df-csb 3740 df-dif 3783 df-un 3785 df-in 3787 df-ss 3794 df-pss 3796 df-nul 4128 df-if 4291 df-pw 4364 df-sn 4382 df-pr 4384 df-tp 4386 df-op 4388 df-uni 4642 df-int 4681 df-iun 4725 df-iin 4726 df-br 4856 df-opab 4918 df-mpt 4935 df-tr 4958 df-id 5232 df-eprel 5237 df-po 5245 df-so 5246 df-fr 5283 df-se 5284 df-we 5285 df-xp 5330 df-rel 5331 df-cnv 5332 df-co 5333 df-dm 5334 df-rn 5335 df-res 5336 df-ima 5337 df-pred 5906 df-ord 5952 df-on 5953 df-lim 5954 df-suc 5955 df-iota 6073 df-fun 6112 df-fn 6113 df-f 6114 df-f1 6115 df-fo 6116 df-f1o 6117 df-fv 6118 df-isom 6119 df-riota 6844 df-ov 6886 df-oprab 6887 df-mpt2 6888 df-om 7305 df-1st 7407 df-2nd 7408 df-wrecs 7651 df-recs 7713 df-rdg 7751 df-1o 7805 df-2o 7806 df-oadd 7809 df-er 7988 df-map 8103 df-en 8202 df-dom 8203 df-sdom 8204 df-fin 8205 df-card 9057 df-pnf 10370 df-mnf 10371 df-xr 10372 df-ltxr 10373 df-le 10374 df-sub 10562 df-neg 10563 df-nn 11315 df-2 11375 df-3 11376 df-4 11377 df-5 11378 df-6 11379 df-7 11380 df-8 11381 df-9 11382 df-n0 11579 df-z 11663 df-uz 11924 df-fz 12569 df-struct 16089 df-ndx 16090 df-slot 16091 df-base 16093 df-sets 16094 df-ress 16095 df-plusg 16185 df-tset 16191 df-0g 16326 df-mre 16470 df-mrc 16471 df-acs 16473 df-mgm 17466 df-sgrp 17508 df-mnd 17519 df-submnd 17560 df-grp 17649 df-minusg 17650 df-subg 17812 df-symg 18018 df-pmtr 18082

This theorem is referenced by: symggen2 18111 psgneldm2 18144

W3C validator