Step | Hyp | Ref
| Expression |
1 | | sylow2blem3.hp |
. . . . . . . . 9
⊢ (𝜑 → 𝑃 pGrp (𝐺 ↾s 𝐻)) |
2 | | pgpprm 19198 |
. . . . . . . . 9
⊢ (𝑃 pGrp (𝐺 ↾s 𝐻) → 𝑃 ∈ ℙ) |
3 | 1, 2 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑃 ∈ ℙ) |
4 | | sylow2b.h |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐻 ∈ (SubGrp‘𝐺)) |
5 | | subgrcl 18760 |
. . . . . . . . . . 11
⊢ (𝐻 ∈ (SubGrp‘𝐺) → 𝐺 ∈ Grp) |
6 | 4, 5 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐺 ∈ Grp) |
7 | | sylow2b.x |
. . . . . . . . . . 11
⊢ 𝑋 = (Base‘𝐺) |
8 | 7 | grpbn0 18608 |
. . . . . . . . . 10
⊢ (𝐺 ∈ Grp → 𝑋 ≠ ∅) |
9 | 6, 8 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → 𝑋 ≠ ∅) |
10 | | sylow2b.xf |
. . . . . . . . . 10
⊢ (𝜑 → 𝑋 ∈ Fin) |
11 | | hashnncl 14081 |
. . . . . . . . . 10
⊢ (𝑋 ∈ Fin →
((♯‘𝑋) ∈
ℕ ↔ 𝑋 ≠
∅)) |
12 | 10, 11 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅)) |
13 | 9, 12 | mpbird 256 |
. . . . . . . 8
⊢ (𝜑 → (♯‘𝑋) ∈
ℕ) |
14 | | pcndvds2 16569 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℙ ∧
(♯‘𝑋) ∈
ℕ) → ¬ 𝑃
∥ ((♯‘𝑋)
/ (𝑃↑(𝑃 pCnt (♯‘𝑋))))) |
15 | 3, 13, 14 | syl2anc 584 |
. . . . . . 7
⊢ (𝜑 → ¬ 𝑃 ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋))))) |
16 | | sylow2b.r |
. . . . . . . . . . 11
⊢ ∼ =
(𝐺 ~QG
𝐾) |
17 | | sylow2b.k |
. . . . . . . . . . 11
⊢ (𝜑 → 𝐾 ∈ (SubGrp‘𝐺)) |
18 | 7, 16, 17, 10 | lagsubg2 18817 |
. . . . . . . . . 10
⊢ (𝜑 → (♯‘𝑋) = ((♯‘(𝑋 / ∼ )) ·
(♯‘𝐾))) |
19 | 18 | oveq1d 7290 |
. . . . . . . . 9
⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) = (((♯‘(𝑋 / ∼ )) ·
(♯‘𝐾)) /
(♯‘𝐾))) |
20 | | sylow2blem3.kn |
. . . . . . . . . 10
⊢ (𝜑 → (♯‘𝐾) = (𝑃↑(𝑃 pCnt (♯‘𝑋)))) |
21 | 20 | oveq2d 7291 |
. . . . . . . . 9
⊢ (𝜑 → ((♯‘𝑋) / (♯‘𝐾)) = ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋))))) |
22 | | pwfi 8961 |
. . . . . . . . . . . . . 14
⊢ (𝑋 ∈ Fin ↔ 𝒫
𝑋 ∈
Fin) |
23 | 10, 22 | sylib 217 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝒫 𝑋 ∈ Fin) |
24 | 7, 16 | eqger 18806 |
. . . . . . . . . . . . . . 15
⊢ (𝐾 ∈ (SubGrp‘𝐺) → ∼ Er 𝑋) |
25 | 17, 24 | syl 17 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → ∼ Er 𝑋) |
26 | 25 | qsss 8567 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (𝑋 / ∼ ) ⊆ 𝒫
𝑋) |
27 | 23, 26 | ssfid 9042 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑋 / ∼ ) ∈
Fin) |
28 | | hashcl 14071 |
. . . . . . . . . . . 12
⊢ ((𝑋 / ∼ ) ∈ Fin →
(♯‘(𝑋 /
∼
)) ∈ ℕ0) |
29 | 27, 28 | syl 17 |
. . . . . . . . . . 11
⊢ (𝜑 → (♯‘(𝑋 / ∼ )) ∈
ℕ0) |
30 | 29 | nn0cnd 12295 |
. . . . . . . . . 10
⊢ (𝜑 → (♯‘(𝑋 / ∼ )) ∈
ℂ) |
31 | | eqid 2738 |
. . . . . . . . . . . . . . 15
⊢
(0g‘𝐺) = (0g‘𝐺) |
32 | 31 | subg0cl 18763 |
. . . . . . . . . . . . . 14
⊢ (𝐾 ∈ (SubGrp‘𝐺) →
(0g‘𝐺)
∈ 𝐾) |
33 | 17, 32 | syl 17 |
. . . . . . . . . . . . 13
⊢ (𝜑 → (0g‘𝐺) ∈ 𝐾) |
34 | 33 | ne0d 4269 |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐾 ≠ ∅) |
35 | 7 | subgss 18756 |
. . . . . . . . . . . . . . 15
⊢ (𝐾 ∈ (SubGrp‘𝐺) → 𝐾 ⊆ 𝑋) |
36 | 17, 35 | syl 17 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → 𝐾 ⊆ 𝑋) |
37 | 10, 36 | ssfid 9042 |
. . . . . . . . . . . . 13
⊢ (𝜑 → 𝐾 ∈ Fin) |
38 | | hashnncl 14081 |
. . . . . . . . . . . . 13
⊢ (𝐾 ∈ Fin →
((♯‘𝐾) ∈
ℕ ↔ 𝐾 ≠
∅)) |
39 | 37, 38 | syl 17 |
. . . . . . . . . . . 12
⊢ (𝜑 → ((♯‘𝐾) ∈ ℕ ↔ 𝐾 ≠ ∅)) |
40 | 34, 39 | mpbird 256 |
. . . . . . . . . . 11
⊢ (𝜑 → (♯‘𝐾) ∈
ℕ) |
41 | 40 | nncnd 11989 |
. . . . . . . . . 10
⊢ (𝜑 → (♯‘𝐾) ∈
ℂ) |
42 | 40 | nnne0d 12023 |
. . . . . . . . . 10
⊢ (𝜑 → (♯‘𝐾) ≠ 0) |
43 | 30, 41, 42 | divcan4d 11757 |
. . . . . . . . 9
⊢ (𝜑 → (((♯‘(𝑋 / ∼ )) ·
(♯‘𝐾)) /
(♯‘𝐾)) =
(♯‘(𝑋 /
∼
))) |
44 | 19, 21, 43 | 3eqtr3d 2786 |
. . . . . . . 8
⊢ (𝜑 → ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))) = (♯‘(𝑋 / ∼
))) |
45 | 44 | breq2d 5086 |
. . . . . . 7
⊢ (𝜑 → (𝑃 ∥ ((♯‘𝑋) / (𝑃↑(𝑃 pCnt (♯‘𝑋)))) ↔ 𝑃 ∥ (♯‘(𝑋 / ∼
)))) |
46 | 15, 45 | mtbid 324 |
. . . . . 6
⊢ (𝜑 → ¬ 𝑃 ∥ (♯‘(𝑋 / ∼
))) |
47 | | prmz 16380 |
. . . . . . . 8
⊢ (𝑃 ∈ ℙ → 𝑃 ∈
ℤ) |
48 | 3, 47 | syl 17 |
. . . . . . 7
⊢ (𝜑 → 𝑃 ∈ ℤ) |
49 | 29 | nn0zd 12424 |
. . . . . . 7
⊢ (𝜑 → (♯‘(𝑋 / ∼ )) ∈
ℤ) |
50 | | ssrab2 4013 |
. . . . . . . . . 10
⊢ {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ⊆ (𝑋 / ∼ ) |
51 | | ssfi 8956 |
. . . . . . . . . 10
⊢ (((𝑋 / ∼ ) ∈ Fin ∧
{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ⊆ (𝑋 / ∼ )) → {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ∈ Fin) |
52 | 27, 50, 51 | sylancl 586 |
. . . . . . . . 9
⊢ (𝜑 → {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ∈ Fin) |
53 | | hashcl 14071 |
. . . . . . . . 9
⊢ ({𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ∈ Fin → (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) ∈
ℕ0) |
54 | 52, 53 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) ∈
ℕ0) |
55 | 54 | nn0zd 12424 |
. . . . . . 7
⊢ (𝜑 → (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) ∈ ℤ) |
56 | | eqid 2738 |
. . . . . . . 8
⊢
(Base‘(𝐺
↾s 𝐻)) =
(Base‘(𝐺
↾s 𝐻)) |
57 | | sylow2b.a |
. . . . . . . . 9
⊢ + =
(+g‘𝐺) |
58 | | sylow2b.m |
. . . . . . . . 9
⊢ · =
(𝑥 ∈ 𝐻, 𝑦 ∈ (𝑋 / ∼ ) ↦ ran
(𝑧 ∈ 𝑦 ↦ (𝑥 + 𝑧))) |
59 | 7, 10, 4, 17, 57, 16, 58 | sylow2blem2 19226 |
. . . . . . . 8
⊢ (𝜑 → · ∈ ((𝐺 ↾s 𝐻) GrpAct (𝑋 / ∼
))) |
60 | | eqid 2738 |
. . . . . . . . . . 11
⊢ (𝐺 ↾s 𝐻) = (𝐺 ↾s 𝐻) |
61 | 60 | subgbas 18759 |
. . . . . . . . . 10
⊢ (𝐻 ∈ (SubGrp‘𝐺) → 𝐻 = (Base‘(𝐺 ↾s 𝐻))) |
62 | 4, 61 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → 𝐻 = (Base‘(𝐺 ↾s 𝐻))) |
63 | 7 | subgss 18756 |
. . . . . . . . . . 11
⊢ (𝐻 ∈ (SubGrp‘𝐺) → 𝐻 ⊆ 𝑋) |
64 | 4, 63 | syl 17 |
. . . . . . . . . 10
⊢ (𝜑 → 𝐻 ⊆ 𝑋) |
65 | 10, 64 | ssfid 9042 |
. . . . . . . . 9
⊢ (𝜑 → 𝐻 ∈ Fin) |
66 | 62, 65 | eqeltrrd 2840 |
. . . . . . . 8
⊢ (𝜑 → (Base‘(𝐺 ↾s 𝐻)) ∈ Fin) |
67 | | eqid 2738 |
. . . . . . . 8
⊢ {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} = {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} |
68 | | eqid 2738 |
. . . . . . . 8
⊢
{〈𝑥, 𝑦〉 ∣ ({𝑥, 𝑦} ⊆ (𝑋 / ∼ ) ∧
∃𝑔 ∈
(Base‘(𝐺
↾s 𝐻))(𝑔 · 𝑥) = 𝑦)} = {〈𝑥, 𝑦〉 ∣ ({𝑥, 𝑦} ⊆ (𝑋 / ∼ ) ∧
∃𝑔 ∈
(Base‘(𝐺
↾s 𝐻))(𝑔 · 𝑥) = 𝑦)} |
69 | 56, 59, 1, 66, 27, 67, 68 | sylow2a 19224 |
. . . . . . 7
⊢ (𝜑 → 𝑃 ∥ ((♯‘(𝑋 / ∼ )) −
(♯‘{𝑧 ∈
(𝑋 / ∼ )
∣ ∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) |
70 | | dvdssub2 16010 |
. . . . . . 7
⊢ (((𝑃 ∈ ℤ ∧
(♯‘(𝑋 /
∼
)) ∈ ℤ ∧ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) ∈ ℤ) ∧ 𝑃 ∥ ((♯‘(𝑋 / ∼ )) −
(♯‘{𝑧 ∈
(𝑋 / ∼ )
∣ ∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) → (𝑃 ∥ (♯‘(𝑋 / ∼ )) ↔ 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) |
71 | 48, 49, 55, 69, 70 | syl31anc 1372 |
. . . . . 6
⊢ (𝜑 → (𝑃 ∥ (♯‘(𝑋 / ∼ )) ↔ 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) |
72 | 46, 71 | mtbid 324 |
. . . . 5
⊢ (𝜑 → ¬ 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧})) |
73 | | hasheq0 14078 |
. . . . . . . 8
⊢ ({𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ∈ Fin → ((♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) = 0 ↔ {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} = ∅)) |
74 | 52, 73 | syl 17 |
. . . . . . 7
⊢ (𝜑 → ((♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) = 0 ↔ {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} = ∅)) |
75 | | dvds0 15981 |
. . . . . . . . 9
⊢ (𝑃 ∈ ℤ → 𝑃 ∥ 0) |
76 | 48, 75 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑃 ∥ 0) |
77 | | breq2 5078 |
. . . . . . . 8
⊢
((♯‘{𝑧
∈ (𝑋 / ∼ )
∣ ∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) = 0 → (𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) ↔ 𝑃 ∥ 0)) |
78 | 76, 77 | syl5ibrcom 246 |
. . . . . . 7
⊢ (𝜑 → ((♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) = 0 → 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) |
79 | 74, 78 | sylbird 259 |
. . . . . 6
⊢ (𝜑 → ({𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} = ∅ → 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}))) |
80 | 79 | necon3bd 2957 |
. . . . 5
⊢ (𝜑 → (¬ 𝑃 ∥ (♯‘{𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧}) → {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ≠ ∅)) |
81 | 72, 80 | mpd 15 |
. . . 4
⊢ (𝜑 → {𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ≠ ∅) |
82 | | rabn0 4319 |
. . . 4
⊢ ({𝑧 ∈ (𝑋 / ∼ ) ∣
∀𝑢 ∈
(Base‘(𝐺
↾s 𝐻))(𝑢 · 𝑧) = 𝑧} ≠ ∅ ↔ ∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ (Base‘(𝐺 ↾s 𝐻))(𝑢 · 𝑧) = 𝑧) |
83 | 81, 82 | sylib 217 |
. . 3
⊢ (𝜑 → ∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ (Base‘(𝐺 ↾s 𝐻))(𝑢 · 𝑧) = 𝑧) |
84 | 62 | raleqdv 3348 |
. . . 4
⊢ (𝜑 → (∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 ↔ ∀𝑢 ∈ (Base‘(𝐺 ↾s 𝐻))(𝑢 · 𝑧) = 𝑧)) |
85 | 84 | rexbidv 3226 |
. . 3
⊢ (𝜑 → (∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 ↔ ∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ (Base‘(𝐺 ↾s 𝐻))(𝑢 · 𝑧) = 𝑧)) |
86 | 83, 85 | mpbird 256 |
. 2
⊢ (𝜑 → ∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) |
87 | | vex 3436 |
. . . . 5
⊢ 𝑧 ∈ V |
88 | 87 | elqs 8558 |
. . . 4
⊢ (𝑧 ∈ (𝑋 / ∼ ) ↔
∃𝑔 ∈ 𝑋 𝑧 = [𝑔] ∼ ) |
89 | | simplrr 775 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑧 = [𝑔] ∼ ) |
90 | 89 | oveq2d 7291 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑢 · 𝑧) = (𝑢 · [𝑔] ∼ )) |
91 | | simprr 770 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑢 · 𝑧) = 𝑧) |
92 | | simpll 764 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝜑) |
93 | | simprl 768 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑢 ∈ 𝐻) |
94 | | simplrl 774 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑔 ∈ 𝑋) |
95 | 7, 10, 4, 17, 57, 16, 58 | sylow2blem1 19225 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝜑 ∧ 𝑢 ∈ 𝐻 ∧ 𝑔 ∈ 𝑋) → (𝑢 · [𝑔] ∼ ) = [(𝑢 + 𝑔)] ∼ ) |
96 | 92, 93, 94, 95 | syl3anc 1370 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑢 · [𝑔] ∼ ) = [(𝑢 + 𝑔)] ∼ ) |
97 | 90, 91, 96 | 3eqtr3d 2786 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑧 = [(𝑢 + 𝑔)] ∼ ) |
98 | 89, 97 | eqtr3d 2780 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → [𝑔] ∼ = [(𝑢 + 𝑔)] ∼ ) |
99 | 25 | ad2antrr 723 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ∼ Er 𝑋) |
100 | 99, 94 | erth 8547 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑔 ∼ (𝑢 + 𝑔) ↔ [𝑔] ∼ = [(𝑢 + 𝑔)] ∼ )) |
101 | 98, 100 | mpbird 256 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑔 ∼ (𝑢 + 𝑔)) |
102 | 6 | ad2antrr 723 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝐺 ∈ Grp) |
103 | 36 | ad2antrr 723 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝐾 ⊆ 𝑋) |
104 | | eqid 2738 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(invg‘𝐺) = (invg‘𝐺) |
105 | 7, 104, 57, 16 | eqgval 18805 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐺 ∈ Grp ∧ 𝐾 ⊆ 𝑋) → (𝑔 ∼ (𝑢 + 𝑔) ↔ (𝑔 ∈ 𝑋 ∧ (𝑢 + 𝑔) ∈ 𝑋 ∧ (((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾))) |
106 | 102, 103,
105 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑔 ∼ (𝑢 + 𝑔) ↔ (𝑔 ∈ 𝑋 ∧ (𝑢 + 𝑔) ∈ 𝑋 ∧ (((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾))) |
107 | 101, 106 | mpbid 231 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑔 ∈ 𝑋 ∧ (𝑢 + 𝑔) ∈ 𝑋 ∧ (((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾)) |
108 | 107 | simp3d 1143 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾) |
109 | | oveq2 7283 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑥 =
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) → (𝑔 + 𝑥) = (𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)))) |
110 | 109 | oveq1d 7290 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 =
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) → ((𝑔 + 𝑥) − 𝑔) = ((𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) − 𝑔)) |
111 | | eqid 2738 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)) = (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)) |
112 | | ovex 7308 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) − 𝑔) ∈ V |
113 | 110, 111,
112 | fvmpt 6875 |
. . . . . . . . . . . . . . . 16
⊢
((((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾 → ((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))‘(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) = ((𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) − 𝑔)) |
114 | 108, 113 | syl 17 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))‘(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) = ((𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) − 𝑔)) |
115 | 7, 57, 31, 104 | grprinv 18629 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐺 ∈ Grp ∧ 𝑔 ∈ 𝑋) → (𝑔 +
((invg‘𝐺)‘𝑔)) = (0g‘𝐺)) |
116 | 102, 94, 115 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑔 +
((invg‘𝐺)‘𝑔)) = (0g‘𝐺)) |
117 | 116 | oveq1d 7290 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑔 +
((invg‘𝐺)‘𝑔)) + (𝑢 + 𝑔)) = ((0g‘𝐺) + (𝑢 + 𝑔))) |
118 | 7, 104 | grpinvcl 18627 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐺 ∈ Grp ∧ 𝑔 ∈ 𝑋) → ((invg‘𝐺)‘𝑔) ∈ 𝑋) |
119 | 102, 94, 118 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((invg‘𝐺)‘𝑔) ∈ 𝑋) |
120 | 64 | ad2antrr 723 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝐻 ⊆ 𝑋) |
121 | 120, 93 | sseldd 3922 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑢 ∈ 𝑋) |
122 | 7, 57 | grpcl 18585 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐺 ∈ Grp ∧ 𝑢 ∈ 𝑋 ∧ 𝑔 ∈ 𝑋) → (𝑢 + 𝑔) ∈ 𝑋) |
123 | 102, 121,
94, 122 | syl3anc 1370 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑢 + 𝑔) ∈ 𝑋) |
124 | 7, 57 | grpass 18586 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐺 ∈ Grp ∧ (𝑔 ∈ 𝑋 ∧ ((invg‘𝐺)‘𝑔) ∈ 𝑋 ∧ (𝑢 + 𝑔) ∈ 𝑋)) → ((𝑔 +
((invg‘𝐺)‘𝑔)) + (𝑢 + 𝑔)) = (𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)))) |
125 | 102, 94, 119, 123, 124 | syl13anc 1371 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑔 +
((invg‘𝐺)‘𝑔)) + (𝑢 + 𝑔)) = (𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)))) |
126 | 7, 57, 31 | grplid 18609 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐺 ∈ Grp ∧ (𝑢 + 𝑔) ∈ 𝑋) → ((0g‘𝐺) + (𝑢 + 𝑔)) = (𝑢 + 𝑔)) |
127 | 102, 123,
126 | syl2anc 584 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((0g‘𝐺) + (𝑢 + 𝑔)) = (𝑢 + 𝑔)) |
128 | 117, 125,
127 | 3eqtr3d 2786 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → (𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) = (𝑢 + 𝑔)) |
129 | 128 | oveq1d 7290 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑔 +
(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) − 𝑔) = ((𝑢 + 𝑔) − 𝑔)) |
130 | | sylow2blem3.d |
. . . . . . . . . . . . . . . . 17
⊢ − =
(-g‘𝐺) |
131 | 7, 57, 130 | grppncan 18666 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐺 ∈ Grp ∧ 𝑢 ∈ 𝑋 ∧ 𝑔 ∈ 𝑋) → ((𝑢 + 𝑔) − 𝑔) = 𝑢) |
132 | 102, 121,
94, 131 | syl3anc 1370 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑢 + 𝑔) − 𝑔) = 𝑢) |
133 | 114, 129,
132 | 3eqtrd 2782 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))‘(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) = 𝑢) |
134 | | ovex 7308 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑔 + 𝑥) − 𝑔) ∈ V |
135 | 134, 111 | fnmpti 6576 |
. . . . . . . . . . . . . . 15
⊢ (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)) Fn 𝐾 |
136 | | fnfvelrn 6958 |
. . . . . . . . . . . . . . 15
⊢ (((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)) Fn 𝐾 ∧ (((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔)) ∈ 𝐾) → ((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))‘(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
137 | 135, 108,
136 | sylancr 587 |
. . . . . . . . . . . . . 14
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → ((𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))‘(((invg‘𝐺)‘𝑔) + (𝑢 + 𝑔))) ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
138 | 133, 137 | eqeltrrd 2840 |
. . . . . . . . . . . . 13
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ (𝑢 ∈ 𝐻 ∧ (𝑢 · 𝑧) = 𝑧)) → 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
139 | 138 | expr 457 |
. . . . . . . . . . . 12
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧ 𝑢 ∈ 𝐻) → ((𝑢 · 𝑧) = 𝑧 → 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)))) |
140 | 139 | ralimdva 3108 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) →
(∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 → ∀𝑢 ∈ 𝐻 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)))) |
141 | 140 | imp 407 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) ∧
∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) → ∀𝑢 ∈ 𝐻 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
142 | 141 | an32s 649 |
. . . . . . . . 9
⊢ (((𝜑 ∧ ∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) →
∀𝑢 ∈ 𝐻 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
143 | | dfss3 3909 |
. . . . . . . . 9
⊢ (𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)) ↔ ∀𝑢 ∈ 𝐻 𝑢 ∈ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
144 | 142, 143 | sylibr 233 |
. . . . . . . 8
⊢ (((𝜑 ∧ ∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) ∧ (𝑔 ∈ 𝑋 ∧ 𝑧 = [𝑔] ∼ )) → 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |
145 | 144 | expr 457 |
. . . . . . 7
⊢ (((𝜑 ∧ ∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) ∧ 𝑔 ∈ 𝑋) → (𝑧 = [𝑔] ∼ → 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)))) |
146 | 145 | reximdva 3203 |
. . . . . 6
⊢ ((𝜑 ∧ ∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧) → (∃𝑔 ∈ 𝑋 𝑧 = [𝑔] ∼ → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)))) |
147 | 146 | ex 413 |
. . . . 5
⊢ (𝜑 → (∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 → (∃𝑔 ∈ 𝑋 𝑧 = [𝑔] ∼ → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))))) |
148 | 147 | com23 86 |
. . . 4
⊢ (𝜑 → (∃𝑔 ∈ 𝑋 𝑧 = [𝑔] ∼ →
(∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))))) |
149 | 88, 148 | syl5bi 241 |
. . 3
⊢ (𝜑 → (𝑧 ∈ (𝑋 / ∼ ) →
(∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))))) |
150 | 149 | rexlimdv 3212 |
. 2
⊢ (𝜑 → (∃𝑧 ∈ (𝑋 / ∼ )∀𝑢 ∈ 𝐻 (𝑢 · 𝑧) = 𝑧 → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔)))) |
151 | 86, 150 | mpd 15 |
1
⊢ (𝜑 → ∃𝑔 ∈ 𝑋 𝐻 ⊆ ran (𝑥 ∈ 𝐾 ↦ ((𝑔 + 𝑥) − 𝑔))) |