| Step | Hyp | Ref
| Expression |
| 1 | | esplyfval1.v |
. . . . . . . . . . 11
⊢ 𝑉 = (𝐼 mVar 𝑅) |
| 2 | | eqid 2737 |
. . . . . . . . . . . 12
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} =
{ℎ ∈
(ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} |
| 3 | 2 | psrbasfsupp 33697 |
. . . . . . . . . . 11
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} =
{ℎ ∈
(ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} |
| 4 | | eqid 2737 |
. . . . . . . . . . 11
⊢
(0g‘𝑅) = (0g‘𝑅) |
| 5 | | eqid 2737 |
. . . . . . . . . . 11
⊢
(1r‘𝑅) = (1r‘𝑅) |
| 6 | | esplyfval1.i |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐼 ∈ Fin) |
| 7 | 6 | ad2antrr 727 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝐼 ∈
Fin) |
| 8 | | esplyfval1.r |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑅 ∈ Ring) |
| 9 | 8 | ad2antrr 727 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑅 ∈
Ring) |
| 10 | | simplr 769 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑖 ∈ 𝐼) |
| 11 | | simpr 484 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp
0}) |
| 12 | 1, 3, 4, 5, 7, 9, 10, 11 | mvrval2 21943 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 13 | 12 | ad4ant14 753 |
. . . . . . . . 9
⊢
(((((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ran 𝑓 ⊆ {0, 1}) ∧ (♯‘(𝑓 supp 0)) = 1) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 14 | 13 | an52ds 32530 |
. . . . . . . 8
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 15 | 14 | mpteq2dva 5192 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)) = (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)))) |
| 16 | 15 | oveq2d 7377 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))))) |
| 17 | | nfv 1916 |
. . . . . . . . . 10
⊢
Ⅎ𝑗((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) |
| 18 | | nfmpt1 5198 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑗(𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 19 | 18 | nfeq2 2917 |
. . . . . . . . . . 11
⊢
Ⅎ𝑗 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 20 | | nfv 1916 |
. . . . . . . . . . 11
⊢
Ⅎ𝑗 𝑖 = ∪
(𝑓 supp 0) |
| 21 | 19, 20 | nfbi 1905 |
. . . . . . . . . 10
⊢
Ⅎ𝑗(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0)) |
| 22 | | unisnv 4884 |
. . . . . . . . . . . . 13
⊢ ∪ {𝑗}
= 𝑗 |
| 23 | 22 | eqeq2i 2750 |
. . . . . . . . . . . 12
⊢ (𝑖 = ∪
{𝑗} ↔ 𝑖 = 𝑗) |
| 24 | 23 | a1i 11 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = ∪ {𝑗} ↔ 𝑖 = 𝑗)) |
| 25 | | simpr 484 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 supp 0) = {𝑗}) |
| 26 | 25 | unieqd 4877 |
. . . . . . . . . . . . 13
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) = ∪ {𝑗}) |
| 27 | 26 | adantllr 720 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) = ∪ {𝑗}) |
| 28 | 27 | eqeq2d 2748 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = ∪ (𝑓 supp 0) ↔ 𝑖 = ∪
{𝑗})) |
| 29 | | simplr 769 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → (𝑓 supp 0) = {𝑗}) |
| 30 | 29 | fveq2d 6839 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → ((𝟭‘𝐼)‘(𝑓 supp 0)) = ((𝟭‘𝐼)‘{𝑗})) |
| 31 | 6 | ad2antrr 727 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝐼 ∈
Fin) |
| 32 | 6 | adantr 480 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝐼 ∈
Fin) |
| 33 | | nn0ex 12412 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
ℕ0 ∈ V |
| 34 | 33 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
ℕ0 ∈ V) |
| 35 | | ssrab2 4033 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ⊆
(ℕ0 ↑m 𝐼) |
| 36 | 35 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝜑 → {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ⊆
(ℕ0 ↑m 𝐼)) |
| 37 | 36 | sselda 3934 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓 ∈
(ℕ0 ↑m 𝐼)) |
| 38 | 32, 34, 37 | elmaprd 32762 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓:𝐼⟶ℕ0) |
| 39 | 38 | adantr 480 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶ℕ0) |
| 40 | | ffrn 6676 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑓:𝐼⟶ℕ0 → 𝑓:𝐼⟶ran 𝑓) |
| 41 | 39, 40 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶ran 𝑓) |
| 42 | | simpr 484 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ ran 𝑓 ⊆ {0,
1}) |
| 43 | 41, 42 | fssd 6680 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶{0, 1}) |
| 44 | 31, 43 | indfsid 32954 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓 =
((𝟭‘𝐼)‘(𝑓 supp 0))) |
| 45 | 44 | ad5antr 735 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → 𝑓 = ((𝟭‘𝐼)‘(𝑓 supp 0))) |
| 46 | | sneq 4591 |
. . . . . . . . . . . . . . . 16
⊢ (𝑖 = 𝑗 → {𝑖} = {𝑗}) |
| 47 | 46 | adantl 481 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → {𝑖} = {𝑗}) |
| 48 | 47 | fveq2d 6839 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → ((𝟭‘𝐼)‘{𝑖}) = ((𝟭‘𝐼)‘{𝑗})) |
| 49 | 30, 45, 48 | 3eqtr4d 2782 |
. . . . . . . . . . . . 13
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 50 | | simpr 484 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 51 | 50 | oveq1d 7376 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (𝑓 supp 0) = (((𝟭‘𝐼)‘{𝑖}) supp 0)) |
| 52 | | simplr 769 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (𝑓 supp 0) = {𝑗}) |
| 53 | 6 | ad3antrrr 731 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → 𝐼 ∈
Fin) |
| 54 | 53 | ad4antr 733 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝐼 ∈ Fin) |
| 55 | | snssi 4765 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑖 ∈ 𝐼 → {𝑖} ⊆ 𝐼) |
| 56 | 55 | adantl 481 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → {𝑖} ⊆ 𝐼) |
| 57 | 56 | ad3antrrr 731 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → {𝑖} ⊆ 𝐼) |
| 58 | | indsupp 32952 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐼 ∈ Fin ∧ {𝑖} ⊆ 𝐼) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 59 | 54, 57, 58 | syl2anc 585 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 60 | 51, 52, 59 | 3eqtr3rd 2781 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → {𝑖} = {𝑗}) |
| 61 | | vex 3445 |
. . . . . . . . . . . . . . 15
⊢ 𝑖 ∈ V |
| 62 | 61 | sneqr 4797 |
. . . . . . . . . . . . . 14
⊢ ({𝑖} = {𝑗} → 𝑖 = 𝑗) |
| 63 | 60, 62 | syl 17 |
. . . . . . . . . . . . 13
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝑖 = 𝑗) |
| 64 | 49, 63 | impbida 801 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = 𝑗 ↔ 𝑓 = ((𝟭‘𝐼)‘{𝑖}))) |
| 65 | | indsn 32948 |
. . . . . . . . . . . . . . 15
⊢ ((𝐼 ∈ Fin ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 66 | 53, 65 | sylan 581 |
. . . . . . . . . . . . . 14
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 67 | 66 | ad2antrr 727 |
. . . . . . . . . . . . 13
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 68 | 67 | eqeq2d 2748 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = ((𝟭‘𝐼)‘{𝑖}) ↔ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)))) |
| 69 | 64, 68 | bitr2d 280 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = 𝑗)) |
| 70 | 24, 28, 69 | 3bitr4rd 312 |
. . . . . . . . . 10
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0))) |
| 71 | | ovexd 7396 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑓 supp 0)
∈ V) |
| 72 | | simpr 484 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (♯‘(𝑓 supp 0)) = 1) |
| 73 | | hash1snb 14347 |
. . . . . . . . . . . . . 14
⊢ ((𝑓 supp 0) ∈ V →
((♯‘(𝑓 supp 0))
= 1 ↔ ∃𝑗(𝑓 supp 0) = {𝑗})) |
| 74 | 73 | biimpa 476 |
. . . . . . . . . . . . 13
⊢ (((𝑓 supp 0) ∈ V ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗(𝑓 supp 0) = {𝑗}) |
| 75 | 71, 72, 74 | syl2anc 585 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗(𝑓 supp 0) = {𝑗}) |
| 76 | | exsnrex 4638 |
. . . . . . . . . . . 12
⊢
(∃𝑗(𝑓 supp 0) = {𝑗} ↔ ∃𝑗 ∈ (𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 77 | 75, 76 | sylib 218 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗 ∈
(𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 78 | 77 | adantr 480 |
. . . . . . . . . 10
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ∃𝑗 ∈ (𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 79 | 17, 21, 70, 78 | r19.29af2 3245 |
. . . . . . . . 9
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0))) |
| 80 | 79 | ifbid 4504 |
. . . . . . . 8
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) |
| 81 | 80 | mpteq2dva 5192 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) = (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅)))) |
| 82 | 81 | oveq2d 7377 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))))) |
| 83 | | ringmnd 20183 |
. . . . . . . . 9
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Mnd) |
| 84 | 8, 83 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → 𝑅 ∈ Mnd) |
| 85 | 84 | ad3antrrr 731 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → 𝑅 ∈
Mnd) |
| 86 | | suppssdm 8122 |
. . . . . . . . . . . 12
⊢ (𝑓 supp 0) ⊆ dom 𝑓 |
| 87 | 38 | fdmd 6673 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
dom 𝑓 = 𝐼) |
| 88 | 87 | ad4antr 733 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → dom 𝑓 = 𝐼) |
| 89 | 86, 88 | sseqtrid 3977 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 supp 0) ⊆ 𝐼) |
| 90 | | simplr 769 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → 𝑗 ∈ (𝑓 supp 0)) |
| 91 | 89, 90 | sseldd 3935 |
. . . . . . . . . 10
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → 𝑗 ∈ 𝐼) |
| 92 | 22, 91 | eqeltrid 2841 |
. . . . . . . . 9
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ {𝑗} ∈ 𝐼) |
| 93 | 26, 92 | eqeltrd 2837 |
. . . . . . . 8
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) ∈ 𝐼) |
| 94 | 93, 77 | r19.29a 3145 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∪ (𝑓 supp 0) ∈ 𝐼) |
| 95 | | eqid 2737 |
. . . . . . 7
⊢ (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) =
(𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) |
| 96 | | eqid 2737 |
. . . . . . . . 9
⊢
(Base‘𝑅) =
(Base‘𝑅) |
| 97 | 96, 5, 8 | ringidcld 20206 |
. . . . . . . 8
⊢ (𝜑 → (1r‘𝑅) ∈ (Base‘𝑅)) |
| 98 | 97 | ad3antrrr 731 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (1r‘𝑅) ∈ (Base‘𝑅)) |
| 99 | 4, 85, 53, 94, 95, 98 | gsummptif1n0 19900 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))))
= (1r‘𝑅)) |
| 100 | 16, 82, 99 | 3eqtrrd 2777 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (1r‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 101 | 100 | anasss 466 |
. . . 4
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
(ran 𝑓 ⊆ {0, 1} ∧
(♯‘(𝑓 supp 0))
= 1)) → (1r‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 102 | 84 | ad2antrr 727 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ 𝑅 ∈
Mnd) |
| 103 | 6 | ad2antrr 727 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ 𝐼 ∈
Fin) |
| 104 | 4 | gsumz 18766 |
. . . . . . . 8
⊢ ((𝑅 ∈ Mnd ∧ 𝐼 ∈ Fin) → (𝑅 Σg
(𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 105 | 102, 103,
104 | syl2anc 585 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 106 | 12 | an32s 653 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 107 | 106 | adantlr 716 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 108 | | simpr 484 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 109 | 108 | rneqd 5888 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 = ran (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 110 | | nfv 1916 |
. . . . . . . . . . . . . . . 16
⊢
Ⅎ𝑗((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) |
| 111 | 110, 19 | nfan 1901 |
. . . . . . . . . . . . . . 15
⊢
Ⅎ𝑗(((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 112 | | eqid 2737 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 113 | | 1nn0 12422 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈
ℕ0 |
| 114 | | prid2g 4719 |
. . . . . . . . . . . . . . . . 17
⊢ (1 ∈
ℕ0 → 1 ∈ {0, 1}) |
| 115 | 113, 114 | mp1i 13 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → 1 ∈ {0, 1}) |
| 116 | | 0nn0 12421 |
. . . . . . . . . . . . . . . . 17
⊢ 0 ∈
ℕ0 |
| 117 | | prid1g 4718 |
. . . . . . . . . . . . . . . . 17
⊢ (0 ∈
ℕ0 → 0 ∈ {0, 1}) |
| 118 | 116, 117 | mp1i 13 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → 0 ∈ {0, 1}) |
| 119 | 115, 118 | ifcld 4527 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → if(𝑗 = 𝑖, 1, 0) ∈ {0, 1}) |
| 120 | 111, 112,
119 | rnmptssd 7071 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ⊆ {0, 1}) |
| 121 | 109, 120 | eqsstrd 3969 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 ⊆ {0, 1}) |
| 122 | 121 | adantllr 720 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 ⊆ {0, 1}) |
| 123 | | simpllr 776 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ¬ ran 𝑓 ⊆ {0, 1}) |
| 124 | 122, 123 | pm2.65da 817 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → ¬ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 125 | 124 | iffalsed 4491 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = (0g‘𝑅)) |
| 126 | 107, 125 | eqtr2d 2773 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) →
(0g‘𝑅) =
((𝑉‘𝑖)‘𝑓)) |
| 127 | 126 | mpteq2dva 5192 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑖 ∈ 𝐼 ↦
(0g‘𝑅)) =
(𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) |
| 128 | 127 | oveq2d 7377 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 129 | 105, 128 | eqtr3d 2774 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 130 | 129 | adantlr 716 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) ∧ ¬ ran 𝑓 ⊆ {0, 1}) →
(0g‘𝑅) =
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 131 | 84 | ad2antrr 727 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → 𝑅
∈ Mnd) |
| 132 | 6 | ad2antrr 727 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → 𝐼
∈ Fin) |
| 133 | 131, 132,
104 | syl2anc 585 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 134 | 106 | adantlr 716 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 135 | | simpr 484 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 136 | 6, 65 | sylan 581 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 137 | 136 | ad5ant14 758 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 138 | 135, 137 | eqtr4d 2775 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 139 | 138 | oveq1d 7376 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (𝑓 supp 0) = (((𝟭‘𝐼)‘{𝑖}) supp 0)) |
| 140 | 132 | ad2antrr 727 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝐼 ∈ Fin) |
| 141 | 55 | ad2antlr 728 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → {𝑖} ⊆ 𝐼) |
| 142 | 140, 141,
58 | syl2anc 585 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 143 | 139, 142 | eqtrd 2772 |
. . . . . . . . . . . . . 14
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (𝑓 supp 0) = {𝑖}) |
| 144 | 143 | fveq2d 6839 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘(𝑓 supp 0)) =
(♯‘{𝑖})) |
| 145 | | hashsng 14297 |
. . . . . . . . . . . . . 14
⊢ (𝑖 ∈ 𝐼 → (♯‘{𝑖}) = 1) |
| 146 | 145 | ad2antlr 728 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘{𝑖}) = 1) |
| 147 | 144, 146 | eqtrd 2772 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘(𝑓 supp 0)) = 1) |
| 148 | | simpllr 776 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ¬ (♯‘(𝑓 supp 0)) = 1) |
| 149 | 147, 148 | pm2.65da 817 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → ¬
𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 150 | 149 | iffalsed 4491 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = (0g‘𝑅)) |
| 151 | 134, 150 | eqtr2d 2773 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) →
(0g‘𝑅) =
((𝑉‘𝑖)‘𝑓)) |
| 152 | 151 | mpteq2dva 5192 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑖
∈ 𝐼 ↦
(0g‘𝑅)) =
(𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) |
| 153 | 152 | oveq2d 7377 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 154 | 133, 153 | eqtr3d 2774 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 155 | 154 | adantlr 716 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) ∧ ¬ (♯‘(𝑓 supp 0)) = 1) →
(0g‘𝑅) =
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 156 | | pm3.13 997 |
. . . . . 6
⊢ (¬
(ran 𝑓 ⊆ {0, 1} ∧
(♯‘(𝑓 supp 0))
= 1) → (¬ ran 𝑓
⊆ {0, 1} ∨ ¬ (♯‘(𝑓 supp 0)) = 1)) |
| 157 | 156 | adantl 481 |
. . . . 5
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) → (¬ ran 𝑓 ⊆ {0, 1} ∨ ¬
(♯‘(𝑓 supp 0))
= 1)) |
| 158 | 130, 155,
157 | mpjaodan 961 |
. . . 4
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) → (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 159 | 101, 158 | ifeqda 4517 |
. . 3
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 160 | 159 | mpteq2dva 5192 |
. 2
⊢ (𝜑 → (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅))) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))))) |
| 161 | | esplyfval1.e |
. . . 4
⊢ 𝐸 = (𝐼eSymPoly𝑅) |
| 162 | 161 | fveq1i 6836 |
. . 3
⊢ (𝐸‘1) = ((𝐼eSymPoly𝑅)‘1) |
| 163 | 113 | a1i 11 |
. . . 4
⊢ (𝜑 → 1 ∈
ℕ0) |
| 164 | 2, 6, 8, 163, 4, 5 | esplyfval3 33741 |
. . 3
⊢ (𝜑 → ((𝐼eSymPoly𝑅)‘1) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)))) |
| 165 | 162, 164 | eqtrid 2784 |
. 2
⊢ (𝜑 → (𝐸‘1) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)))) |
| 166 | | esplyfval1.w |
. . 3
⊢ 𝑊 = (𝐼 mPoly 𝑅) |
| 167 | | eqid 2737 |
. . 3
⊢
(Base‘𝑊) =
(Base‘𝑊) |
| 168 | 166, 1, 167, 6, 8 | mvrf2 21953 |
. . 3
⊢ (𝜑 → 𝑉:𝐼⟶(Base‘𝑊)) |
| 169 | 166, 167,
8, 6, 2, 6,
168 | mplgsum 33722 |
. 2
⊢ (𝜑 → (𝑊 Σg 𝑉) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))))) |
| 170 | 160, 165,
169 | 3eqtr4d 2782 |
1
⊢ (𝜑 → (𝐸‘1) = (𝑊 Σg 𝑉)) |