Theorem lincresunitlem1 45874

Description: Lemma 1 for properties of a specially modified restriction of a linear combination containing a unit as scalar. (Contributed by AV, 18-May-2019.)

Hypotheses

Ref	Expression
lincresunit.b	⊢ 𝐵 = (Base‘𝑀)
lincresunit.r	⊢ 𝑅 = (Scalar‘𝑀)
lincresunit.e	⊢ 𝐸 = (Base‘𝑅)
lincresunit.u	⊢ 𝑈 = (Unit‘𝑅)
lincresunit.0	⊢ 0 = (0g‘𝑅)
lincresunit.z	⊢ 𝑍 = (0g‘𝑀)
lincresunit.n	⊢ 𝑁 = (invg‘𝑅)
lincresunit.i	⊢ 𝐼 = (invr‘𝑅)
lincresunit.t	⊢ · = (.r‘𝑅)
lincresunit.g	⊢ 𝐺 = (𝑠 ∈ (𝑆 ∖ {𝑋}) ↦ ((𝐼‘(𝑁‘(𝐹‘𝑋))) · (𝐹‘𝑠)))

Assertion

Ref	Expression
lincresunitlem1	⊢ (((𝑆 ∈ 𝒫 𝐵 ∧ 𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑆) ∧ (𝐹 ∈ (𝐸 ↑m 𝑆) ∧ (𝐹‘𝑋) ∈ 𝑈)) → (𝐼‘(𝑁‘(𝐹‘𝑋))) ∈ 𝐸)

Proof of Theorem lincresunitlem1

Step	Hyp	Ref	Expression
1		lincresunit.r	. . . . 5 ⊢ 𝑅 = (Scalar‘𝑀)
2	1	lmodring 20176	. . . 4 ⊢ (𝑀 ∈ LMod → 𝑅 ∈ Ring)
3	2	3ad2ant2 1134	. . 3 ⊢ ((𝑆 ∈ 𝒫 𝐵 ∧ 𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑆) → 𝑅 ∈ Ring)
4	3	adantr 482	. 2 ⊢ (((𝑆 ∈ 𝒫 𝐵 ∧ 𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑆) ∧ (𝐹 ∈ (𝐸 ↑m 𝑆) ∧ (𝐹‘𝑋) ∈ 𝑈)) → 𝑅 ∈ Ring)
5		simpr 486	. . 3 ⊢ ((𝐹 ∈ (𝐸 ↑m 𝑆) ∧ (𝐹‘𝑋) ∈ 𝑈) → (𝐹‘𝑋) ∈ 𝑈)
6		lincresunit.u	. . . 4 ⊢ 𝑈 = (Unit‘𝑅)
7		lincresunit.n	. . . 4 ⊢ 𝑁 = (invg‘𝑅)
8	6, 7	unitnegcl 19968	. . 3 ⊢ ((𝑅 ∈ Ring ∧ (𝐹‘𝑋) ∈ 𝑈) → (𝑁‘(𝐹‘𝑋)) ∈ 𝑈)
9	3, 5, 8	syl2an 597	. 2 ⊢ (((𝑆 ∈ 𝒫 𝐵 ∧ 𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑆) ∧ (𝐹 ∈ (𝐸 ↑m 𝑆) ∧ (𝐹‘𝑋) ∈ 𝑈)) → (𝑁‘(𝐹‘𝑋)) ∈ 𝑈)
10		lincresunit.i	. . 3 ⊢ 𝐼 = (invr‘𝑅)
11		lincresunit.e	. . 3 ⊢ 𝐸 = (Base‘𝑅)
12	6, 10, 11	ringinvcl 19963	. 2 ⊢ ((𝑅 ∈ Ring ∧ (𝑁‘(𝐹‘𝑋)) ∈ 𝑈) → (𝐼‘(𝑁‘(𝐹‘𝑋))) ∈ 𝐸)
13	4, 9, 12	syl2anc 585	1 ⊢ (((𝑆 ∈ 𝒫 𝐵 ∧ 𝑀 ∈ LMod ∧ 𝑋 ∈ 𝑆) ∧ (𝐹 ∈ (𝐸 ↑m 𝑆) ∧ (𝐹‘𝑋) ∈ 𝑈)) → (𝐼‘(𝑁‘(𝐹‘𝑋))) ∈ 𝐸)

Syntax hints:   → wi 4   ∧ wa 397   ∧ w3a 1087   = wceq 1539   ∈ wcel 2104   ∖ cdif 3889  𝒫 cpw 4539  {csn 4565   ↦ cmpt 5164  ‘cfv 6458  (class class class)co 7307   ↑_m cmap 8646  Basecbs 16957  ._rcmulr 17008  Scalarcsca 17010  0_gc0g 17195  inv_gcminusg 18623  Ringcrg 19828  Unitcui 19926  inv_rcinvr 19958  LModclmod 20168

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2707  ax-rep 5218  ax-sep 5232  ax-nul 5239  ax-pow 5297  ax-pr 5361  ax-un 7620  ax-cnex 10973  ax-resscn 10974  ax-1cn 10975  ax-icn 10976  ax-addcl 10977  ax-addrcl 10978  ax-mulcl 10979  ax-mulrcl 10980  ax-mulcom 10981  ax-addass 10982  ax-mulass 10983  ax-distr 10984  ax-i2m1 10985  ax-1ne0 10986  ax-1rid 10987  ax-rnegex 10988  ax-rrecex 10989  ax-cnre 10990  ax-pre-lttri 10991  ax-pre-lttrn 10992  ax-pre-ltadd 10993  ax-pre-mulgt0 10994

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 846  df-3or 1088  df-3an 1089  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3285  df-reu 3286  df-rab 3287  df-v 3439  df-sbc 3722  df-csb 3838  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-pss 3911  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4566  df-pr 4568  df-op 4572  df-uni 4845  df-iun 4933  df-br 5082  df-opab 5144  df-mpt 5165  df-tr 5199  df-id 5500  df-eprel 5506  df-po 5514  df-so 5515  df-fr 5555  df-we 5557  df-xp 5606  df-rel 5607  df-cnv 5608  df-co 5609  df-dm 5610  df-rn 5611  df-res 5612  df-ima 5613  df-pred 6217  df-ord 6284  df-on 6285  df-lim 6286  df-suc 6287  df-iota 6410  df-fun 6460  df-fn 6461  df-f 6462  df-f1 6463  df-fo 6464  df-f1o 6465  df-fv 6466  df-riota 7264  df-ov 7310  df-oprab 7311  df-mpo 7312  df-om 7745  df-2nd 7864  df-tpos 8073  df-frecs 8128  df-wrecs 8159  df-recs 8233  df-rdg 8272  df-er 8529  df-en 8765  df-dom 8766  df-sdom 8767  df-pnf 11057  df-mnf 11058  df-xr 11059  df-ltxr 11060  df-le 11061  df-sub 11253  df-neg 11254  df-nn 12020  df-2 12082  df-3 12083  df-sets 16910  df-slot 16928  df-ndx 16940  df-base 16958  df-ress 16987  df-plusg 17020  df-mulr 17021  df-0g 17197  df-mgm 18371  df-sgrp 18420  df-mnd 18431  df-grp 18625  df-minusg 18626  df-mgp 19766  df-ur 19783  df-ring 19830  df-oppr 19907  df-dvdsr 19928  df-unit 19929  df-invr 19959  df-lmod 20170

This theorem is referenced by:  lincresunitlem2  45875  lincresunit2  45877