frlmlss - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > frlmlss		Structured version Visualization version GIF version

Theorem frlmlss 20894

Description: The base set of the free module is a subspace of the power module. (Contributed by Stefan O'Rear, 1-Feb-2015.)

**Hypotheses**
Ref	Expression
frlmval.f	⊢ 𝐹 = (𝑅 freeLMod 𝐼)
frlmpws.b	⊢ 𝐵 = (Base‘𝐹)
frlmlss.u	⊢ 𝑈 = (LSubSp‘((ringLMod‘𝑅) ↑_s 𝐼))

**Assertion**
Ref	Expression
frlmlss	⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝐵 ∈ 𝑈)

Proof of Theorem frlmlss Dummy variable 𝑖 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		frlmpws.b	. . 3 ⊢ 𝐵 = (Base‘𝐹)
2		frlmval.f	. . . . 5 ⊢ 𝐹 = (𝑅 freeLMod 𝐼)
3	2	frlmval 20891	. . . 4 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝐹 = (𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)})))
4	3	fveq2d 6673	. . 3 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (Base‘𝐹) = (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)}))))
5	1, 4	syl5eq 2868	. 2 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝐵 = (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)}))))
6		simpr 487	. . . 4 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝐼 ∈ 𝑊)
7		simpl 485	. . . 4 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝑅 ∈ Ring)
8		rlmlmod 19976	. . . . . 6 ⊢ (𝑅 ∈ Ring → (ringLMod‘𝑅) ∈ LMod)
9	8	adantr 483	. . . . 5 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (ringLMod‘𝑅) ∈ LMod)
10		fconst6g 6567	. . . . 5 ⊢ ((ringLMod‘𝑅) ∈ LMod → (𝐼 × {(ringLMod‘𝑅)}):𝐼⟶LMod)
11	9, 10	syl 17	. . . 4 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (𝐼 × {(ringLMod‘𝑅)}):𝐼⟶LMod)
12		fvex 6682	. . . . . . . 8 ⊢ (ringLMod‘𝑅) ∈ V
13	12	fvconst2 6965	. . . . . . 7 ⊢ (𝑖 ∈ 𝐼 → ((𝐼 × {(ringLMod‘𝑅)})‘𝑖) = (ringLMod‘𝑅))
14	13	adantl 484	. . . . . 6 ⊢ (((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) ∧ 𝑖 ∈ 𝐼) → ((𝐼 × {(ringLMod‘𝑅)})‘𝑖) = (ringLMod‘𝑅))
15	14	fveq2d 6673	. . . . 5 ⊢ (((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) ∧ 𝑖 ∈ 𝐼) → (Scalar‘((𝐼 × {(ringLMod‘𝑅)})‘𝑖)) = (Scalar‘(ringLMod‘𝑅)))
16		rlmsca 19971	. . . . . 6 ⊢ (𝑅 ∈ Ring → 𝑅 = (Scalar‘(ringLMod‘𝑅)))
17	16	ad2antrr 724	. . . . 5 ⊢ (((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) ∧ 𝑖 ∈ 𝐼) → 𝑅 = (Scalar‘(ringLMod‘𝑅)))
18	15, 17	eqtr4d 2859	. . . 4 ⊢ (((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) ∧ 𝑖 ∈ 𝐼) → (Scalar‘((𝐼 × {(ringLMod‘𝑅)})‘𝑖)) = 𝑅)
19		eqid 2821	. . . 4 ⊢ (𝑅X_s(𝐼 × {(ringLMod‘𝑅)})) = (𝑅X_s(𝐼 × {(ringLMod‘𝑅)}))
20		eqid 2821	. . . 4 ⊢ (LSubSp‘(𝑅X_s(𝐼 × {(ringLMod‘𝑅)}))) = (LSubSp‘(𝑅X_s(𝐼 × {(ringLMod‘𝑅)})))
21		eqid 2821	. . . 4 ⊢ (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)}))) = (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)})))
22	6, 7, 11, 18, 19, 20, 21	dsmmlss 20887	. . 3 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)}))) ∈ (LSubSp‘(𝑅X_s(𝐼 × {(ringLMod‘𝑅)}))))
23		eqid 2821	. . . . . . . . 9 ⊢ ((ringLMod‘𝑅) ↑_s 𝐼) = ((ringLMod‘𝑅) ↑_s 𝐼)
24		eqid 2821	. . . . . . . . 9 ⊢ (Scalar‘(ringLMod‘𝑅)) = (Scalar‘(ringLMod‘𝑅))
25	23, 24	pwsval 16758	. . . . . . . 8 ⊢ (((ringLMod‘𝑅) ∈ V ∧ 𝐼 ∈ 𝑊) → ((ringLMod‘𝑅) ↑_s 𝐼) = ((Scalar‘(ringLMod‘𝑅))X_s(𝐼 × {(ringLMod‘𝑅)})))
26	12, 25	mpan 688	. . . . . . 7 ⊢ (𝐼 ∈ 𝑊 → ((ringLMod‘𝑅) ↑_s 𝐼) = ((Scalar‘(ringLMod‘𝑅))X_s(𝐼 × {(ringLMod‘𝑅)})))
27	26	adantl 484	. . . . . 6 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → ((ringLMod‘𝑅) ↑_s 𝐼) = ((Scalar‘(ringLMod‘𝑅))X_s(𝐼 × {(ringLMod‘𝑅)})))
28	16	eqcomd 2827	. . . . . . . 8 ⊢ (𝑅 ∈ Ring → (Scalar‘(ringLMod‘𝑅)) = 𝑅)
29	28	adantr 483	. . . . . . 7 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (Scalar‘(ringLMod‘𝑅)) = 𝑅)
30	29	oveq1d 7170	. . . . . 6 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → ((Scalar‘(ringLMod‘𝑅))X_s(𝐼 × {(ringLMod‘𝑅)})) = (𝑅X_s(𝐼 × {(ringLMod‘𝑅)})))
31	27, 30	eqtr2d 2857	. . . . 5 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (𝑅X_s(𝐼 × {(ringLMod‘𝑅)})) = ((ringLMod‘𝑅) ↑_s 𝐼))
32	31	fveq2d 6673	. . . 4 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (LSubSp‘(𝑅X_s(𝐼 × {(ringLMod‘𝑅)}))) = (LSubSp‘((ringLMod‘𝑅) ↑_s 𝐼)))
33		frlmlss.u	. . . 4 ⊢ 𝑈 = (LSubSp‘((ringLMod‘𝑅) ↑_s 𝐼))
34	32, 33	syl6eqr 2874	. . 3 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (LSubSp‘(𝑅X_s(𝐼 × {(ringLMod‘𝑅)}))) = 𝑈)
35	22, 34	eleqtrd 2915	. 2 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → (Base‘(𝑅 ⊕_m (𝐼 × {(ringLMod‘𝑅)}))) ∈ 𝑈)
36	5, 35	eqeltrd 2913	1 ⊢ ((𝑅 ∈ Ring ∧ 𝐼 ∈ 𝑊) → 𝐵 ∈ 𝑈)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 398 = wceq 1533 ∈ wcel 2110 Vcvv 3494 {csn 4566 × cxp 5552 ⟶wf 6350 ‘cfv 6354 (class class class)co 7155 Basecbs 16482 Scalarcsca 16567 X_scprds 16718 ↑_s cpws 16719 Ringcrg 19296 LModclmod 19633 LSubSpclss 19702 ringLModcrglmod 19940 ⊕_m cdsmm 20874 freeLMod cfrlm 20889

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2157 ax-12 2173 ax-ext 2793 ax-rep 5189 ax-sep 5202 ax-nul 5209 ax-pow 5265 ax-pr 5329 ax-un 7460 ax-cnex 10592 ax-resscn 10593 ax-1cn 10594 ax-icn 10595 ax-addcl 10596 ax-addrcl 10597 ax-mulcl 10598 ax-mulrcl 10599 ax-mulcom 10600 ax-addass 10601 ax-mulass 10602 ax-distr 10603 ax-i2m1 10604 ax-1ne0 10605 ax-1rid 10606 ax-rnegex 10607 ax-rrecex 10608 ax-cnre 10609 ax-pre-lttri 10610 ax-pre-lttrn 10611 ax-pre-ltadd 10612 ax-pre-mulgt0 10613

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3772 df-csb 3883 df-dif 3938 df-un 3940 df-in 3942 df-ss 3951 df-pss 3953 df-nul 4291 df-if 4467 df-pw 4540 df-sn 4567 df-pr 4569 df-tp 4571 df-op 4573 df-uni 4838 df-int 4876 df-iun 4920 df-br 5066 df-opab 5128 df-mpt 5146 df-tr 5172 df-id 5459 df-eprel 5464 df-po 5473 df-so 5474 df-fr 5513 df-we 5515 df-xp 5560 df-rel 5561 df-cnv 5562 df-co 5563 df-dm 5564 df-rn 5565 df-res 5566 df-ima 5567 df-pred 6147 df-ord 6193 df-on 6194 df-lim 6195 df-suc 6196 df-iota 6313 df-fun 6356 df-fn 6357 df-f 6358 df-f1 6359 df-fo 6360 df-f1o 6361 df-fv 6362 df-riota 7113 df-ov 7158 df-oprab 7159 df-mpo 7160 df-om 7580 df-1st 7688 df-2nd 7689 df-wrecs 7946 df-recs 8007 df-rdg 8045 df-1o 8101 df-oadd 8105 df-er 8288 df-map 8407 df-ixp 8461 df-en 8509 df-dom 8510 df-sdom 8511 df-fin 8512 df-sup 8905 df-pnf 10676 df-mnf 10677 df-xr 10678 df-ltxr 10679 df-le 10680 df-sub 10871 df-neg 10872 df-nn 11638 df-2 11699 df-3 11700 df-4 11701 df-5 11702 df-6 11703 df-7 11704 df-8 11705 df-9 11706 df-n0 11897 df-z 11981 df-dec 12098 df-uz 12243 df-fz 12892 df-struct 16484 df-ndx 16485 df-slot 16486 df-base 16488 df-sets 16489 df-ress 16490 df-plusg 16577 df-mulr 16578 df-sca 16580 df-vsca 16581 df-ip 16582 df-tset 16583 df-ple 16584 df-ds 16586 df-hom 16588 df-cco 16589 df-0g 16714 df-prds 16720 df-pws 16722 df-mgm 17851 df-sgrp 17900 df-mnd 17911 df-grp 18105 df-minusg 18106 df-sbg 18107 df-subg 18275 df-mgp 19239 df-ur 19251 df-ring 19298 df-subrg 19532 df-lmod 19635 df-lss 19703 df-sra 19943 df-rgmod 19944 df-dsmm 20875 df-frlm 20890

This theorem is referenced by: frlm0 20897 frlmsubgval 20908 frlmgsum 20915 frlmsplit2 20916

W3C validator