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

Theorem symggen 18592
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.
StepHypRef Expression
1 elex 3512 . . . 4 (𝐷𝑉𝐷 ∈ V)
2 symgtrf.g . . . . . . 7 𝐺 = (SymGrp‘𝐷)
32symggrp 18522 . . . . . 6 (𝐷 ∈ V → 𝐺 ∈ Grp)
4 grpmnd 18104 . . . . . 6 (𝐺 ∈ Grp → 𝐺 ∈ Mnd)
53, 4syl 17 . . . . 5 (𝐷 ∈ V → 𝐺 ∈ Mnd)
6 symgtrf.b . . . . . 6 𝐵 = (Base‘𝐺)
76submacs 17985 . . . . 5 (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
8 acsmre 16917 . . . . 5 ((SubMnd‘𝐺) ∈ (ACS‘𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
95, 7, 83syl 18 . . . 4 (𝐷 ∈ V → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
101, 9syl 17 . . 3 (𝐷𝑉 → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
11 symgtrf.t . . . . . 6 𝑇 = ran (pmTrsp‘𝐷)
1211, 2, 6symgtrf 18591 . . . . 5 𝑇𝐵
1312a1i 11 . . . 4 (𝐷𝑉𝑇𝐵)
14 2onn 8260 . . . . . 6 2o ∈ ω
15 nnfi 8705 . . . . . 6 (2o ∈ ω → 2o ∈ Fin)
1614, 15ax-mp 5 . . . . 5 2o ∈ Fin
17 eqid 2821 . . . . . . . . 9 (pmTrsp‘𝐷) = (pmTrsp‘𝐷)
1817, 11pmtrfb 18587 . . . . . . . 8 (𝑥𝑇 ↔ (𝐷 ∈ V ∧ 𝑥:𝐷1-1-onto𝐷 ∧ dom (𝑥 ∖ I ) ≈ 2o))
1918simp3bi 1143 . . . . . . 7 (𝑥𝑇 → dom (𝑥 ∖ I ) ≈ 2o)
20 enfi 8728 . . . . . . 7 (dom (𝑥 ∖ I ) ≈ 2o → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2119, 20syl 17 . . . . . 6 (𝑥𝑇 → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2221adantl 484 . . . . 5 ((𝐷𝑉𝑥𝑇) → (dom (𝑥 ∖ I ) ∈ Fin ↔ 2o ∈ Fin))
2316, 22mpbiri 260 . . . 4 ((𝐷𝑉𝑥𝑇) → dom (𝑥 ∖ I ) ∈ Fin)
2413, 23ssrabdv 4049 . . 3 (𝐷𝑉𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
252, 6symgfisg 18590 . . . 4 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺))
26 subgsubm 18295 . . . 4 ({𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubGrp‘𝐺) → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
2725, 26syl 17 . . 3 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺))
28 symggen.k . . . 4 𝐾 = (mrCls‘(SubMnd‘𝐺))
2928mrcsscl 16885 . . 3 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇 ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∧ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ∈ (SubMnd‘𝐺)) → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
3010, 24, 27, 29syl3anc 1367 . 2 (𝐷𝑉 → (𝐾𝑇) ⊆ {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
31 vex 3497 . . . . . . 7 𝑥 ∈ V
3231a1i 11 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → 𝑥 ∈ V)
33 finnum 9371 . . . . . 6 (dom (𝑥 ∖ I ) ∈ Fin → dom (𝑥 ∖ I ) ∈ dom card)
34 domfi 8733 . . . . . . . 8 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
352, 6symgbasf1o 18497 . . . . . . . . . . . . . . 15 (𝑦𝐵𝑦:𝐷1-1-onto𝐷)
3635adantl 484 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑦:𝐷1-1-onto𝐷)
37 f1ofn 6610 . . . . . . . . . . . . . 14 (𝑦:𝐷1-1-onto𝐷𝑦 Fn 𝐷)
38 fnnfpeq0 6934 . . . . . . . . . . . . . 14 (𝑦 Fn 𝐷 → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
3936, 37, 383syl 18 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ ↔ 𝑦 = ( I ↾ 𝐷)))
402, 6elbasfv 16538 . . . . . . . . . . . . . . . . 17 (𝑦𝐵𝐷 ∈ V)
4140adantl 484 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐷 ∈ V)
422symgid 18523 . . . . . . . . . . . . . . . 16 (𝐷 ∈ V → ( I ↾ 𝐷) = (0g𝐺))
4341, 42syl 17 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) = (0g𝐺))
4441, 9syl 17 . . . . . . . . . . . . . . . . 17 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
4528mrccl 16876 . . . . . . . . . . . . . . . . 17 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
4644, 12, 45sylancl 588 . . . . . . . . . . . . . . . 16 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
47 eqid 2821 . . . . . . . . . . . . . . . . 17 (0g𝐺) = (0g𝐺)
4847subm0cl 17970 . . . . . . . . . . . . . . . 16 ((𝐾𝑇) ∈ (SubMnd‘𝐺) → (0g𝐺) ∈ (𝐾𝑇))
4946, 48syl 17 . . . . . . . . . . . . . . 15 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (0g𝐺) ∈ (𝐾𝑇))
5043, 49eqeltrd 2913 . . . . . . . . . . . . . 14 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → ( I ↾ 𝐷) ∈ (𝐾𝑇))
51 eleq1a 2908 . . . . . . . . . . . . . 14 (( I ↾ 𝐷) ∈ (𝐾𝑇) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5250, 51syl 17 . . . . . . . . . . . . 13 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (𝑦 = ( I ↾ 𝐷) → 𝑦 ∈ (𝐾𝑇)))
5339, 52sylbid 242 . . . . . . . . . . . 12 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
5453adantr 483 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) = ∅ → 𝑦 ∈ (𝐾𝑇)))
55 n0 4309 . . . . . . . . . . . 12 (dom (𝑦 ∖ I ) ≠ ∅ ↔ ∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ))
5641adantr 483 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐷 ∈ V)
57 simpr 487 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ∈ dom (𝑦 ∖ I ))
58 f1omvdmvd 18565 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦:𝐷1-1-onto𝐷𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
5936, 58sylan 582 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ (dom (𝑦 ∖ I ) ∖ {𝑢}))
6059eldifad 3947 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ dom (𝑦 ∖ I ))
6157, 60prssd 4748 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ dom (𝑦 ∖ I ))
62 difss 4107 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 ∖ I ) ⊆ 𝑦
63 dmss 5765 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 ∖ I ) ⊆ 𝑦 → dom (𝑦 ∖ I ) ⊆ dom 𝑦)
6462, 63ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 dom (𝑦 ∖ I ) ⊆ dom 𝑦
65 f1odm 6613 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦:𝐷1-1-onto𝐷 → dom 𝑦 = 𝐷)
6636, 65syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom 𝑦 = 𝐷)
6764, 66sseqtrid 4018 . . . . . . . . . . . . . . . . . . . . . . 23 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6867adantr 483 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ 𝐷)
6961, 68sstrd 3976 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ⊆ 𝐷)
70 vex 3497 . . . . . . . . . . . . . . . . . . . . . 22 𝑢 ∈ V
71 fvex 6677 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦𝑢) ∈ V
7236adantr 483 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦:𝐷1-1-onto𝐷)
7372, 37syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 Fn 𝐷)
7467sselda 3966 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢𝐷)
75 fnelnfp 6933 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑦 Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7673, 74, 75syl2anc 586 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑢 ∈ dom (𝑦 ∖ I ) ↔ (𝑦𝑢) ≠ 𝑢))
7757, 76mpbid 234 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ≠ 𝑢)
7877necomd 3071 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑢 ≠ (𝑦𝑢))
79 pr2nelem 9424 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑢 ∈ V ∧ (𝑦𝑢) ∈ V ∧ 𝑢 ≠ (𝑦𝑢)) → {𝑢, (𝑦𝑢)} ≈ 2o)
8070, 71, 78, 79mp3an12i 1461 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → {𝑢, (𝑦𝑢)} ≈ 2o)
8117, 11pmtrrn 18579 . . . . . . . . . . . . . . . . . . . . 21 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8256, 69, 80, 81syl3anc 1367 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇)
8312, 82sseldi 3964 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵)
84 simplr 767 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦𝐵)
85 eqid 2821 . . . . . . . . . . . . . . . . . . . 20 (+g𝐺) = (+g𝐺)
862, 6, 85symgov 18506 . . . . . . . . . . . . . . . . . . 19 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8783, 84, 86syl2anc 586 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
8887oveq2d 7166 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
8941, 3syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝐺 ∈ Grp)
9089adantr 483 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝐺 ∈ Grp)
916, 85grpcl 18105 . . . . . . . . . . . . . . . . . . . 20 ((𝐺 ∈ Grp ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵𝑦𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9290, 83, 84, 91syl3anc 1367 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
9387, 92eqeltrrd 2914 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵)
942, 6, 85symgov 18506 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝐵 ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
9583, 93, 94syl2anc 586 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)))
96 coass 6112 . . . . . . . . . . . . . . . . . 18 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦))
9717, 11pmtrfinv 18583 . . . . . . . . . . . . . . . . . . . . 21 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ 𝑇 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9882, 97syl 17 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) = ( I ↾ 𝐷))
9998coeq1d 5726 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = (( I ↾ 𝐷) ∘ 𝑦))
100 f1of 6609 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷1-1-onto𝐷𝑦:𝐷𝐷)
101 fcoi2 6547 . . . . . . . . . . . . . . . . . . . 20 (𝑦:𝐷𝐷 → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10272, 100, 1013syl 18 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (( I ↾ 𝐷) ∘ 𝑦) = 𝑦)
10399, 102eqtrd 2856 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})) ∘ 𝑦) = 𝑦)
10496, 103syl5eqr 2870 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)) = 𝑦)
10588, 95, 1043eqtrd 2860 . . . . . . . . . . . . . . . 16 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
106105adantlr 713 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) = 𝑦)
10746ad2antrr 724 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝐾𝑇) ∈ (SubMnd‘𝐺))
10828mrcssid 16882 . . . . . . . . . . . . . . . . . . . 20 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ 𝑇𝐵) → 𝑇 ⊆ (𝐾𝑇))
10944, 12, 108sylancl 588 . . . . . . . . . . . . . . . . . . 19 ((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) → 𝑇 ⊆ (𝐾𝑇))
110109adantr 483 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑇 ⊆ (𝐾𝑇))
111110, 82sseldd 3967 . . . . . . . . . . . . . . . . 17 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
112111adantlr 713 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇))
11387difeq1d 4097 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
114113dmeqd 5768 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
115 simpll 765 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ∈ Fin)
116 mvdco 18567 . . . . . . . . . . . . . . . . . . . . . 22 dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I ))
11717pmtrmvd 18578 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ {𝑢, (𝑦𝑢)} ⊆ 𝐷 ∧ {𝑢, (𝑦𝑢)} ≈ 2o) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
11856, 69, 80, 117syl3anc 1367 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) = {𝑢, (𝑦𝑢)})
119118, 61eqsstrd 4004 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ⊆ dom (𝑦 ∖ I ))
120 ssidd 3989 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom (𝑦 ∖ I ) ⊆ dom (𝑦 ∖ I ))
121119, 120unssd 4161 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∖ I ) ∪ dom (𝑦 ∖ I )) ⊆ dom (𝑦 ∖ I ))
122116, 121sstrid 3977 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊆ dom (𝑦 ∖ I ))
123 fvco2 6752 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑦 Fn 𝐷𝑢𝐷) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
12473, 74, 123syl2anc 586 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)))
125 prcom 4661 . . . . . . . . . . . . . . . . . . . . . . . . . 26 {𝑢, (𝑦𝑢)} = {(𝑦𝑢), 𝑢}
126125fveq2i 6667 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) = ((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})
127126fveq1i 6665 . . . . . . . . . . . . . . . . . . . . . . . 24 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢))
12868, 60sseldd 3967 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (𝑦𝑢) ∈ 𝐷)
12917pmtrprfv 18575 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐷 ∈ V ∧ ((𝑦𝑢) ∈ 𝐷𝑢𝐷 ∧ (𝑦𝑢) ≠ 𝑢)) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
13056, 128, 74, 77, 129syl13anc 1368 . . . . . . . . . . . . . . . . . . . . . . . 24 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{(𝑦𝑢), 𝑢})‘(𝑦𝑢)) = 𝑢)
131127, 130syl5eq 2868 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})‘(𝑦𝑢)) = 𝑢)
132124, 131eqtrd 2856 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢)
1332, 6symgbasf1o 18497 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷)
134 f1ofn 6610 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦):𝐷1-1-onto𝐷 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
13593, 133, 1343syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷)
136 fnelnfp 6933 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) ≠ 𝑢))
137136necon2bbid 3059 . . . . . . . . . . . . . . . . . . . . . . 23 (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) Fn 𝐷𝑢𝐷) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
138135, 74, 137syl2anc 586 . . . . . . . . . . . . . . . . . . . . . 22 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦)‘𝑢) = 𝑢 ↔ ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I )))
139132, 138mpbid 234 . . . . . . . . . . . . . . . . . . . . 21 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → ¬ 𝑢 ∈ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ))
140122, 57, 139ssnelpssd 4088 . . . . . . . . . . . . . . . . . . . 20 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I ))
141 php3 8697 . . . . . . . . . . . . . . . . . . . 20 ((dom (𝑦 ∖ I ) ∈ Fin ∧ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ⊊ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
142115, 140, 141syl2anc 586 . . . . . . . . . . . . . . . . . . 19 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∘ 𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
143114, 142eqbrtrd 5080 . . . . . . . . . . . . . . . . . 18 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
144143adantlr 713 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ))
14592adantlr 713 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵)
146 ovex 7183 . . . . . . . . . . . . . . . . . . 19 (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ V
147 difeq1 4091 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∖ I ) = ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
148147dmeqd 5768 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → dom (𝑧 ∖ I ) = dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ))
149148breq1d 5068 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) ↔ dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I )))
150 eleq1 2900 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧𝐵 ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵))
151 eleq1 2900 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → (𝑧 ∈ (𝐾𝑇) ↔ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))
152150, 151imbi12d 347 . . . . . . . . . . . . . . . . . . . 20 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((𝑧𝐵𝑧 ∈ (𝐾𝑇)) ↔ ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
153149, 152imbi12d 347 . . . . . . . . . . . . . . . . . . 19 (𝑧 = (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) → ((dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) ↔ (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)))))
154146, 153spcv 3605 . . . . . . . . . . . . . . . . . 18 (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
155154ad2antlr 725 . . . . . . . . . . . . . . . . 17 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (dom ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∖ I ) ≺ dom (𝑦 ∖ I ) → ((((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ 𝐵 → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))))
156144, 145, 155mp2d 49 . . . . . . . . . . . . . . . 16 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇))
15785submcl 17971 . . . . . . . . . . . . . . . 16 (((𝐾𝑇) ∈ (SubMnd‘𝐺) ∧ ((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)}) ∈ (𝐾𝑇) ∧ (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦) ∈ (𝐾𝑇)) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
158107, 112, 156, 157syl3anc 1367 . . . . . . . . . . . . . . 15 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → (((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)(((pmTrsp‘𝐷)‘{𝑢, (𝑦𝑢)})(+g𝐺)𝑦)) ∈ (𝐾𝑇))
159106, 158eqeltrrd 2914 . . . . . . . . . . . . . 14 ((((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) ∧ 𝑢 ∈ dom (𝑦 ∖ I )) → 𝑦 ∈ (𝐾𝑇))
160159ex 415 . . . . . . . . . . . . 13 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
161160exlimdv 1930 . . . . . . . . . . . 12 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (∃𝑢 𝑢 ∈ dom (𝑦 ∖ I ) → 𝑦 ∈ (𝐾𝑇)))
16255, 161syl5bi 244 . . . . . . . . . . 11 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (dom (𝑦 ∖ I ) ≠ ∅ → 𝑦 ∈ (𝐾𝑇)))
16354, 162pm2.61dne 3103 . . . . . . . . . 10 (((dom (𝑦 ∖ I ) ∈ Fin ∧ 𝑦𝐵) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → 𝑦 ∈ (𝐾𝑇))
164163exp31 422 . . . . . . . . 9 (dom (𝑦 ∖ I ) ∈ Fin → (𝑦𝐵 → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → 𝑦 ∈ (𝐾𝑇))))
165164com23 86 . . . . . . . 8 (dom (𝑦 ∖ I ) ∈ Fin → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
16634, 165syl 17 . . . . . . 7 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I )) → (∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇))))
1671663impia 1113 . . . . . 6 ((dom (𝑥 ∖ I ) ∈ Fin ∧ dom (𝑦 ∖ I ) ≼ dom (𝑥 ∖ I ) ∧ ∀𝑧(dom (𝑧 ∖ I ) ≺ dom (𝑦 ∖ I ) → (𝑧𝐵𝑧 ∈ (𝐾𝑇)))) → (𝑦𝐵𝑦 ∈ (𝐾𝑇)))
168 eleq1w 2895 . . . . . . 7 (𝑦 = 𝑧 → (𝑦𝐵𝑧𝐵))
169 eleq1w 2895 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑧 ∈ (𝐾𝑇)))
170168, 169imbi12d 347 . . . . . 6 (𝑦 = 𝑧 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑧𝐵𝑧 ∈ (𝐾𝑇))))
171 eleq1w 2895 . . . . . . 7 (𝑦 = 𝑥 → (𝑦𝐵𝑥𝐵))
172 eleq1w 2895 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∈ (𝐾𝑇) ↔ 𝑥 ∈ (𝐾𝑇)))
173171, 172imbi12d 347 . . . . . 6 (𝑦 = 𝑥 → ((𝑦𝐵𝑦 ∈ (𝐾𝑇)) ↔ (𝑥𝐵𝑥 ∈ (𝐾𝑇))))
174 difeq1 4091 . . . . . . 7 (𝑦 = 𝑧 → (𝑦 ∖ I ) = (𝑧 ∖ I ))
175174dmeqd 5768 . . . . . 6 (𝑦 = 𝑧 → dom (𝑦 ∖ I ) = dom (𝑧 ∖ I ))
176 difeq1 4091 . . . . . . 7 (𝑦 = 𝑥 → (𝑦 ∖ I ) = (𝑥 ∖ I ))
177176dmeqd 5768 . . . . . 6 (𝑦 = 𝑥 → dom (𝑦 ∖ I ) = dom (𝑥 ∖ I ))
17832, 33, 167, 170, 173, 175, 177indcardi 9461 . . . . 5 (dom (𝑥 ∖ I ) ∈ Fin → (𝑥𝐵𝑥 ∈ (𝐾𝑇)))
179178impcom 410 . . . 4 ((𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
1801793adant1 1126 . . 3 ((𝐷𝑉𝑥𝐵 ∧ dom (𝑥 ∖ I ) ∈ Fin) → 𝑥 ∈ (𝐾𝑇))
181180rabssdv 4050 . 2 (𝐷𝑉 → {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin} ⊆ (𝐾𝑇))
18230, 181eqssd 3983 1 (𝐷𝑉 → (𝐾𝑇) = {𝑥𝐵 ∣ dom (𝑥 ∖ I ) ∈ Fin})
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wal 1531   = wceq 1533  wex 1776  wcel 2110  wne 3016  {crab 3142  Vcvv 3494  cdif 3932  cun 3933  wss 3935  wpss 3936  c0 4290  {csn 4560  {cpr 4562   class class class wbr 5058   I cid 5453  dom cdm 5549  ran crn 5550  cres 5551  ccom 5553   Fn wfn 6344  wf 6345  1-1-ontowf1o 6348  cfv 6349  (class class class)co 7150  ωcom 7574  2oc2o 8090  cen 8500  cdom 8501  csdm 8502  Fincfn 8503  Basecbs 16477  +gcplusg 16559  0gc0g 16707  Moorecmre 16847  mrClscmrc 16848  ACScacs 16850  Mndcmnd 17905  SubMndcsubmnd 17949  Grpcgrp 18097  SubGrpcsubg 18267  SymGrpcsymg 18489  pmTrspcpmtr 18563
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-rep 5182  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-cnex 10587  ax-resscn 10588  ax-1cn 10589  ax-icn 10590  ax-addcl 10591  ax-addrcl 10592  ax-mulcl 10593  ax-mulrcl 10594  ax-mulcom 10595  ax-addass 10596  ax-mulass 10597  ax-distr 10598  ax-i2m1 10599  ax-1ne0 10600  ax-1rid 10601  ax-rnegex 10602  ax-rrecex 10603  ax-cnre 10604  ax-pre-lttri 10605  ax-pre-lttrn 10606  ax-pre-ltadd 10607  ax-pre-mulgt0 10608
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  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-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-int 4869  df-iun 4913  df-iin 4914  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-se 5509  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-pred 6142  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-isom 6358  df-riota 7108  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-wrecs 7941  df-recs 8002  df-rdg 8040  df-1o 8096  df-2o 8097  df-oadd 8100  df-er 8283  df-map 8402  df-en 8504  df-dom 8505  df-sdom 8506  df-fin 8507  df-card 9362  df-pnf 10671  df-mnf 10672  df-xr 10673  df-ltxr 10674  df-le 10675  df-sub 10866  df-neg 10867  df-nn 11633  df-2 11694  df-3 11695  df-4 11696  df-5 11697  df-6 11698  df-7 11699  df-8 11700  df-9 11701  df-n0 11892  df-z 11976  df-uz 12238  df-fz 12887  df-struct 16479  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-ress 16485  df-plusg 16572  df-tset 16578  df-0g 16709  df-mre 16851  df-mrc 16852  df-acs 16854  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-submnd 17951  df-efmnd 18028  df-grp 18100  df-minusg 18101  df-subg 18270  df-symg 18490  df-pmtr 18564
This theorem is referenced by:  symggen2  18593  psgneldm2  18626
  Copyright terms: Public domain W3C validator