Theorem lsssubg 21265

Description: All subspaces are subgroups. (Contributed by Stefan O'Rear, 11-Dec-2014.)

Hypothesis

Ref	Expression
lsssubg.s	⊢ 𝑆 = (LSubSp‘𝑊)

Assertion

Ref	Expression
lsssubg	⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (SubGrp‘𝑊))

Proof of Theorem lsssubg

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqid 2763	. . . 4 ⊢ (Base‘𝑊) = (Base‘𝑊)
2		lsssubg.s	. . . 4 ⊢ 𝑆 = (LSubSp‘𝑊)
3	1, 2	lssss 21244	. . 3 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ⊆ (Base‘𝑊))
4	3	adantl 487	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → 𝑈 ⊆ (Base‘𝑊))
5	2	lssn0 21248	. . 3 ⊢ (𝑈 ∈ 𝑆 → 𝑈 ≠ ∅)
6	5	adantl 487	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → 𝑈 ≠ ∅)
7		eqid 2763	. . . . . . 7 ⊢ (+g‘𝑊) = (+g‘𝑊)
8	7, 2	lssvacl 21251	. . . . . 6 ⊢ (((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) ∧ (𝑥 ∈ 𝑈 ∧ 𝑦 ∈ 𝑈)) → (𝑥(+g‘𝑊)𝑦) ∈ 𝑈)
9	8	anassrs 473	. . . . 5 ⊢ ((((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) ∧ 𝑥 ∈ 𝑈) ∧ 𝑦 ∈ 𝑈) → (𝑥(+g‘𝑊)𝑦) ∈ 𝑈)
10	9	ralrimiva 3158	. . . 4 ⊢ (((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) ∧ 𝑥 ∈ 𝑈) → ∀𝑦 ∈ 𝑈 (𝑥(+g‘𝑊)𝑦) ∈ 𝑈)
11		eqid 2763	. . . . . 6 ⊢ (invg‘𝑊) = (invg‘𝑊)
12	2, 11	lssvnegcl 21264	. . . . 5 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆 ∧ 𝑥 ∈ 𝑈) → ((invg‘𝑊)‘𝑥) ∈ 𝑈)
13	12	3expa 1136	. . . 4 ⊢ (((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) ∧ 𝑥 ∈ 𝑈) → ((invg‘𝑊)‘𝑥) ∈ 𝑈)
14	10, 13	jca 521	. . 3 ⊢ (((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) ∧ 𝑥 ∈ 𝑈) → (∀𝑦 ∈ 𝑈 (𝑥(+g‘𝑊)𝑦) ∈ 𝑈 ∧ ((invg‘𝑊)‘𝑥) ∈ 𝑈))
15	14	ralrimiva 3158	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → ∀𝑥 ∈ 𝑈 (∀𝑦 ∈ 𝑈 (𝑥(+g‘𝑊)𝑦) ∈ 𝑈 ∧ ((invg‘𝑊)‘𝑥) ∈ 𝑈))
16		lmodgrp 21175	. . . 4 ⊢ (𝑊 ∈ LMod → 𝑊 ∈ Grp)
17	16	adantr 486	. . 3 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → 𝑊 ∈ Grp)
18	1, 7, 11	issubg2 19384	. . 3 ⊢ (𝑊 ∈ Grp → (𝑈 ∈ (SubGrp‘𝑊) ↔ (𝑈 ⊆ (Base‘𝑊) ∧ 𝑈 ≠ ∅ ∧ ∀𝑥 ∈ 𝑈 (∀𝑦 ∈ 𝑈 (𝑥(+g‘𝑊)𝑦) ∈ 𝑈 ∧ ((invg‘𝑊)‘𝑥) ∈ 𝑈))))
19	17, 18	syl 18	. 2 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → (𝑈 ∈ (SubGrp‘𝑊) ↔ (𝑈 ⊆ (Base‘𝑊) ∧ 𝑈 ≠ ∅ ∧ ∀𝑥 ∈ 𝑈 (∀𝑦 ∈ 𝑈 (𝑥(+g‘𝑊)𝑦) ∈ 𝑈 ∧ ((invg‘𝑊)‘𝑥) ∈ 𝑈))))
20	4, 6, 15, 19	mpbir3and 1361	1 ⊢ ((𝑊 ∈ LMod ∧ 𝑈 ∈ 𝑆) → 𝑈 ∈ (SubGrp‘𝑊))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ≠ wne 2959  ∀wral 3080   ⊆ wss 3900  ∅c0 4281  ‘cfv 6561  (class class class)co 7446  Basecbs 17419  +_gcplusg 17460  Grpcgrp 19176  inv_gcminusg 19177  SubGrpcsubg 19362  LModclmod 21168  LSubSpclss 21239

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-sep 5253  ax-nul 5264  ax-pow 5332  ax-pr 5396  ax-un 7778  ax-cnex 11286  ax-resscn 11287  ax-1cn 11288  ax-icn 11289  ax-addcl 11290  ax-addrcl 11291  ax-mulcl 11292  ax-mulrcl 11293  ax-mulcom 11294  ax-addass 11295  ax-mulass 11296  ax-distr 11297  ax-i2m1 11298  ax-1ne0 11299  ax-1rid 11300  ax-rnegex 11301  ax-rrecex 11302  ax-cnre 11303  ax-pre-lttri 11304  ax-pre-lttrn 11305  ax-pre-ltadd 11306  ax-pre-mulgt0 11307

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5551  df-eprel 5556  df-po 5564  df-so 5565  df-fr 5609  df-we 5611  df-xp 5662  df-rel 5663  df-cnv 5664  df-co 5665  df-dm 5666  df-rn 5667  df-res 5668  df-ima 5669  df-pred 6325  df-ord 6386  df-on 6387  df-lim 6388  df-suc 6389  df-iota 6515  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-riota 7403  df-ov 7449  df-oprab 7450  df-mpo 7451  df-om 7905  df-1st 8028  df-2nd 8029  df-frecs 8330  df-wrecs 8361  df-recs 8410  df-rdg 8449  df-er 8748  df-en 9005  df-dom 9006  df-sdom 9007  df-pnf 11375  df-mnf 11376  df-xr 11377  df-ltxr 11378  df-le 11379  df-sub 11573  df-neg 11574  df-nn 12366  df-2 12435  df-sets 17374  df-slot 17392  df-ndx 17404  df-base 17420  df-ress 17441  df-plusg 17473  df-0g 17644  df-mgm 18848  df-sgrp 18940  df-mnd 18956  df-grp 19179  df-minusg 19180  df-sbg 19181  df-subg 19365  df-mgp 20394  df-ur 20441  df-ring 20494  df-lmod 21170  df-lss 21240

This theorem is used by:  lsssssubg  21266  islss3  21267  islss4  21270  lspsnsubg  21288  lmhmima  21355  lmhmpreima  21356  reslmhm  21360  reslmhm2  21361  reslmhm2b  21362  lsmcl  21391  lsmelval2  21393  phssip  21997  frlm0  22093  frlmsubgval  22104  frlmgsum  22111  frlmsslsp  22135  lssnlm  25053  cphsscph  25605  cmscsscms  25727  cssbn  25729  eqgvscpbl  33995  qusvscpbl  33996  quslmod  34003  quslmhm  34004  ply1degltdimlem  34337  lindsunlem  34339  lbsdiflsp0  34341  dimkerim  34342  qusdimsum  34343  islshpat  40277  lsatcv1  40308  dia2dimlem13  42336  dihvalcqat  42499  dihmeetlem16N  42582  dihmeetlem19N  42585  dochsat  42643  dihjat1lem  42688  dihjat1  42689  dvh3dimatN  42699  dvh2dimatN  42700  dochkrsm  42718  dochexmid  42728  mapdh6dN  42999  hdmap1l6d  43073  pwssplit4  44295  gsumlsscl  49707