| Step | Hyp | Ref
| Expression |
| 1 | | esplyfval1.v |
. . . . . . . . . . 11
⊢ 𝑉 = (𝐼 mVar 𝑅) |
| 2 | | eqid 2762 |
. . . . . . . . . . . 12
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} =
{ℎ ∈
(ℕ0 ↑m 𝐼) ∣ ℎ finSupp 0} |
| 3 | 2 | psrbasfsupp 34008 |
. . . . . . . . . . 11
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} =
{ℎ ∈
(ℕ0 ↑m 𝐼) ∣ (◡ℎ “ ℕ) ∈ Fin} |
| 4 | | eqid 2762 |
. . . . . . . . . . 11
⊢
(0g‘𝑅) = (0g‘𝑅) |
| 5 | | eqid 2762 |
. . . . . . . . . . 11
⊢
(1r‘𝑅) = (1r‘𝑅) |
| 6 | | esplyfval1.i |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝐼 ∈ Fin) |
| 7 | 6 | ad2antrr 739 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝐼 ∈
Fin) |
| 8 | | esplyfval1.r |
. . . . . . . . . . . 12
⊢ (𝜑 → 𝑅 ∈ Ring) |
| 9 | 8 | ad2antrr 739 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑅 ∈
Ring) |
| 10 | | simplr 781 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑖 ∈ 𝐼) |
| 11 | | simpr 490 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp
0}) |
| 12 | 1, 3, 4, 5, 7, 9, 10, 11 | mvrval2 22198 |
. . . . . . . . . 10
⊢ (((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 13 | 12 | ad4ant14 765 |
. . . . . . . . 9
⊢
(((((𝜑 ∧ 𝑖 ∈ 𝐼) ∧ ran 𝑓 ⊆ {0, 1}) ∧ (♯‘(𝑓 supp 0)) = 1) ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 14 | 13 | an52ds 32917 |
. . . . . . . 8
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 15 | 14 | mpteq2dva 5202 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)) = (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)))) |
| 16 | 15 | oveq2d 7432 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))))) |
| 17 | | nfv 1947 |
. . . . . . . . . 10
⊢
Ⅎ𝑗((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) |
| 18 | | nfmpt1 5208 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑗(𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 19 | 18 | nfeq2 2941 |
. . . . . . . . . . 11
⊢
Ⅎ𝑗 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 20 | | nfv 1947 |
. . . . . . . . . . 11
⊢
Ⅎ𝑗 𝑖 = ∪
(𝑓 supp 0) |
| 21 | 19, 20 | nfbi 1936 |
. . . . . . . . . 10
⊢
Ⅎ𝑗(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0)) |
| 22 | | unisnv 4890 |
. . . . . . . . . . . . 13
⊢ ∪ {𝑗}
= 𝑗 |
| 23 | 22 | eqeq2i 2775 |
. . . . . . . . . . . 12
⊢ (𝑖 = ∪
{𝑗} ↔ 𝑖 = 𝑗) |
| 24 | 23 | a1i 11 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = ∪ {𝑗} ↔ 𝑖 = 𝑗)) |
| 25 | | simpr 490 |
. . . . . . . . . . . . . 14
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 supp 0) = {𝑗}) |
| 26 | 25 | unieqd 4883 |
. . . . . . . . . . . . 13
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) = ∪ {𝑗}) |
| 27 | 26 | adantllr 732 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) = ∪ {𝑗}) |
| 28 | 27 | eqeq2d 2773 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = ∪ (𝑓 supp 0) ↔ 𝑖 = ∪
{𝑗})) |
| 29 | | simplr 781 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → (𝑓 supp 0) = {𝑗}) |
| 30 | 29 | fveq2d 6886 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → ((𝟭‘𝐼)‘(𝑓 supp 0)) = ((𝟭‘𝐼)‘{𝑗})) |
| 31 | 6 | ad2antrr 739 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝐼 ∈
Fin) |
| 32 | | ssrab2 4031 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ⊆
(ℕ0 ↑m 𝐼) |
| 33 | 32 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝜑 → {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ⊆
(ℕ0 ↑m 𝐼)) |
| 34 | 33 | sselda 3934 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓 ∈
(ℕ0 ↑m 𝐼)) |
| 35 | 34 | elmaprd 8852 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
𝑓:𝐼⟶ℕ0) |
| 36 | 35 | adantr 486 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶ℕ0) |
| 37 | | ffrn 6720 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑓:𝐼⟶ℕ0 → 𝑓:𝐼⟶ran 𝑓) |
| 38 | 36, 37 | syl 18 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶ran 𝑓) |
| 39 | | simpr 490 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ ran 𝑓 ⊆ {0,
1}) |
| 40 | 38, 39 | fssd 6724 |
. . . . . . . . . . . . . . . 16
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓:𝐼⟶{0, 1}) |
| 41 | 31, 40 | indfsid 33302 |
. . . . . . . . . . . . . . 15
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1})
→ 𝑓 =
((𝟭‘𝐼)‘(𝑓 supp 0))) |
| 42 | 41 | ad5antr 747 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → 𝑓 = ((𝟭‘𝐼)‘(𝑓 supp 0))) |
| 43 | | sneq 4597 |
. . . . . . . . . . . . . . . 16
⊢ (𝑖 = 𝑗 → {𝑖} = {𝑗}) |
| 44 | 43 | adantl 487 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → {𝑖} = {𝑗}) |
| 45 | 44 | fveq2d 6886 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → ((𝟭‘𝐼)‘{𝑖}) = ((𝟭‘𝐼)‘{𝑗})) |
| 46 | 30, 42, 45 | 3eqtr4d 2807 |
. . . . . . . . . . . . 13
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑖 = 𝑗) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 47 | | simpr 490 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 48 | 47 | oveq1d 7431 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (𝑓 supp 0) = (((𝟭‘𝐼)‘{𝑖}) supp 0)) |
| 49 | | simplr 781 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (𝑓 supp 0) = {𝑗}) |
| 50 | 6 | ad3antrrr 743 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → 𝐼 ∈
Fin) |
| 51 | 50 | ad4antr 745 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝐼 ∈ Fin) |
| 52 | | snssi 4749 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑖 ∈ 𝐼 → {𝑖} ⊆ 𝐼) |
| 53 | 52 | adantl 487 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → {𝑖} ⊆ 𝐼) |
| 54 | 53 | ad3antrrr 743 |
. . . . . . . . . . . . . . . 16
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → {𝑖} ⊆ 𝐼) |
| 55 | | indsupp 33300 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐼 ∈ Fin ∧ {𝑖} ⊆ 𝐼) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 56 | 51, 54, 55 | syl2anc 596 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 57 | 48, 49, 56 | 3eqtr3rd 2806 |
. . . . . . . . . . . . . 14
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → {𝑖} = {𝑗}) |
| 58 | | vex 3457 |
. . . . . . . . . . . . . . 15
⊢ 𝑖 ∈ V |
| 59 | 58 | sneqr 4803 |
. . . . . . . . . . . . . 14
⊢ ({𝑖} = {𝑗} → 𝑖 = 𝑗) |
| 60 | 57, 59 | syl 18 |
. . . . . . . . . . . . 13
⊢
((((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) ∧ 𝑓 = ((𝟭‘𝐼)‘{𝑖})) → 𝑖 = 𝑗) |
| 61 | 46, 60 | impbida 813 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑖 = 𝑗 ↔ 𝑓 = ((𝟭‘𝐼)‘{𝑖}))) |
| 62 | | indsn 33296 |
. . . . . . . . . . . . . . 15
⊢ ((𝐼 ∈ Fin ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 63 | 50, 62 | sylan 592 |
. . . . . . . . . . . . . 14
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 64 | 63 | ad2antrr 739 |
. . . . . . . . . . . . 13
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 65 | 64 | eqeq2d 2773 |
. . . . . . . . . . . 12
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = ((𝟭‘𝐼)‘{𝑖}) ↔ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)))) |
| 66 | 61, 65 | bitr2d 283 |
. . . . . . . . . . 11
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = 𝑗)) |
| 67 | 24, 28, 66 | 3bitr4rd 315 |
. . . . . . . . . 10
⊢
(((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0))) |
| 68 | | ovexd 7451 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑓 supp 0)
∈ V) |
| 69 | | simpr 490 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (♯‘(𝑓 supp 0)) = 1) |
| 70 | | hash1snb 14486 |
. . . . . . . . . . . . . 14
⊢ ((𝑓 supp 0) ∈ V →
((♯‘(𝑓 supp 0))
= 1 ↔ ∃𝑗(𝑓 supp 0) = {𝑗})) |
| 71 | 70 | biimpa 482 |
. . . . . . . . . . . . 13
⊢ (((𝑓 supp 0) ∈ V ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗(𝑓 supp 0) = {𝑗}) |
| 72 | 68, 69, 71 | syl2anc 596 |
. . . . . . . . . . . 12
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗(𝑓 supp 0) = {𝑗}) |
| 73 | | exsnrex 4644 |
. . . . . . . . . . . 12
⊢
(∃𝑗(𝑓 supp 0) = {𝑗} ↔ ∃𝑗 ∈ (𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 74 | 72, 73 | sylib 221 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∃𝑗 ∈
(𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 75 | 74 | adantr 486 |
. . . . . . . . . 10
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → ∃𝑗 ∈ (𝑓 supp 0)(𝑓 supp 0) = {𝑗}) |
| 76 | 17, 21, 67, 75 | r19.29af2 3272 |
. . . . . . . . 9
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → (𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ↔ 𝑖 = ∪ (𝑓 supp 0))) |
| 77 | 76 | ifbid 4509 |
. . . . . . . 8
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑖 ∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) |
| 78 | 77 | mpteq2dva 5202 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) = (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅)))) |
| 79 | 78 | oveq2d 7432 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))))) |
| 80 | | ringmnd 20383 |
. . . . . . . . 9
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Mnd) |
| 81 | 8, 80 | syl 18 |
. . . . . . . 8
⊢ (𝜑 → 𝑅 ∈ Mnd) |
| 82 | 81 | ad3antrrr 743 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → 𝑅 ∈
Mnd) |
| 83 | | suppssdm 8178 |
. . . . . . . . . . . 12
⊢ (𝑓 supp 0) ⊆ dom 𝑓 |
| 84 | 35 | fdmd 6717 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
dom 𝑓 = 𝐼) |
| 85 | 84 | ad4antr 745 |
. . . . . . . . . . . 12
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → dom 𝑓 = 𝐼) |
| 86 | 83, 85 | sseqtrid 3976 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → (𝑓 supp 0) ⊆ 𝐼) |
| 87 | | simplr 781 |
. . . . . . . . . . 11
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → 𝑗 ∈ (𝑓 supp 0)) |
| 88 | 86, 87 | sseldd 3935 |
. . . . . . . . . 10
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → 𝑗 ∈ 𝐼) |
| 89 | 22, 88 | eqeltrid 2866 |
. . . . . . . . 9
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ {𝑗} ∈ 𝐼) |
| 90 | 26, 89 | eqeltrd 2862 |
. . . . . . . 8
⊢
((((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) ∧ 𝑗 ∈ (𝑓 supp 0)) ∧ (𝑓 supp 0) = {𝑗}) → ∪ (𝑓 supp 0) ∈ 𝐼) |
| 91 | 90, 74 | r19.29a 3172 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → ∪ (𝑓 supp 0) ∈ 𝐼) |
| 92 | | eqid 2762 |
. . . . . . 7
⊢ (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) =
(𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))) |
| 93 | | eqid 2762 |
. . . . . . . . 9
⊢
(Base‘𝑅) =
(Base‘𝑅) |
| 94 | 93, 5, 8 | ringidcld 20408 |
. . . . . . . 8
⊢ (𝜑 → (1r‘𝑅) ∈ (Base‘𝑅)) |
| 95 | 94 | ad3antrrr 743 |
. . . . . . 7
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (1r‘𝑅) ∈ (Base‘𝑅)) |
| 96 | 4, 82, 50, 91, 92, 95 | gsummptif1n0 20094 |
. . . . . 6
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ if(𝑖 = ∪ (𝑓 supp 0),
(1r‘𝑅),
(0g‘𝑅))))
= (1r‘𝑅)) |
| 97 | 16, 79, 96 | 3eqtrrd 2802 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
ran 𝑓 ⊆ {0, 1}) ∧
(♯‘(𝑓 supp 0))
= 1) → (1r‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 98 | 97 | anasss 472 |
. . . 4
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
(ran 𝑓 ⊆ {0, 1} ∧
(♯‘(𝑓 supp 0))
= 1)) → (1r‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 99 | 81 | ad2antrr 739 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ 𝑅 ∈
Mnd) |
| 100 | 6 | ad2antrr 739 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ 𝐼 ∈
Fin) |
| 101 | 4 | gsumz 18946 |
. . . . . . . 8
⊢ ((𝑅 ∈ Mnd ∧ 𝐼 ∈ Fin) → (𝑅 Σg
(𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 102 | 99, 100, 101 | syl2anc 596 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 103 | 12 | an32s 665 |
. . . . . . . . . . 11
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 104 | 103 | adantlr 728 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 105 | | simpr 490 |
. . . . . . . . . . . . . . 15
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 106 | 105 | rneqd 5926 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 = ran (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 107 | | nfv 1947 |
. . . . . . . . . . . . . . . 16
⊢
Ⅎ𝑗((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) |
| 108 | 107, 19 | nfan 1932 |
. . . . . . . . . . . . . . 15
⊢
Ⅎ𝑗(((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 109 | | eqid 2762 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) |
| 110 | | 1nn0 12547 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈
ℕ0 |
| 111 | | prid2g 4725 |
. . . . . . . . . . . . . . . . 17
⊢ (1 ∈
ℕ0 → 1 ∈ {0, 1}) |
| 112 | 110, 111 | mp1i 14 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → 1 ∈ {0, 1}) |
| 113 | | 0nn0 12546 |
. . . . . . . . . . . . . . . . 17
⊢ 0 ∈
ℕ0 |
| 114 | | prid1g 4724 |
. . . . . . . . . . . . . . . . 17
⊢ (0 ∈
ℕ0 → 0 ∈ {0, 1}) |
| 115 | 113, 114 | mp1i 14 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → 0 ∈ {0, 1}) |
| 116 | 112, 115 | ifcld 4532 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) ∧ 𝑗 ∈ 𝐼) → if(𝑗 = 𝑖, 1, 0) ∈ {0, 1}) |
| 117 | 108, 109,
116 | rnmptssd 7120 |
. . . . . . . . . . . . . 14
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)) ⊆ {0, 1}) |
| 118 | 106, 117 | eqsstrd 3968 |
. . . . . . . . . . . . 13
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 ⊆ {0, 1}) |
| 119 | 118 | adantllr 732 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ran 𝑓 ⊆ {0, 1}) |
| 120 | | simpllr 788 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ¬ ran 𝑓 ⊆ {0, 1}) |
| 121 | 119, 120 | pm2.65da 829 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → ¬ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 122 | 121 | iffalsed 4496 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = (0g‘𝑅)) |
| 123 | 104, 122 | eqtr2d 2798 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
∧ 𝑖 ∈ 𝐼) →
(0g‘𝑅) =
((𝑉‘𝑖)‘𝑓)) |
| 124 | 123 | mpteq2dva 5202 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑖 ∈ 𝐼 ↦
(0g‘𝑅)) =
(𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) |
| 125 | 124 | oveq2d 7432 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 126 | 102, 125 | eqtr3d 2799 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ ran 𝑓 ⊆ {0, 1})
→ (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 127 | 126 | adantlr 728 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) ∧ ¬ ran 𝑓 ⊆ {0, 1}) →
(0g‘𝑅) =
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 128 | 81 | ad2antrr 739 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → 𝑅
∈ Mnd) |
| 129 | 6 | ad2antrr 739 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → 𝐼
∈ Fin) |
| 130 | 128, 129,
101 | syl2anc 596 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (0g‘𝑅)) |
| 131 | 103 | adantlr 728 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → ((𝑉‘𝑖)‘𝑓) = if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅))) |
| 132 | | simpr 490 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 133 | 6, 62 | sylan 592 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝜑 ∧ 𝑖 ∈ 𝐼) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 134 | 133 | ad5ant14 770 |
. . . . . . . . . . . . . . . . 17
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ((𝟭‘𝐼)‘{𝑖}) = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 135 | 132, 134 | eqtr4d 2800 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝑓 = ((𝟭‘𝐼)‘{𝑖})) |
| 136 | 135 | oveq1d 7431 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (𝑓 supp 0) = (((𝟭‘𝐼)‘{𝑖}) supp 0)) |
| 137 | 129 | ad2antrr 739 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → 𝐼 ∈ Fin) |
| 138 | 52 | ad2antlr 740 |
. . . . . . . . . . . . . . . 16
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → {𝑖} ⊆ 𝐼) |
| 139 | 137, 138,
55 | syl2anc 596 |
. . . . . . . . . . . . . . 15
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (((𝟭‘𝐼)‘{𝑖}) supp 0) = {𝑖}) |
| 140 | 136, 139 | eqtrd 2797 |
. . . . . . . . . . . . . 14
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (𝑓 supp 0) = {𝑖}) |
| 141 | 140 | fveq2d 6886 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘(𝑓 supp 0)) =
(♯‘{𝑖})) |
| 142 | | hashsng 14435 |
. . . . . . . . . . . . . 14
⊢ (𝑖 ∈ 𝐼 → (♯‘{𝑖}) = 1) |
| 143 | 142 | ad2antlr 740 |
. . . . . . . . . . . . 13
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘{𝑖}) = 1) |
| 144 | 141, 143 | eqtrd 2797 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → (♯‘(𝑓 supp 0)) = 1) |
| 145 | | simpllr 788 |
. . . . . . . . . . . 12
⊢
(((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) ∧ 𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) → ¬ (♯‘(𝑓 supp 0)) = 1) |
| 146 | 144, 145 | pm2.65da 829 |
. . . . . . . . . . 11
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → ¬
𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0))) |
| 147 | 146 | iffalsed 4496 |
. . . . . . . . . 10
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) → if(𝑓 = (𝑗 ∈ 𝐼 ↦ if(𝑗 = 𝑖, 1, 0)), (1r‘𝑅), (0g‘𝑅)) = (0g‘𝑅)) |
| 148 | 131, 147 | eqtr2d 2798 |
. . . . . . . . 9
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) ∧ 𝑖
∈ 𝐼) →
(0g‘𝑅) =
((𝑉‘𝑖)‘𝑓)) |
| 149 | 148 | mpteq2dva 5202 |
. . . . . . . 8
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑖
∈ 𝐼 ↦
(0g‘𝑅)) =
(𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))) |
| 150 | 149 | oveq2d 7432 |
. . . . . . 7
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (𝑅
Σg (𝑖 ∈ 𝐼 ↦ (0g‘𝑅))) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 151 | 130, 150 | eqtr3d 2799 |
. . . . . 6
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (♯‘(𝑓
supp 0)) = 1) → (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 152 | 151 | adantlr 728 |
. . . . 5
⊢ ((((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) ∧ ¬ (♯‘(𝑓 supp 0)) = 1) →
(0g‘𝑅) =
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 153 | | pm3.13 1010 |
. . . . . 6
⊢ (¬
(ran 𝑓 ⊆ {0, 1} ∧
(♯‘(𝑓 supp 0))
= 1) → (¬ ran 𝑓
⊆ {0, 1} ∨ ¬ (♯‘(𝑓 supp 0)) = 1)) |
| 154 | 153 | adantl 487 |
. . . . 5
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) → (¬ ran 𝑓 ⊆ {0, 1} ∨ ¬
(♯‘(𝑓 supp 0))
= 1)) |
| 155 | 127, 152,
154 | mpjaodan 973 |
. . . 4
⊢ (((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) ∧
¬ (ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1)) → (0g‘𝑅) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 156 | 98, 155 | ifeqda 4522 |
. . 3
⊢ ((𝜑 ∧ 𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0}) →
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)) = (𝑅 Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓)))) |
| 157 | 156 | mpteq2dva 5202 |
. 2
⊢ (𝜑 → (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅))) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))))) |
| 158 | | esplyfval1.e |
. . . 4
⊢ 𝐸 = (𝐼eSymPoly𝑅) |
| 159 | 158 | fveq1i 6883 |
. . 3
⊢ (𝐸‘1) = ((𝐼eSymPoly𝑅)‘1) |
| 160 | 110 | a1i 11 |
. . . 4
⊢ (𝜑 → 1 ∈
ℕ0) |
| 161 | 2, 6, 8, 160, 4, 5 | esplyfval3 34069 |
. . 3
⊢ (𝜑 → ((𝐼eSymPoly𝑅)‘1) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)))) |
| 162 | 159, 161 | eqtrid 2809 |
. 2
⊢ (𝜑 → (𝐸‘1) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
if((ran 𝑓 ⊆ {0, 1}
∧ (♯‘(𝑓
supp 0)) = 1), (1r‘𝑅), (0g‘𝑅)))) |
| 163 | | esplyfval1.w |
. . 3
⊢ 𝑊 = (𝐼 mPoly 𝑅) |
| 164 | | eqid 2762 |
. . 3
⊢
(Base‘𝑊) =
(Base‘𝑊) |
| 165 | 163, 1, 164, 6, 8 | mvrf2 22208 |
. . 3
⊢ (𝜑 → 𝑉:𝐼⟶(Base‘𝑊)) |
| 166 | 163, 164,
8, 6, 2, 6,
165 | mplgsum 34050 |
. 2
⊢ (𝜑 → (𝑊 Σg 𝑉) = (𝑓 ∈ {ℎ ∈ (ℕ0
↑m 𝐼)
∣ ℎ finSupp 0} ↦
(𝑅
Σg (𝑖 ∈ 𝐼 ↦ ((𝑉‘𝑖)‘𝑓))))) |
| 167 | 157, 162,
166 | 3eqtr4d 2807 |
1
⊢ (𝜑 → (𝐸‘1) = (𝑊 Σg 𝑉)) |