| Step | Hyp | Ref
| Expression |
| 1 | | simpl 482 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑀 ∈ LMod) |
| 2 | | linccl.r |
. . . . . . . 8
⊢ 𝑅 =
(Base‘(Scalar‘𝑀)) |
| 3 | 2 | oveq1i 7424 |
. . . . . . 7
⊢ (𝑅 ↑m 𝑉) =
((Base‘(Scalar‘𝑀)) ↑m 𝑉) |
| 4 | 3 | eleq2i 2825 |
. . . . . 6
⊢ (𝑆 ∈ (𝑅 ↑m 𝑉) ↔ 𝑆 ∈ ((Base‘(Scalar‘𝑀)) ↑m 𝑉)) |
| 5 | 4 | biimpi 216 |
. . . . 5
⊢ (𝑆 ∈ (𝑅 ↑m 𝑉) → 𝑆 ∈ ((Base‘(Scalar‘𝑀)) ↑m 𝑉)) |
| 6 | 5 | 3ad2ant3 1135 |
. . . 4
⊢ ((𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → 𝑆 ∈ ((Base‘(Scalar‘𝑀)) ↑m 𝑉)) |
| 7 | 6 | adantl 481 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑆 ∈ ((Base‘(Scalar‘𝑀)) ↑m 𝑉)) |
| 8 | | linccl.b |
. . . . . . 7
⊢ 𝐵 = (Base‘𝑀) |
| 9 | 8 | sseq2i 3995 |
. . . . . 6
⊢ (𝑉 ⊆ 𝐵 ↔ 𝑉 ⊆ (Base‘𝑀)) |
| 10 | | fvex 6900 |
. . . . . . . . 9
⊢
(Base‘𝑀)
∈ V |
| 11 | 10 | ssex 5303 |
. . . . . . . 8
⊢ (𝑉 ⊆ (Base‘𝑀) → 𝑉 ∈ V) |
| 12 | | elpwg 4585 |
. . . . . . . 8
⊢ (𝑉 ∈ V → (𝑉 ∈ 𝒫
(Base‘𝑀) ↔ 𝑉 ⊆ (Base‘𝑀))) |
| 13 | 11, 12 | syl 17 |
. . . . . . 7
⊢ (𝑉 ⊆ (Base‘𝑀) → (𝑉 ∈ 𝒫 (Base‘𝑀) ↔ 𝑉 ⊆ (Base‘𝑀))) |
| 14 | 13 | ibir 268 |
. . . . . 6
⊢ (𝑉 ⊆ (Base‘𝑀) → 𝑉 ∈ 𝒫 (Base‘𝑀)) |
| 15 | 9, 14 | sylbi 217 |
. . . . 5
⊢ (𝑉 ⊆ 𝐵 → 𝑉 ∈ 𝒫 (Base‘𝑀)) |
| 16 | 15 | 3ad2ant2 1134 |
. . . 4
⊢ ((𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → 𝑉 ∈ 𝒫 (Base‘𝑀)) |
| 17 | 16 | adantl 481 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑉 ∈ 𝒫 (Base‘𝑀)) |
| 18 | | lincval 48272 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ 𝑆 ∈
((Base‘(Scalar‘𝑀)) ↑m 𝑉) ∧ 𝑉 ∈ 𝒫 (Base‘𝑀)) → (𝑆( linC ‘𝑀)𝑉) = (𝑀 Σg (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣)))) |
| 19 | 1, 7, 17, 18 | syl3anc 1372 |
. 2
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑆( linC ‘𝑀)𝑉) = (𝑀 Σg (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣)))) |
| 20 | | eqid 2734 |
. . 3
⊢
(0g‘𝑀) = (0g‘𝑀) |
| 21 | | lmodcmn 20881 |
. . . 4
⊢ (𝑀 ∈ LMod → 𝑀 ∈ CMnd) |
| 22 | 21 | adantr 480 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑀 ∈ CMnd) |
| 23 | | simpr1 1194 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑉 ∈ Fin) |
| 24 | 1 | adantr 480 |
. . . . 5
⊢ (((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) ∧ 𝑣 ∈ 𝑉) → 𝑀 ∈ LMod) |
| 25 | 2 | fvexi 6901 |
. . . . . . . . . . 11
⊢ 𝑅 ∈ V |
| 26 | | elmapg 8862 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ V ∧ 𝑉 ∈ Fin) → (𝑆 ∈ (𝑅 ↑m 𝑉) ↔ 𝑆:𝑉⟶𝑅)) |
| 27 | 25, 26 | mpan 690 |
. . . . . . . . . 10
⊢ (𝑉 ∈ Fin → (𝑆 ∈ (𝑅 ↑m 𝑉) ↔ 𝑆:𝑉⟶𝑅)) |
| 28 | | ffvelcdm 7082 |
. . . . . . . . . . 11
⊢ ((𝑆:𝑉⟶𝑅 ∧ 𝑣 ∈ 𝑉) → (𝑆‘𝑣) ∈ 𝑅) |
| 29 | 28 | ex 412 |
. . . . . . . . . 10
⊢ (𝑆:𝑉⟶𝑅 → (𝑣 ∈ 𝑉 → (𝑆‘𝑣) ∈ 𝑅)) |
| 30 | 27, 29 | biimtrdi 253 |
. . . . . . . . 9
⊢ (𝑉 ∈ Fin → (𝑆 ∈ (𝑅 ↑m 𝑉) → (𝑣 ∈ 𝑉 → (𝑆‘𝑣) ∈ 𝑅))) |
| 31 | 30 | imp 406 |
. . . . . . . 8
⊢ ((𝑉 ∈ Fin ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → (𝑣 ∈ 𝑉 → (𝑆‘𝑣) ∈ 𝑅)) |
| 32 | 31 | 3adant2 1131 |
. . . . . . 7
⊢ ((𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → (𝑣 ∈ 𝑉 → (𝑆‘𝑣) ∈ 𝑅)) |
| 33 | 32 | adantl 481 |
. . . . . 6
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑣 ∈ 𝑉 → (𝑆‘𝑣) ∈ 𝑅)) |
| 34 | 33 | imp 406 |
. . . . 5
⊢ (((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) ∧ 𝑣 ∈ 𝑉) → (𝑆‘𝑣) ∈ 𝑅) |
| 35 | | ssel 3959 |
. . . . . . . 8
⊢ (𝑉 ⊆ 𝐵 → (𝑣 ∈ 𝑉 → 𝑣 ∈ 𝐵)) |
| 36 | 35 | 3ad2ant2 1134 |
. . . . . . 7
⊢ ((𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → (𝑣 ∈ 𝑉 → 𝑣 ∈ 𝐵)) |
| 37 | 36 | adantl 481 |
. . . . . 6
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑣 ∈ 𝑉 → 𝑣 ∈ 𝐵)) |
| 38 | 37 | imp 406 |
. . . . 5
⊢ (((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) ∧ 𝑣 ∈ 𝑉) → 𝑣 ∈ 𝐵) |
| 39 | | eqid 2734 |
. . . . . 6
⊢
(Scalar‘𝑀) =
(Scalar‘𝑀) |
| 40 | | eqid 2734 |
. . . . . 6
⊢ (
·𝑠 ‘𝑀) = ( ·𝑠
‘𝑀) |
| 41 | 8, 39, 40, 2 | lmodvscl 20849 |
. . . . 5
⊢ ((𝑀 ∈ LMod ∧ (𝑆‘𝑣) ∈ 𝑅 ∧ 𝑣 ∈ 𝐵) → ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣) ∈ 𝐵) |
| 42 | 24, 34, 38, 41 | syl3anc 1372 |
. . . 4
⊢ (((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) ∧ 𝑣 ∈ 𝑉) → ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣) ∈ 𝐵) |
| 43 | 42 | fmpttd 7116 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣)):𝑉⟶𝐵) |
| 44 | 16 | anim2i 617 |
. . . 4
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑀 ∈ LMod ∧ 𝑉 ∈ 𝒫 (Base‘𝑀))) |
| 45 | | simpr3 1196 |
. . . 4
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑆 ∈ (𝑅 ↑m 𝑉)) |
| 46 | | elmapi 8872 |
. . . . . . 7
⊢ (𝑆 ∈ (𝑅 ↑m 𝑉) → 𝑆:𝑉⟶𝑅) |
| 47 | 46 | 3ad2ant3 1135 |
. . . . . 6
⊢ ((𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉)) → 𝑆:𝑉⟶𝑅) |
| 48 | 47 | adantl 481 |
. . . . 5
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑆:𝑉⟶𝑅) |
| 49 | | fvexd 6902 |
. . . . 5
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) →
(0g‘(Scalar‘𝑀)) ∈ V) |
| 50 | 48, 23, 49 | fdmfifsupp 9398 |
. . . 4
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → 𝑆 finSupp
(0g‘(Scalar‘𝑀))) |
| 51 | 39, 2 | scmfsupp 48237 |
. . . 4
⊢ (((𝑀 ∈ LMod ∧ 𝑉 ∈ 𝒫
(Base‘𝑀)) ∧ 𝑆 ∈ (𝑅 ↑m 𝑉) ∧ 𝑆 finSupp
(0g‘(Scalar‘𝑀))) → (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣)) finSupp (0g‘𝑀)) |
| 52 | 44, 45, 50, 51 | syl3anc 1372 |
. . 3
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣)) finSupp (0g‘𝑀)) |
| 53 | 8, 20, 22, 23, 43, 52 | gsumcl 19906 |
. 2
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑀 Σg (𝑣 ∈ 𝑉 ↦ ((𝑆‘𝑣)( ·𝑠
‘𝑀)𝑣))) ∈ 𝐵) |
| 54 | 19, 53 | eqeltrd 2833 |
1
⊢ ((𝑀 ∈ LMod ∧ (𝑉 ∈ Fin ∧ 𝑉 ⊆ 𝐵 ∧ 𝑆 ∈ (𝑅 ↑m 𝑉))) → (𝑆( linC ‘𝑀)𝑉) ∈ 𝐵) |