Theorem rlmval2 21226

Description: Value of the ring module extended. (Contributed by AV, 2-Dec-2018.) (Revised by Thierry Arnoux, 16-Jun-2019.)

Assertion

Ref	Expression
rlmval2	⊢ (𝑊 ∈ 𝑋 → (ringLMod‘𝑊) = (((𝑊 sSet ⟨(Scalar‘ndx), 𝑊⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩))

Proof of Theorem rlmval2

Step	Hyp	Ref	Expression
1		rlmval 21225	. . 3 ⊢ (ringLMod‘𝑊) = ((subringAlg ‘𝑊)‘(Base‘𝑊))
2	1	a1i 11	. 2 ⊢ (𝑊 ∈ 𝑋 → (ringLMod‘𝑊) = ((subringAlg ‘𝑊)‘(Base‘𝑊)))
3		ssid 4021	. . 3 ⊢ (Base‘𝑊) ⊆ (Base‘𝑊)
4		sraval 21201	. . 3 ⊢ ((𝑊 ∈ 𝑋 ∧ (Base‘𝑊) ⊆ (Base‘𝑊)) → ((subringAlg ‘𝑊)‘(Base‘𝑊)) = (((𝑊 sSet ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩))
5	3, 4	mpan2 691	. 2 ⊢ (𝑊 ∈ 𝑋 → ((subringAlg ‘𝑊)‘(Base‘𝑊)) = (((𝑊 sSet ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩))
6		eqid 2737	. . . . . . 7 ⊢ (Base‘𝑊) = (Base‘𝑊)
7	6	ressid 17299	. . . . . 6 ⊢ (𝑊 ∈ 𝑋 → (𝑊 ↾s (Base‘𝑊)) = 𝑊)
8	7	opeq2d 4888	. . . . 5 ⊢ (𝑊 ∈ 𝑋 → ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩ = ⟨(Scalar‘ndx), 𝑊⟩)
9	8	oveq2d 7454	. . . 4 ⊢ (𝑊 ∈ 𝑋 → (𝑊 sSet ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩) = (𝑊 sSet ⟨(Scalar‘ndx), 𝑊⟩))
10	9	oveq1d 7453	. . 3 ⊢ (𝑊 ∈ 𝑋 → ((𝑊 sSet ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) = ((𝑊 sSet ⟨(Scalar‘ndx), 𝑊⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩))
11	10	oveq1d 7453	. 2 ⊢ (𝑊 ∈ 𝑋 → (((𝑊 sSet ⟨(Scalar‘ndx), (𝑊 ↾s (Base‘𝑊))⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩) = (((𝑊 sSet ⟨(Scalar‘ndx), 𝑊⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩))
12	2, 5, 11	3eqtrd 2781	1 ⊢ (𝑊 ∈ 𝑋 → (ringLMod‘𝑊) = (((𝑊 sSet ⟨(Scalar‘ndx), 𝑊⟩) sSet ⟨( ·𝑠 ‘ndx), (.r‘𝑊)⟩) sSet ⟨(·𝑖‘ndx), (.r‘𝑊)⟩))

Syntax hints:   → wi 4   = wceq 1539   ∈ wcel 2108   ⊆ wss 3966  ⟨cop 4640  ‘cfv 6569  (class class class)co 7438   sSet csts 17206  ndxcnx 17236  Basecbs 17254   ↾_s cress 17283  ._rcmulr 17308  Scalarcsca 17310   ·_𝑠 cvsca 17311  ·_𝑖cip 17312  subringAlg csra 21197  ringLModcrglmod 21198

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-rep 5288  ax-sep 5305  ax-nul 5315  ax-pow 5374  ax-pr 5441

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-reu 3381  df-rab 3437  df-v 3483  df-sbc 3795  df-csb 3912  df-dif 3969  df-un 3971  df-in 3973  df-ss 3983  df-nul 4343  df-if 4535  df-pw 4610  df-sn 4635  df-pr 4637  df-op 4641  df-uni 4916  df-iun 5001  df-br 5152  df-opab 5214  df-mpt 5235  df-id 5587  df-xp 5699  df-rel 5700  df-cnv 5701  df-co 5702  df-dm 5703  df-rn 5704  df-res 5705  df-ima 5706  df-iota 6522  df-fun 6571  df-fn 6572  df-f 6573  df-f1 6574  df-fo 6575  df-f1o 6576  df-fv 6577  df-ov 7441  df-oprab 7442  df-mpo 7443  df-ress 17284  df-sra 21199  df-rgmod 21200

This theorem is referenced by: (None)