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

Theorem ablfaclem2 18677
Description: Lemma for ablfac 18679. (Contributed by Mario Carneiro, 27-Apr-2016.) (Proof shortened by Mario Carneiro, 3-May-2016.)
Hypotheses
Ref Expression
ablfac.b 𝐵 = (Base‘𝐺)
ablfac.c 𝐶 = {𝑟 ∈ (SubGrp‘𝐺) ∣ (𝐺s 𝑟) ∈ (CycGrp ∩ ran pGrp )}
ablfac.1 (𝜑𝐺 ∈ Abel)
ablfac.2 (𝜑𝐵 ∈ Fin)
ablfac.o 𝑂 = (od‘𝐺)
ablfac.a 𝐴 = {𝑤 ∈ ℙ ∣ 𝑤 ∥ (♯‘𝐵)}
ablfac.s 𝑆 = (𝑝𝐴 ↦ {𝑥𝐵 ∣ (𝑂𝑥) ∥ (𝑝↑(𝑝 pCnt (♯‘𝐵)))})
ablfac.w 𝑊 = (𝑔 ∈ (SubGrp‘𝐺) ↦ {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝑔)})
ablfaclem2.f (𝜑𝐹:𝐴⟶Word 𝐶)
ablfaclem2.q (𝜑 → ∀𝑦𝐴 (𝐹𝑦) ∈ (𝑊‘(𝑆𝑦)))
ablfaclem2.l 𝐿 = 𝑦𝐴 ({𝑦} × dom (𝐹𝑦))
ablfaclem2.g (𝜑𝐻:(0..^(♯‘𝐿))–1-1-onto𝐿)
Assertion
Ref Expression
ablfaclem2 (𝜑 → (𝑊𝐵) ≠ ∅)
Distinct variable groups:   𝑠,𝑝,𝑥,𝑦,𝐴   𝐹,𝑠   𝑔,𝑟,𝑠,𝑦,𝑆   𝑔,𝑝,𝑤,𝑥,𝐵,𝑟,𝑠   𝑂,𝑝,𝑥   𝐶,𝑔,𝑝,𝑠   𝑦,𝑤,𝐶,𝑥   𝑊,𝑝,𝑤,𝑥,𝑦   𝐻,𝑠   𝜑,𝑝,𝑠,𝑤,𝑥,𝑦   𝑔,𝐺,𝑝,𝑟,𝑠,𝑤,𝑥,𝑦
Allowed substitution hints:   𝜑(𝑔,𝑟)   𝐴(𝑤,𝑔,𝑟)   𝐵(𝑦)   𝐶(𝑟)   𝑆(𝑥,𝑤,𝑝)   𝐹(𝑥,𝑦,𝑤,𝑔,𝑟,𝑝)   𝐻(𝑥,𝑦,𝑤,𝑔,𝑟,𝑝)   𝐿(𝑥,𝑦,𝑤,𝑔,𝑠,𝑟,𝑝)   𝑂(𝑦,𝑤,𝑔,𝑠,𝑟)   𝑊(𝑔,𝑠,𝑟)

