Theorem rlmsca2 19521

Description: Scalars in the ring module. (Contributed by Stefan O'Rear, 1-Apr-2015.)

Assertion

Ref	Expression
rlmsca2	⊢ ( I ‘𝑅) = (Scalar‘(ringLMod‘𝑅))

Proof of Theorem rlmsca2

Step	Hyp	Ref	Expression
1		fvi 6479	. . . 4 ⊢ (𝑅 ∈ V → ( I ‘𝑅) = 𝑅)
2		eqid 2798	. . . . 5 ⊢ (Base‘𝑅) = (Base‘𝑅)
3	2	ressid 16257	. . . 4 ⊢ (𝑅 ∈ V → (𝑅 ↾s (Base‘𝑅)) = 𝑅)
4	1, 3	eqtr4d 2835	. . 3 ⊢ (𝑅 ∈ V → ( I ‘𝑅) = (𝑅 ↾s (Base‘𝑅)))
5		fvprc 6403	. . . 4 ⊢ (¬ 𝑅 ∈ V → ( I ‘𝑅) = ∅)
6		reldmress 16248	. . . . 5 ⊢ Rel dom ↾s
7	6	ovprc1 6915	. . . 4 ⊢ (¬ 𝑅 ∈ V → (𝑅 ↾s (Base‘𝑅)) = ∅)
8	5, 7	eqtr4d 2835	. . 3 ⊢ (¬ 𝑅 ∈ V → ( I ‘𝑅) = (𝑅 ↾s (Base‘𝑅)))
9	4, 8	pm2.61i 177	. 2 ⊢ ( I ‘𝑅) = (𝑅 ↾s (Base‘𝑅))
10		rlmval 19511	. . . . 5 ⊢ (ringLMod‘𝑅) = ((subringAlg ‘𝑅)‘(Base‘𝑅))
11	10	a1i 11	. . . 4 ⊢ (⊤ → (ringLMod‘𝑅) = ((subringAlg ‘𝑅)‘(Base‘𝑅)))
12		ssidd 3819	. . . 4 ⊢ (⊤ → (Base‘𝑅) ⊆ (Base‘𝑅))
13	11, 12	srasca 19501	. . 3 ⊢ (⊤ → (𝑅 ↾s (Base‘𝑅)) = (Scalar‘(ringLMod‘𝑅)))
14	13	mptru 1661	. 2 ⊢ (𝑅 ↾s (Base‘𝑅)) = (Scalar‘(ringLMod‘𝑅))
15	9, 14	eqtri 2820	1 ⊢ ( I ‘𝑅) = (Scalar‘(ringLMod‘𝑅))

Syntax hints:  ¬ wn 3   = wceq 1653  ⊤wtru 1654   ∈ wcel 2157  Vcvv 3384  ∅c0 4114   I cid 5218  ‘cfv 6100  (class class class)co 6877  Basecbs 16181   ↾_s cress 16182  Scalarcsca 16267  subringAlg csra 19488  ringLModcrglmod 19489

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1891  ax-4 1905  ax-5 2006  ax-6 2072  ax-7 2107  ax-8 2159  ax-9 2166  ax-10 2185  ax-11 2200  ax-12 2213  ax-13 2377  ax-ext 2776  ax-rep 4963  ax-sep 4974  ax-nul 4982  ax-pow 5034  ax-pr 5096  ax-un 7182  ax-cnex 10279  ax-resscn 10280  ax-1cn 10281  ax-icn 10282  ax-addcl 10283  ax-addrcl 10284  ax-mulcl 10285  ax-mulrcl 10286  ax-mulcom 10287  ax-addass 10288  ax-mulass 10289  ax-distr 10290  ax-i2m1 10291  ax-1ne0 10292  ax-1rid 10293  ax-rnegex 10294  ax-rrecex 10295  ax-cnre 10296  ax-pre-lttri 10297  ax-pre-lttrn 10298  ax-pre-ltadd 10299  ax-pre-mulgt0 10300

This theorem depends on definitions:  df-bi 199  df-an 386  df-or 875  df-3or 1109  df-3an 1110  df-tru 1657  df-ex 1876  df-nf 1880  df-sb 2065  df-mo 2591  df-eu 2609  df-clab 2785  df-cleq 2791  df-clel 2794  df-nfc 2929  df-ne 2971  df-nel 3074  df-ral 3093  df-rex 3094  df-reu 3095  df-rab 3097  df-v 3386  df-sbc 3633  df-csb 3728  df-dif 3771  df-un 3773  df-in 3775  df-ss 3782  df-pss 3784  df-nul 4115  df-if 4277  df-pw 4350  df-sn 4368  df-pr 4370  df-tp 4372  df-op 4374  df-uni 4628  df-iun 4711  df-br 4843  df-opab 4905  df-mpt 4922  df-tr 4945  df-id 5219  df-eprel 5224  df-po 5232  df-so 5233  df-fr 5270  df-we 5272  df-xp 5317  df-rel 5318  df-cnv 5319  df-co 5320  df-dm 5321  df-rn 5322  df-res 5323  df-ima 5324  df-pred 5897  df-ord 5943  df-on 5944  df-lim 5945  df-suc 5946  df-iota 6063  df-fun 6102  df-fn 6103  df-f 6104  df-f1 6105  df-fo 6106  df-f1o 6107  df-fv 6108  df-riota 6838  df-ov 6880  df-oprab 6881  df-mpt2 6882  df-om 7299  df-wrecs 7644  df-recs 7706  df-rdg 7744  df-er 7981  df-en 8195  df-dom 8196  df-sdom 8197  df-pnf 10364  df-mnf 10365  df-xr 10366  df-ltxr 10367  df-le 10368  df-sub 10557  df-neg 10558  df-nn 11312  df-2 11373  df-3 11374  df-4 11375  df-5 11376  df-6 11377  df-7 11378  df-8 11379  df-ndx 16184  df-slot 16185  df-sets 16188  df-ress 16189  df-sca 16280  df-vsca 16281  df-ip 16282  df-sra 19492  df-rgmod 19493

This theorem is referenced by:  rlmscaf  19528  islidl  19531  lidlrsppropd  19550  rspsn  19574  nrgtrg  22819