Proof of Theorem mdegldg
Step | Hyp | Ref
| Expression |
1 | | mdegval.d |
. . . . 5
⊢ 𝐷 = (𝐼 mDeg 𝑅) |
2 | | mdegval.p |
. . . . 5
⊢ 𝑃 = (𝐼 mPoly 𝑅) |
3 | | mdegval.b |
. . . . 5
⊢ 𝐵 = (Base‘𝑃) |
4 | | mdegval.z |
. . . . 5
⊢ 0 =
(0g‘𝑅) |
5 | | mdegval.a |
. . . . 5
⊢ 𝐴 = {𝑚 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑚 “ ℕ) ∈
Fin} |
6 | | mdegval.h |
. . . . 5
⊢ 𝐻 = (ℎ ∈ 𝐴 ↦ (ℂfld
Σg ℎ)) |
7 | 1, 2, 3, 4, 5, 6 | mdegval 25226 |
. . . 4
⊢ (𝐹 ∈ 𝐵 → (𝐷‘𝐹) = sup((𝐻 “ (𝐹 supp 0 )), ℝ*,
< )) |
8 | 7 | 3ad2ant2 1133 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐷‘𝐹) = sup((𝐻 “ (𝐹 supp 0 )), ℝ*,
< )) |
9 | 5, 6 | tdeglem1 25218 |
. . . . . . 7
⊢ 𝐻:𝐴⟶ℕ0 |
10 | 9 | a1i 11 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐻:𝐴⟶ℕ0) |
11 | 10 | ffund 6602 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → Fun 𝐻) |
12 | | simp2 1136 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹 ∈ 𝐵) |
13 | | simp1 1135 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝑅 ∈ Ring) |
14 | 2, 3, 4, 12, 13 | mplelsfi 21199 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹 finSupp 0 ) |
15 | 14 | fsuppimpd 9113 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐹 supp 0 ) ∈
Fin) |
16 | | imafi 8940 |
. . . . 5
⊢ ((Fun
𝐻 ∧ (𝐹 supp 0 ) ∈ Fin) →
(𝐻 “ (𝐹 supp 0 )) ∈
Fin) |
17 | 11, 15, 16 | syl2anc 584 |
. . . 4
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐻 “ (𝐹 supp 0 )) ∈
Fin) |
18 | | simp3 1137 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹 ≠ 𝑌) |
19 | | mdegldg.y |
. . . . . . . 8
⊢ 𝑌 = (0g‘𝑃) |
20 | 2, 3 | mplrcl 21198 |
. . . . . . . . 9
⊢ (𝐹 ∈ 𝐵 → 𝐼 ∈ V) |
21 | 20 | 3ad2ant2 1133 |
. . . . . . . 8
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐼 ∈ V) |
22 | | ringgrp 19786 |
. . . . . . . . 9
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Grp) |
23 | 22 | 3ad2ant1 1132 |
. . . . . . . 8
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝑅 ∈ Grp) |
24 | 2, 5, 4, 19, 21, 23 | mpl0 21210 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝑌 = (𝐴 × { 0 })) |
25 | 18, 24 | neeqtrd 3015 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹 ≠ (𝐴 × { 0 })) |
26 | | eqid 2740 |
. . . . . . . . . 10
⊢
(Base‘𝑅) =
(Base‘𝑅) |
27 | 2, 26, 3, 5, 12 | mplelf 21202 |
. . . . . . . . 9
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹:𝐴⟶(Base‘𝑅)) |
28 | 27 | ffnd 6599 |
. . . . . . . 8
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐹 Fn 𝐴) |
29 | 4 | fvexi 6785 |
. . . . . . . 8
⊢ 0 ∈
V |
30 | | ovex 7304 |
. . . . . . . . . 10
⊢
(ℕ0 ↑m 𝐼) ∈ V |
31 | 5, 30 | rabex2 5262 |
. . . . . . . . 9
⊢ 𝐴 ∈ V |
32 | | fnsuppeq0 7999 |
. . . . . . . . 9
⊢ ((𝐹 Fn 𝐴 ∧ 𝐴 ∈ V ∧ 0 ∈ V) → ((𝐹 supp 0 ) = ∅ ↔ 𝐹 = (𝐴 × { 0 }))) |
33 | 31, 32 | mp3an2 1448 |
. . . . . . . 8
⊢ ((𝐹 Fn 𝐴 ∧ 0 ∈ V) → ((𝐹 supp 0 ) = ∅ ↔ 𝐹 = (𝐴 × { 0 }))) |
34 | 28, 29, 33 | sylancl 586 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐹 supp 0 ) = ∅ ↔ 𝐹 = (𝐴 × { 0 }))) |
35 | 34 | necon3bid 2990 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐹 supp 0 ) ≠ ∅ ↔
𝐹 ≠ (𝐴 × { 0 }))) |
36 | 25, 35 | mpbird 256 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐹 supp 0 ) ≠
∅) |
37 | 10 | ffnd 6599 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → 𝐻 Fn 𝐴) |
38 | | suppssdm 7984 |
. . . . . . . 8
⊢ (𝐹 supp 0 ) ⊆ dom 𝐹 |
39 | 38, 27 | fssdm 6618 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐹 supp 0 ) ⊆ 𝐴) |
40 | | fnimaeq0 6564 |
. . . . . . 7
⊢ ((𝐻 Fn 𝐴 ∧ (𝐹 supp 0 ) ⊆ 𝐴) → ((𝐻 “ (𝐹 supp 0 )) = ∅ ↔ (𝐹 supp 0 ) =
∅)) |
41 | 37, 39, 40 | syl2anc 584 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐻 “ (𝐹 supp 0 )) = ∅ ↔ (𝐹 supp 0 ) =
∅)) |
42 | 41 | necon3bid 2990 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐻 “ (𝐹 supp 0 )) ≠ ∅ ↔
(𝐹 supp 0 ) ≠
∅)) |
43 | 36, 42 | mpbird 256 |
. . . 4
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐻 “ (𝐹 supp 0 )) ≠
∅) |
44 | | imassrn 5979 |
. . . . . 6
⊢ (𝐻 “ (𝐹 supp 0 )) ⊆ ran 𝐻 |
45 | 10 | frnd 6606 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ran 𝐻 ⊆
ℕ0) |
46 | 44, 45 | sstrid 3937 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐻 “ (𝐹 supp 0 )) ⊆
ℕ0) |
47 | | nn0ssre 12237 |
. . . . . 6
⊢
ℕ0 ⊆ ℝ |
48 | | ressxr 11020 |
. . . . . 6
⊢ ℝ
⊆ ℝ* |
49 | 47, 48 | sstri 3935 |
. . . . 5
⊢
ℕ0 ⊆ ℝ* |
50 | 46, 49 | sstrdi 3938 |
. . . 4
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐻 “ (𝐹 supp 0 )) ⊆
ℝ*) |
51 | | xrltso 12874 |
. . . . 5
⊢ < Or
ℝ* |
52 | | fisupcl 9206 |
. . . . 5
⊢ (( <
Or ℝ* ∧ ((𝐻 “ (𝐹 supp 0 )) ∈ Fin ∧ (𝐻 “ (𝐹 supp 0 )) ≠ ∅ ∧
(𝐻 “ (𝐹 supp 0 )) ⊆
ℝ*)) → sup((𝐻 “ (𝐹 supp 0 )), ℝ*,
< ) ∈ (𝐻 “
(𝐹 supp 0 ))) |
53 | 51, 52 | mpan 687 |
. . . 4
⊢ (((𝐻 “ (𝐹 supp 0 )) ∈ Fin ∧ (𝐻 “ (𝐹 supp 0 )) ≠ ∅ ∧
(𝐻 “ (𝐹 supp 0 )) ⊆
ℝ*) → sup((𝐻 “ (𝐹 supp 0 )), ℝ*,
< ) ∈ (𝐻 “
(𝐹 supp 0 ))) |
54 | 17, 43, 50, 53 | syl3anc 1370 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → sup((𝐻 “ (𝐹 supp 0 )), ℝ*,
< ) ∈ (𝐻 “
(𝐹 supp 0 ))) |
55 | 8, 54 | eqeltrd 2841 |
. 2
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (𝐷‘𝐹) ∈ (𝐻 “ (𝐹 supp 0 ))) |
56 | 37, 39 | fvelimabd 6839 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐷‘𝐹) ∈ (𝐻 “ (𝐹 supp 0 )) ↔ ∃𝑥 ∈ (𝐹 supp 0 )(𝐻‘𝑥) = (𝐷‘𝐹))) |
57 | | rexsupp 7989 |
. . . . 5
⊢ ((𝐹 Fn 𝐴 ∧ 𝐴 ∈ V ∧ 0 ∈ V) →
(∃𝑥 ∈ (𝐹 supp 0 )(𝐻‘𝑥) = (𝐷‘𝐹) ↔ ∃𝑥 ∈ 𝐴 ((𝐹‘𝑥) ≠ 0 ∧ (𝐻‘𝑥) = (𝐷‘𝐹)))) |
58 | 31, 29, 57 | mp3an23 1452 |
. . . 4
⊢ (𝐹 Fn 𝐴 → (∃𝑥 ∈ (𝐹 supp 0 )(𝐻‘𝑥) = (𝐷‘𝐹) ↔ ∃𝑥 ∈ 𝐴 ((𝐹‘𝑥) ≠ 0 ∧ (𝐻‘𝑥) = (𝐷‘𝐹)))) |
59 | 28, 58 | syl 17 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → (∃𝑥 ∈ (𝐹 supp 0 )(𝐻‘𝑥) = (𝐷‘𝐹) ↔ ∃𝑥 ∈ 𝐴 ((𝐹‘𝑥) ≠ 0 ∧ (𝐻‘𝑥) = (𝐷‘𝐹)))) |
60 | 56, 59 | bitrd 278 |
. 2
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ((𝐷‘𝐹) ∈ (𝐻 “ (𝐹 supp 0 )) ↔ ∃𝑥 ∈ 𝐴 ((𝐹‘𝑥) ≠ 0 ∧ (𝐻‘𝑥) = (𝐷‘𝐹)))) |
61 | 55, 60 | mpbid 231 |
1
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐹 ≠ 𝑌) → ∃𝑥 ∈ 𝐴 ((𝐹‘𝑥) ≠ 0 ∧ (𝐻‘𝑥) = (𝐷‘𝐹))) |