Proof of Theorem ablfaclem2
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 ablfac.1 . . 3 (𝜑𝐺 ∈ Abel)
2 ablgrp 18390 . . 3 (𝐺 ∈ Abel → 𝐺 ∈ Grp)
3 ablfac.b . . . 4 𝐵 = (Base‘𝐺)
43subgid 17789 . . 3 (𝐺 ∈ Grp → 𝐵 ∈ (SubGrp‘𝐺))
5 ablfac.c . . . 4 𝐶 = {𝑟 ∈ (SubGrp‘𝐺) ∣ (𝐺s 𝑟) ∈ (CycGrp ∩ ran pGrp )}
6 ablfac.2 . . . 4 (𝜑𝐵 ∈ Fin)
7 ablfac.o . . . 4 𝑂 = (od‘𝐺)
8 ablfac.a . . . 4 𝐴 = {𝑤 ∈ ℙ ∣ 𝑤 ∥ (♯‘𝐵)}
9 ablfac.s . . . 4 𝑆 = (𝑝𝐴 ↦ {𝑥𝐵 ∣ (𝑂𝑥) ∥ (𝑝↑(𝑝 pCnt (♯‘𝐵)))})
10 ablfac.w . . . 4 𝑊 = (𝑔 ∈ (SubGrp‘𝐺) ↦ {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝑔)})
113, 5, 1, 6, 7, 8, 9, 10ablfaclem1 18676 . . 3 (𝐵 ∈ (SubGrp‘𝐺) → (𝑊𝐵) = {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)})
121, 2, 4, 114syl 19 . 2 (𝜑 → (𝑊𝐵) = {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)})
13 ablfaclem2.f . . . . . . . . . . . . . 14 (𝜑𝐹:𝐴⟶Word 𝐶)
1413ffvelrnda 6514 . . . . . . . . . . . . 13 ((𝜑𝑦𝐴) → (𝐹𝑦) ∈ Word 𝐶)
15 wrdf 13488 . . . . . . . . . . . . 13 ((𝐹𝑦) ∈ Word 𝐶 → (𝐹𝑦):(0..^(♯‘(𝐹𝑦)))⟶𝐶)
1614, 15syl 17 . . . . . . . . . . . 12 ((𝜑𝑦𝐴) → (𝐹𝑦):(0..^(♯‘(𝐹𝑦)))⟶𝐶)
17 fdm 6204 . . . . . . . . . . . . . 14 ((𝐹𝑦):(0..^(♯‘(𝐹𝑦)))⟶𝐶 → dom (𝐹𝑦) = (0..^(♯‘(𝐹𝑦))))
1816, 17syl 17 . . . . . . . . . . . . 13 ((𝜑𝑦𝐴) → dom (𝐹𝑦) = (0..^(♯‘(𝐹𝑦))))
1918feq2d 6184 . . . . . . . . . . . 12 ((𝜑𝑦𝐴) → ((𝐹𝑦):dom (𝐹𝑦)⟶𝐶 ↔ (𝐹𝑦):(0..^(♯‘(𝐹𝑦)))⟶𝐶))
2016, 19mpbird 247 . . . . . . . . . . 11 ((𝜑𝑦𝐴) → (𝐹𝑦):dom (𝐹𝑦)⟶𝐶)
2120ffvelrnda 6514 . . . . . . . . . 10 (((𝜑𝑦𝐴) ∧ 𝑧 ∈ dom (𝐹𝑦)) → ((𝐹𝑦)‘𝑧) ∈ 𝐶)
2221anasss 682 . . . . . . . . 9 ((𝜑 ∧ (𝑦𝐴𝑧 ∈ dom (𝐹𝑦))) → ((𝐹𝑦)‘𝑧) ∈ 𝐶)
2322ralrimivva 3101 . . . . . . . 8 (𝜑 → ∀𝑦𝐴𝑧 ∈ dom (𝐹𝑦)((𝐹𝑦)‘𝑧) ∈ 𝐶)
24 eqid 2752 . . . . . . . . 9 (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) = (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))
2524fmpt2x 7396 . . . . . . . 8 (∀𝑦𝐴𝑧 ∈ dom (𝐹𝑦)((𝐹𝑦)‘𝑧) ∈ 𝐶 ↔ (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)): 𝑦𝐴 ({𝑦} × dom (𝐹𝑦))⟶𝐶)
2623, 25sylib 208 . . . . . . 7 (𝜑 → (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)): 𝑦𝐴 ({𝑦} × dom (𝐹𝑦))⟶𝐶)
27 ablfaclem2.l . . . . . . . 8 𝐿 = 𝑦𝐴 ({𝑦} × dom (𝐹𝑦))
2827feq2i 6190 . . . . . . 7 ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)):𝐿𝐶 ↔ (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)): 𝑦𝐴 ({𝑦} × dom (𝐹𝑦))⟶𝐶)
2926, 28sylibr 224 . . . . . 6 (𝜑 → (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)):𝐿𝐶)
30 ablfaclem2.g . . . . . . 7 (𝜑𝐻:(0..^(♯‘𝐿))–1-1-onto𝐿)
31 f1of 6290 . . . . . . 7 (𝐻:(0..^(♯‘𝐿))–1-1-onto𝐿𝐻:(0..^(♯‘𝐿))⟶𝐿)
3230, 31syl 17 . . . . . 6 (𝜑𝐻:(0..^(♯‘𝐿))⟶𝐿)
33 fco 6211 . . . . . 6 (((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)):𝐿𝐶𝐻:(0..^(♯‘𝐿))⟶𝐿) → ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻):(0..^(♯‘𝐿))⟶𝐶)
3429, 32, 33syl2anc 696 . . . . 5 (𝜑 → ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻):(0..^(♯‘𝐿))⟶𝐶)
35 iswrdi 13487 . . . . 5 (((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻):(0..^(♯‘𝐿))⟶𝐶 → ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∈ Word 𝐶)
3634, 35syl 17 . . . 4 (𝜑 → ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∈ Word 𝐶)
37 ablfaclem2.q . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑦𝐴 (𝐹𝑦) ∈ (𝑊‘(𝑆𝑦)))
3837r19.21bi 3062 . . . . . . . . . . . . . 14 ((𝜑𝑦𝐴) → (𝐹𝑦) ∈ (𝑊‘(𝑆𝑦)))
39 ssrab2 3820 . . . . . . . . . . . . . . . . . . . 20 {𝑤 ∈ ℙ ∣ 𝑤 ∥ (♯‘𝐵)} ⊆ ℙ
408, 39eqsstri 3768 . . . . . . . . . . . . . . . . . . 19 𝐴 ⊆ ℙ
4140a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑𝐴 ⊆ ℙ)
423, 7, 9, 1, 6, 41ablfac1b 18661 . . . . . . . . . . . . . . . . 17 (𝜑𝐺dom DProd 𝑆)
43 fvex 6354 . . . . . . . . . . . . . . . . . . . . 21 (Base‘𝐺) ∈ V
443, 43eqeltri 2827 . . . . . . . . . . . . . . . . . . . 20 𝐵 ∈ V
4544rabex 4956 . . . . . . . . . . . . . . . . . . 19 {𝑥𝐵 ∣ (𝑂𝑥) ∥ (𝑝↑(𝑝 pCnt (♯‘𝐵)))} ∈ V
4645, 9dmmpti 6176 . . . . . . . . . . . . . . . . . 18 dom 𝑆 = 𝐴
4746a1i 11 . . . . . . . . . . . . . . . . 17 (𝜑 → dom 𝑆 = 𝐴)
4842, 47dprdf2 18598 . . . . . . . . . . . . . . . 16 (𝜑𝑆:𝐴⟶(SubGrp‘𝐺))
4948ffvelrnda 6514 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → (𝑆𝑦) ∈ (SubGrp‘𝐺))
503, 5, 1, 6, 7, 8, 9, 10ablfaclem1 18676 . . . . . . . . . . . . . . 15 ((𝑆𝑦) ∈ (SubGrp‘𝐺) → (𝑊‘(𝑆𝑦)) = {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦))})
5149, 50syl 17 . . . . . . . . . . . . . 14 ((𝜑𝑦𝐴) → (𝑊‘(𝑆𝑦)) = {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦))})
5238, 51eleqtrd 2833 . . . . . . . . . . . . 13 ((𝜑𝑦𝐴) → (𝐹𝑦) ∈ {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦))})
53 breq2 4800 . . . . . . . . . . . . . . . 16 (𝑠 = (𝐹𝑦) → (𝐺dom DProd 𝑠𝐺dom DProd (𝐹𝑦)))
54 oveq2 6813 . . . . . . . . . . . . . . . . 17 (𝑠 = (𝐹𝑦) → (𝐺 DProd 𝑠) = (𝐺 DProd (𝐹𝑦)))
5554eqeq1d 2754 . . . . . . . . . . . . . . . 16 (𝑠 = (𝐹𝑦) → ((𝐺 DProd 𝑠) = (𝑆𝑦) ↔ (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦)))
5653, 55anbi12d 749 . . . . . . . . . . . . . . 15 (𝑠 = (𝐹𝑦) → ((𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦)) ↔ (𝐺dom DProd (𝐹𝑦) ∧ (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦))))
5756elrab 3496 . . . . . . . . . . . . . 14 ((𝐹𝑦) ∈ {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦))} ↔ ((𝐹𝑦) ∈ Word 𝐶 ∧ (𝐺dom DProd (𝐹𝑦) ∧ (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦))))
5857simprbi 483 . . . . . . . . . . . . 13 ((𝐹𝑦) ∈ {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = (𝑆𝑦))} → (𝐺dom DProd (𝐹𝑦) ∧ (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦)))
5952, 58syl 17 . . . . . . . . . . . 12 ((𝜑𝑦𝐴) → (𝐺dom DProd (𝐹𝑦) ∧ (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦)))
6059simpld 477 . . . . . . . . . . 11 ((𝜑𝑦𝐴) → 𝐺dom DProd (𝐹𝑦))
61 dprdf 18597 . . . . . . . . . . 11 (𝐺dom DProd (𝐹𝑦) → (𝐹𝑦):dom (𝐹𝑦)⟶(SubGrp‘𝐺))
6260, 61syl 17 . . . . . . . . . 10 ((𝜑𝑦𝐴) → (𝐹𝑦):dom (𝐹𝑦)⟶(SubGrp‘𝐺))
6362ffvelrnda 6514 . . . . . . . . 9 (((𝜑𝑦𝐴) ∧ 𝑧 ∈ dom (𝐹𝑦)) → ((𝐹𝑦)‘𝑧) ∈ (SubGrp‘𝐺))
6463anasss 682 . . . . . . . 8 ((𝜑 ∧ (𝑦𝐴𝑧 ∈ dom (𝐹𝑦))) → ((𝐹𝑦)‘𝑧) ∈ (SubGrp‘𝐺))
6562feqmptd 6403 . . . . . . . . 9 ((𝜑𝑦𝐴) → (𝐹𝑦) = (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))
6660, 65breqtrd 4822 . . . . . . . 8 ((𝜑𝑦𝐴) → 𝐺dom DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))
6748feqmptd 6403 . . . . . . . . . 10 (𝜑𝑆 = (𝑦𝐴 ↦ (𝑆𝑦)))
6865oveq2d 6821 . . . . . . . . . . . 12 ((𝜑𝑦𝐴) → (𝐺 DProd (𝐹𝑦)) = (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))))
6959simprd 482 . . . . . . . . . . . 12 ((𝜑𝑦𝐴) → (𝐺 DProd (𝐹𝑦)) = (𝑆𝑦))
7068, 69eqtr3d 2788 . . . . . . . . . . 11 ((𝜑𝑦𝐴) → (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))) = (𝑆𝑦))
7170mpteq2dva 4888 . . . . . . . . . 10 (𝜑 → (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))) = (𝑦𝐴 ↦ (𝑆𝑦)))
7267, 71eqtr4d 2789 . . . . . . . . 9 (𝜑𝑆 = (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))))
7342, 72breqtrd 4822 . . . . . . . 8 (𝜑𝐺dom DProd (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))))
7464, 66, 73dprd2d2 18635 . . . . . . 7 (𝜑 → (𝐺dom DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∧ (𝐺 DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))) = (𝐺 DProd (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))))))
7574simpld 477 . . . . . 6 (𝜑𝐺dom DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))
76 fdm 6204 . . . . . . 7 ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)):𝐿𝐶 → dom (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) = 𝐿)
7729, 76syl 17 . . . . . 6 (𝜑 → dom (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) = 𝐿)
7875, 77, 30dprdf1o 18623 . . . . 5 (𝜑 → (𝐺dom DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∧ (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = (𝐺 DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)))))
7978simpld 477 . . . 4 (𝜑𝐺dom DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻))
8078simprd 482 . . . . 5 (𝜑 → (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = (𝐺 DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))))
8174simprd 482 . . . . 5 (𝜑 → (𝐺 DProd (𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))) = (𝐺 DProd (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))))))
8272oveq2d 6821 . . . . . 6 (𝜑 → (𝐺 DProd 𝑆) = (𝐺 DProd (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))))))
83 ssid 3757 . . . . . . . 8 𝐴𝐴
8483a1i 11 . . . . . . 7 (𝜑𝐴𝐴)
853, 7, 9, 1, 6, 41, 8, 84ablfac1c 18662 . . . . . 6 (𝜑 → (𝐺 DProd 𝑆) = 𝐵)
8682, 85eqtr3d 2788 . . . . 5 (𝜑 → (𝐺 DProd (𝑦𝐴 ↦ (𝐺 DProd (𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧))))) = 𝐵)
8780, 81, 863eqtrd 2790 . . . 4 (𝜑 → (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = 𝐵)
88 breq2 4800 . . . . . 6 (𝑠 = ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) → (𝐺dom DProd 𝑠𝐺dom DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)))
89 oveq2 6813 . . . . . . 7 (𝑠 = ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) → (𝐺 DProd 𝑠) = (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)))
9089eqeq1d 2754 . . . . . 6 (𝑠 = ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) → ((𝐺 DProd 𝑠) = 𝐵 ↔ (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = 𝐵))
9188, 90anbi12d 749 . . . . 5 (𝑠 = ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) → ((𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵) ↔ (𝐺dom DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∧ (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = 𝐵)))
9291rspcev 3441 . . . 4 ((((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∈ Word 𝐶 ∧ (𝐺dom DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻) ∧ (𝐺 DProd ((𝑦𝐴, 𝑧 ∈ dom (𝐹𝑦) ↦ ((𝐹𝑦)‘𝑧)) ∘ 𝐻)) = 𝐵)) → ∃𝑠 ∈ Word 𝐶(𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵))
9336, 79, 87, 92syl12anc 1471 . . 3 (𝜑 → ∃𝑠 ∈ Word 𝐶(𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵))
94 rabn0 4093 . . 3 ({𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)} ≠ ∅ ↔ ∃𝑠 ∈ Word 𝐶(𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵))
9593, 94sylibr 224 . 2 (𝜑 → {𝑠 ∈ Word 𝐶 ∣ (𝐺dom DProd 𝑠 ∧ (𝐺 DProd 𝑠) = 𝐵)} ≠ ∅)
9612, 95eqnetrd 2991 1 (𝜑 → (𝑊𝐵) ≠ ∅)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 383   = wceq 1624  wcel 2131  wne 2924  wral 3042  wrex 3043  {crab 3046  Vcvv 3332  cin 3706  wss 3707  c0 4050  {csn 4313   ciun 4664   class class class wbr 4796  cmpt 4873   × cxp 5256  dom cdm 5258  ran crn 5259  ccom 5262  wf 6037  1-1-ontowf1o 6040  cfv 6041  (class class class)co 6805  cmpt2 6807  Fincfn 8113  0cc0 10120  ..^cfzo 12651  cexp 13046  chash 13303  Word cword 13469  cdvds 15174  cprime 15579   pCnt cpc 15735  Basecbs 16051  s cress 16052  Grpcgrp 17615  SubGrpcsubg 17781  odcod 18136   pGrp cpgp 18138  Abelcabl 18386  CycGrpccyg 18471   DProd cdprd 18584
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1863  ax-4 1878  ax-5 1980  ax-6 2046  ax-7 2082  ax-8 2133  ax-9 2140  ax-10 2160  ax-11 2175  ax-12 2188  ax-13 2383  ax-ext 2732  ax-rep 4915  ax-sep 4925  ax-nul 4933  ax-pow 4984  ax-pr 5047  ax-un 7106  ax-inf2 8703  ax-cnex 10176  ax-resscn 10177  ax-1cn 10178  ax-icn 10179  ax-addcl 10180  ax-addrcl 10181  ax-mulcl 10182  ax-mulrcl 10183  ax-mulcom 10184  ax-addass 10185  ax-mulass 10186  ax-distr 10187  ax-i2m1 10188  ax-1ne0 10189  ax-1rid 10190  ax-rnegex 10191  ax-rrecex 10192  ax-cnre 10193  ax-pre-lttri 10194  ax-pre-lttrn 10195  ax-pre-ltadd 10196  ax-pre-mulgt0 10197  ax-pre-sup 10198
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-tru 1627  df-fal 1630  df-ex 1846  df-nf 1851  df-sb 2039  df-eu 2603  df-mo 2604  df-clab 2739  df-cleq 2745  df-clel 2748  df-nfc 2883  df-ne 2925  df-nel 3028  df-ral 3047  df-rex 3048  df-reu 3049  df-rmo 3050  df-rab 3051  df-v 3334  df-sbc 3569  df-csb 3667  df-dif 3710  df-un 3712  df-in 3714  df-ss 3721  df-pss 3723  df-nul 4051  df-if 4223  df-pw 4296  df-sn 4314  df-pr 4316  df-tp 4318  df-op 4320  df-uni 4581  df-int 4620  df-iun 4666  df-iin 4667  df-disj 4765  df-br 4797  df-opab 4857  df-mpt 4874  df-tr 4897  df-id 5166  df-eprel 5171  df-po 5179  df-so 5180  df-fr 5217  df-se 5218  df-we 5219  df-xp 5264  df-rel 5265  df-cnv 5266  df-co 5267  df-dm 5268  df-rn 5269  df-res 5270  df-ima 5271  df-pred 5833  df-ord 5879  df-on 5880  df-lim 5881  df-suc 5882  df-iota 6004  df-fun 6043  df-fn 6044  df-f 6045  df-f1 6046  df-fo 6047  df-f1o 6048  df-fv 6049  df-isom 6050  df-riota 6766  df-ov 6808  df-oprab 6809  df-mpt2 6810  df-of 7054  df-om 7223  df-1st 7325  df-2nd 7326  df-supp 7456  df-tpos 7513  df-wrecs 7568  df-recs 7629  df-rdg 7667  df-1o 7721  df-2o 7722  df-oadd 7725  df-omul 7726  df-er 7903  df-ec 7905  df-qs 7909  df-map 8017  df-pm 8018  df-ixp 8067  df-en 8114  df-dom 8115  df-sdom 8116  df-fin 8117  df-fsupp 8433  df-sup 8505  df-inf 8506  df-oi 8572  df-card 8947  df-acn 8950  df-cda 9174  df-pnf 10260  df-mnf 10261  df-xr 10262  df-ltxr 10263  df-le 10264  df-sub 10452  df-neg 10453  df-div 10869  df-nn 11205  df-2 11263  df-3 11264  df-n0 11477  df-xnn0 11548  df-z 11562  df-uz 11872  df-q 11974  df-rp 12018  df-fz 12512  df-fzo 12652  df-fl 12779  df-mod 12855  df-seq 12988  df-exp 13047  df-fac 13247  df-bc 13276  df-hash 13304  df-word 13477  df-cj 14030  df-re 14031  df-im 14032  df-sqrt 14166  df-abs 14167  df-clim 14410  df-sum 14608  df-dvds 15175  df-gcd 15411  df-prm 15580  df-pc 15736  df-ndx 16054  df-slot 16055  df-base 16057  df-sets 16058  df-ress 16059  df-plusg 16148  df-0g 16296  df-gsum 16297  df-mre 16440  df-mrc 16441  df-acs 16443  df-mgm 17435  df-sgrp 17477  df-mnd 17488  df-mhm 17528  df-submnd 17529  df-grp 17618  df-minusg 17619  df-sbg 17620  df-mulg 17734  df-subg 17784  df-eqg 17786  df-ghm 17851  df-gim 17894  df-ga 17915  df-cntz 17942  df-oppg 17968  df-od 18140  df-lsm 18243  df-pj1 18244  df-cmn 18387  df-abl 18388  df-dprd 18586
This theorem is referenced by:  ablfaclem3  18678
  Copyright terms: Public domain W3C validator