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

Theorem pgpfi 19676
Description: The converse to pgpfi1 19666. A finite group is a 𝑃-group iff it has size some power of 𝑃. (Contributed by Mario Carneiro, 16-Jan-2015.)
Hypothesis
Ref Expression
pgpfi.1 𝑋 = (Base‘𝐺)
Assertion
Ref Expression
pgpfi ((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) → (𝑃 pGrp 𝐺 ↔ (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛))))
Distinct variable groups:   𝑛,𝐺   𝑃,𝑛   𝑛,𝑋

Proof of Theorem pgpfi
Dummy variables 𝑔 𝑚 𝑝 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 pgpfi.1 . . . 4 𝑋 = (Base‘𝐺)
2 eqid 2763 . . . 4 (od‘𝐺) = (od‘𝐺)
31, 2ispgp 19663 . . 3 (𝑃 pGrp 𝐺 ↔ (𝑃 ∈ ℙ ∧ 𝐺 ∈ Grp ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚)))
4 simprl 782 . . . . . 6 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → 𝑃 ∈ ℙ)
51grpbn0 19034 . . . . . . . . . . 11 (𝐺 ∈ Grp → 𝑋 ≠ ∅)
65ad2antrr 738 . . . . . . . . . 10 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → 𝑋 ≠ ∅)
7 hashnncl 14404 . . . . . . . . . . 11 (𝑋 ∈ Fin → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
87ad2antlr 739 . . . . . . . . . 10 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
96, 8mpbird 260 . . . . . . . . 9 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (♯‘𝑋) ∈ ℕ)
104, 9pccld 16911 . . . . . . . 8 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (♯‘𝑋)) ∈ ℕ0)
1110nn0red 12567 . . . . . . . . . . . . . . 15 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (♯‘𝑋)) ∈ ℝ)
1211leidd 11781 . . . . . . . . . . . . . 14 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (♯‘𝑋)) ≤ (𝑃 pCnt (♯‘𝑋)))
1310nn0zd 12617 . . . . . . . . . . . . . . 15 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (♯‘𝑋)) ∈ ℤ)
14 pcid 16934 . . . . . . . . . . . . . . 15 ((𝑃 ∈ ℙ ∧ (𝑃 pCnt (♯‘𝑋)) ∈ ℤ) → (𝑃 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))) = (𝑃 pCnt (♯‘𝑋)))
154, 13, 14syl2anc 595 . . . . . . . . . . . . . 14 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))) = (𝑃 pCnt (♯‘𝑋)))
1612, 15breqtrrd 5140 . . . . . . . . . . . . 13 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 pCnt (♯‘𝑋)) ≤ (𝑃 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
1716ad2antrr 738 . . . . . . . . . . . 12 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 = 𝑃) → (𝑃 pCnt (♯‘𝑋)) ≤ (𝑃 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
18 simpr 489 . . . . . . . . . . . . 13 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 = 𝑃) → 𝑝 = 𝑃)
1918oveq1d 7427 . . . . . . . . . . . 12 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 = 𝑃) → (𝑝 pCnt (♯‘𝑋)) = (𝑃 pCnt (♯‘𝑋)))
2018oveq1d 7427 . . . . . . . . . . . 12 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 = 𝑃) → (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))) = (𝑃 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
2117, 19, 203brtr4d 5144 . . . . . . . . . . 11 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 = 𝑃) → (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
22 simp-4l 794 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → 𝐺 ∈ Grp)
23 simplr 780 . . . . . . . . . . . . . . . . . . 19 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → 𝑋 ∈ Fin)
2423ad2antrr 738 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → 𝑋 ∈ Fin)
25 simplr 780 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → 𝑝 ∈ ℙ)
26 simpr 489 . . . . . . . . . . . . . . . . . 18 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → 𝑝 ∥ (♯‘𝑋))
271, 2odcau 19675 . . . . . . . . . . . . . . . . . 18 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → ∃𝑔𝑋 ((od‘𝐺)‘𝑔) = 𝑝)
2822, 24, 25, 26, 27syl31anc 1400 . . . . . . . . . . . . . . . . 17 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → ∃𝑔𝑋 ((od‘𝐺)‘𝑔) = 𝑝)
2925adantr 485 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝 ∈ ℙ)
30 prmz 16734 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
31 iddvds 16328 . . . . . . . . . . . . . . . . . . . . 21 (𝑝 ∈ ℤ → 𝑝𝑝)
3229, 30, 313syl 19 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝𝑝)
33 simprr 784 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → ((od‘𝐺)‘𝑔) = 𝑝)
3432, 33breqtrrd 5140 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝 ∥ ((od‘𝐺)‘𝑔))
35 simplrr 789 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) → ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))
36 fveqeq2 6892 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 = 𝑔 → (((od‘𝐺)‘𝑥) = (𝑃𝑚) ↔ ((od‘𝐺)‘𝑔) = (𝑃𝑚)))
3736rexbidv 3189 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑔 → (∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚) ↔ ∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚)))
3837rspccva 3581 . . . . . . . . . . . . . . . . . . . . . 22 ((∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚) ∧ 𝑔𝑋) → ∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚))
3935, 38sylan 591 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑔𝑋) → ∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚))
4039ad2ant2r 759 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → ∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚))
414ad3antrrr 742 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑃 ∈ ℙ)
42 prmnn 16733 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
4329, 42syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝 ∈ ℕ)
4433, 43eqeltrd 2863 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → ((od‘𝐺)‘𝑔) ∈ ℕ)
45 pcprmpw 16944 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ ((od‘𝐺)‘𝑔) ∈ ℕ) → (∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚) ↔ ((od‘𝐺)‘𝑔) = (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔)))))
4641, 44, 45syl2anc 595 . . . . . . . . . . . . . . . . . . . 20 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → (∃𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑔) = (𝑃𝑚) ↔ ((od‘𝐺)‘𝑔) = (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔)))))
4740, 46mpbid 235 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → ((od‘𝐺)‘𝑔) = (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔))))
4834, 47breqtrd 5138 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝 ∥ (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔))))
4941, 44pccld 16911 . . . . . . . . . . . . . . . . . . 19 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → (𝑃 pCnt ((od‘𝐺)‘𝑔)) ∈ ℕ0)
50 prmdvdsexpr 16777 . . . . . . . . . . . . . . . . . . 19 ((𝑝 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ (𝑃 pCnt ((od‘𝐺)‘𝑔)) ∈ ℕ0) → (𝑝 ∥ (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔))) → 𝑝 = 𝑃))
5129, 41, 49, 50syl3anc 1398 . . . . . . . . . . . . . . . . . 18 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → (𝑝 ∥ (𝑃↑(𝑃 pCnt ((od‘𝐺)‘𝑔))) → 𝑝 = 𝑃))
5248, 51mpd 16 . . . . . . . . . . . . . . . . 17 ((((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) ∧ (𝑔𝑋 ∧ ((od‘𝐺)‘𝑔) = 𝑝)) → 𝑝 = 𝑃)
5328, 52rexlimddv 3172 . . . . . . . . . . . . . . . 16 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝 ∥ (♯‘𝑋)) → 𝑝 = 𝑃)
5453ex 417 . . . . . . . . . . . . . . 15 ((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ (♯‘𝑋) → 𝑝 = 𝑃))
5554necon3ad 2971 . . . . . . . . . . . . . 14 ((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) → (𝑝𝑃 → ¬ 𝑝 ∥ (♯‘𝑋)))
5655imp 411 . . . . . . . . . . . . 13 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → ¬ 𝑝 ∥ (♯‘𝑋))
57 simplr 780 . . . . . . . . . . . . . 14 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → 𝑝 ∈ ℙ)
589ad2antrr 738 . . . . . . . . . . . . . 14 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → (♯‘𝑋) ∈ ℕ)
59 pceq0 16932 . . . . . . . . . . . . . 14 ((𝑝 ∈ ℙ ∧ (♯‘𝑋) ∈ ℕ) → ((𝑝 pCnt (♯‘𝑋)) = 0 ↔ ¬ 𝑝 ∥ (♯‘𝑋)))
6057, 58, 59syl2anc 595 . . . . . . . . . . . . 13 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → ((𝑝 pCnt (♯‘𝑋)) = 0 ↔ ¬ 𝑝 ∥ (♯‘𝑋)))
6156, 60mpbird 260 . . . . . . . . . . . 12 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → (𝑝 pCnt (♯‘𝑋)) = 0)
62 prmnn 16733 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
6362ad2antrl 740 . . . . . . . . . . . . . . . 16 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → 𝑃 ∈ ℕ)
6463, 10nnexpcld 14283 . . . . . . . . . . . . . . 15 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃↑(𝑃 pCnt (♯‘𝑋))) ∈ ℕ)
6564ad2antrr 738 . . . . . . . . . . . . . 14 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → (𝑃↑(𝑃 pCnt (♯‘𝑋))) ∈ ℕ)
6657, 65pccld 16911 . . . . . . . . . . . . 13 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))) ∈ ℕ0)
6766nn0ge0d 12569 . . . . . . . . . . . 12 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → 0 ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
6861, 67eqbrtrd 5134 . . . . . . . . . . 11 (((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) ∧ 𝑝𝑃) → (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
6921, 68pm2.61dane 3045 . . . . . . . . . 10 ((((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
7069ralrimiva 3157 . . . . . . . . 9 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → ∀𝑝 ∈ ℙ (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
71 hashcl 14394 . . . . . . . . . . . 12 (𝑋 ∈ Fin → (♯‘𝑋) ∈ ℕ0)
7271ad2antlr 739 . . . . . . . . . . 11 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (♯‘𝑋) ∈ ℕ0)
7372nn0zd 12617 . . . . . . . . . 10 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (♯‘𝑋) ∈ ℤ)
7464nnzd 12618 . . . . . . . . . 10 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃↑(𝑃 pCnt (♯‘𝑋))) ∈ ℤ)
75 pc2dvds 16940 . . . . . . . . . 10 (((♯‘𝑋) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt (♯‘𝑋))) ∈ ℤ) → ((♯‘𝑋) ∥ (𝑃↑(𝑃 pCnt (♯‘𝑋))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋))))))
7673, 74, 75syl2anc 595 . . . . . . . . 9 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → ((♯‘𝑋) ∥ (𝑃↑(𝑃 pCnt (♯‘𝑋))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt (♯‘𝑋)) ≤ (𝑝 pCnt (𝑃↑(𝑃 pCnt (♯‘𝑋))))))
7770, 76mpbird 260 . . . . . . . 8 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (♯‘𝑋) ∥ (𝑃↑(𝑃 pCnt (♯‘𝑋))))
78 oveq2 7420 . . . . . . . . . 10 (𝑛 = (𝑃 pCnt (♯‘𝑋)) → (𝑃𝑛) = (𝑃↑(𝑃 pCnt (♯‘𝑋))))
7978breq2d 5122 . . . . . . . . 9 (𝑛 = (𝑃 pCnt (♯‘𝑋)) → ((♯‘𝑋) ∥ (𝑃𝑛) ↔ (♯‘𝑋) ∥ (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
8079rspcev 3582 . . . . . . . 8 (((𝑃 pCnt (♯‘𝑋)) ∈ ℕ0 ∧ (♯‘𝑋) ∥ (𝑃↑(𝑃 pCnt (♯‘𝑋)))) → ∃𝑛 ∈ ℕ0 (♯‘𝑋) ∥ (𝑃𝑛))
8110, 77, 80syl2anc 595 . . . . . . 7 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → ∃𝑛 ∈ ℕ0 (♯‘𝑋) ∥ (𝑃𝑛))
82 pcprmpw2 16943 . . . . . . . . 9 ((𝑃 ∈ ℙ ∧ (♯‘𝑋) ∈ ℕ) → (∃𝑛 ∈ ℕ0 (♯‘𝑋) ∥ (𝑃𝑛) ↔ (♯‘𝑋) = (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
83 pcprmpw 16944 . . . . . . . . 9 ((𝑃 ∈ ℙ ∧ (♯‘𝑋) ∈ ℕ) → (∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛) ↔ (♯‘𝑋) = (𝑃↑(𝑃 pCnt (♯‘𝑋)))))
8482, 83bitr4d 285 . . . . . . . 8 ((𝑃 ∈ ℙ ∧ (♯‘𝑋) ∈ ℕ) → (∃𝑛 ∈ ℕ0 (♯‘𝑋) ∥ (𝑃𝑛) ↔ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)))
854, 9, 84syl2anc 595 . . . . . . 7 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (∃𝑛 ∈ ℕ0 (♯‘𝑋) ∥ (𝑃𝑛) ↔ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)))
8681, 85mpbid 235 . . . . . 6 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛))
874, 86jca 520 . . . . 5 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)))
88873adantr2 1189 . . . 4 (((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) ∧ (𝑃 ∈ ℙ ∧ 𝐺 ∈ Grp ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚))) → (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)))
8988ex 417 . . 3 ((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) → ((𝑃 ∈ ℙ ∧ 𝐺 ∈ Grp ∧ ∀𝑥𝑋𝑚 ∈ ℕ0 ((od‘𝐺)‘𝑥) = (𝑃𝑚)) → (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛))))
903, 89biimtrid 245 . 2 ((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) → (𝑃 pGrp 𝐺 → (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛))))
911pgpfi1 19666 . . . . . 6 ((𝐺 ∈ Grp ∧ 𝑃 ∈ ℙ ∧ 𝑛 ∈ ℕ0) → ((♯‘𝑋) = (𝑃𝑛) → 𝑃 pGrp 𝐺))
92913expia 1139 . . . . 5 ((𝐺 ∈ Grp ∧ 𝑃 ∈ ℙ) → (𝑛 ∈ ℕ0 → ((♯‘𝑋) = (𝑃𝑛) → 𝑃 pGrp 𝐺)))
9392rexlimdv 3164 . . . 4 ((𝐺 ∈ Grp ∧ 𝑃 ∈ ℙ) → (∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛) → 𝑃 pGrp 𝐺))
9493expimpd 458 . . 3 (𝐺 ∈ Grp → ((𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)) → 𝑃 pGrp 𝐺))
9594adantr 485 . 2 ((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) → ((𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛)) → 𝑃 pGrp 𝐺))
9690, 95impbid 215 1 ((𝐺 ∈ Grp ∧ 𝑋 ∈ Fin) → (𝑃 pGrp 𝐺 ↔ (𝑃 ∈ ℙ ∧ ∃𝑛 ∈ ℕ0 (♯‘𝑋) = (𝑃𝑛))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  w3a 1103   = wceq 1570  wcel 2143  wne 2958  wral 3079  wrex 3089  c0 4287   class class class wbr 5110  cfv 6538  (class class class)co 7412  Fincfn 8944  0cc0 11101  cle 11245  cn 12234  0cn0 12505  cz 12592  cexp 14099  chash 14368  cdvds 16311  cprime 16730   pCnt cpc 16897  Basecbs 17270  Grpcgrp 19001  odcod 19595   pGrp cpgp 19597
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-inf2 9611  ax-cnex 11157  ax-resscn 11158  ax-1cn 11159  ax-icn 11160  ax-addcl 11161  ax-addrcl 11162  ax-mulcl 11163  ax-mulrcl 11164  ax-mulcom 11165  ax-addass 11166  ax-mulass 11167  ax-distr 11168  ax-i2m1 11169  ax-1ne0 11170  ax-1rid 11171  ax-rnegex 11172  ax-rrecex 11173  ax-cnre 11174  ax-pre-lttri 11175  ax-pre-lttrn 11176  ax-pre-ltadd 11177  ax-pre-mulgt0 11178  ax-pre-sup 11179
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-int 4914  df-iun 4959  df-disj 5078  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-se 5617  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-1o 8454  df-2o 8455  df-oadd 8458  df-omul 8459  df-er 8695  df-ec 8697  df-qs 8701  df-map 8827  df-en 8945  df-dom 8946  df-sdom 8947  df-fin 8948  df-sup 9403  df-inf 9404  df-oi 9473  df-dju 9888  df-card 9926  df-acn 9929  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11444  df-neg 11445  df-div 11873  df-nn 12235  df-2 12304  df-3 12305  df-n0 12506  df-xnn0 12579  df-z 12593  df-uz 12864  df-q 12974  df-rp 13018  df-fz 13537  df-fzo 13685  df-fl 13827  df-mod 13905  df-seq 14040  df-exp 14100  df-fac 14312  df-bc 14341  df-hash 14369  df-cj 15152  df-re 15153  df-im 15154  df-sqrt 15288  df-abs 15289  df-clim 15541  df-sum 15740  df-dvds 16312  df-gcd 16554  df-prm 16731  df-pc 16898  df-sets 17225  df-slot 17243  df-ndx 17255  df-base 17271  df-ress 17292  df-plusg 17324  df-0g 17495  df-mgm 18699  df-sgrp 18778  df-mnd 18794  df-submnd 18843  df-grp 19004  df-minusg 19005  df-sbg 19006  df-mulg 19135  df-subg 19190  df-eqg 19192  df-ga 19361  df-od 19599  df-pgp 19601
This theorem is referenced by:  pgpfi2  19677  sylow2alem2  19689  slwhash  19695  fislw  19696
  Copyright terms: Public domain W3C validator