Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  lcfrlem6 Structured version   Visualization version   GIF version

Theorem lcfrlem6 41585
Description: Lemma for lcfr 41623. Closure of vector sum with colinear vectors. TODO: Move down 𝑁 definition so top hypotheses can be shared. (Contributed by NM, 10-Mar-2015.)
Hypotheses
Ref Expression
lcfrlem6.h 𝐻 = (LHyp‘𝐾)
lcfrlem6.o = ((ocH‘𝐾)‘𝑊)
lcfrlem6.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
lcfrlem6.p + = (+g𝑈)
lcfrlem6.n 𝑁 = (LSpan‘𝑈)
lcfrlem6.l 𝐿 = (LKer‘𝑈)
lcfrlem6.d 𝐷 = (LDual‘𝑈)
lcfrlem6.q 𝑄 = (LSubSp‘𝐷)
lcfrlem6.k (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
lcfrlem6.g (𝜑𝐺𝑄)
lcfrlem6.e 𝐸 = 𝑔𝐺 ( ‘(𝐿𝑔))
lcfrlem6.x (𝜑𝑋𝐸)
lcfrlem6.y (𝜑𝑌𝐸)
lcfrlem6.en (𝜑 → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))
Assertion
Ref Expression
lcfrlem6 (𝜑 → (𝑋 + 𝑌) ∈ 𝐸)
Distinct variable groups:   + ,𝑔   𝑈,𝑔   𝑔,𝑋   𝑔,𝑌   𝜑,𝑔
Allowed substitution hints:   𝐷(𝑔)   𝑄(𝑔)   𝐸(𝑔)   𝐺(𝑔)   𝐻(𝑔)   𝐾(𝑔)   𝐿(𝑔)   𝑁(𝑔)   (𝑔)   𝑊(𝑔)

Proof of Theorem lcfrlem6
StepHypRef Expression
1 lcfrlem6.x . . . . . 6 (𝜑𝑋𝐸)
2 lcfrlem6.e . . . . . 6 𝐸 = 𝑔𝐺 ( ‘(𝐿𝑔))
31, 2eleqtrdi 2841 . . . . 5 (𝜑𝑋 𝑔𝐺 ( ‘(𝐿𝑔)))
4 eliun 4945 . . . . 5 (𝑋 𝑔𝐺 ( ‘(𝐿𝑔)) ↔ ∃𝑔𝐺 𝑋 ∈ ( ‘(𝐿𝑔)))
53, 4sylib 218 . . . 4 (𝜑 → ∃𝑔𝐺 𝑋 ∈ ( ‘(𝐿𝑔)))
6 lcfrlem6.h . . . . . . . . . 10 𝐻 = (LHyp‘𝐾)
7 lcfrlem6.u . . . . . . . . . 10 𝑈 = ((DVecH‘𝐾)‘𝑊)
8 lcfrlem6.k . . . . . . . . . 10 (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
96, 7, 8dvhlmod 41148 . . . . . . . . 9 (𝜑𝑈 ∈ LMod)
109adantr 480 . . . . . . . 8 ((𝜑𝑔𝐺) → 𝑈 ∈ LMod)
1110adantr 480 . . . . . . 7 (((𝜑𝑔𝐺) ∧ 𝑋 ∈ ( ‘(𝐿𝑔))) → 𝑈 ∈ LMod)
128adantr 480 . . . . . . . . 9 ((𝜑𝑔𝐺) → (𝐾 ∈ HL ∧ 𝑊𝐻))
13 eqid 2731 . . . . . . . . . 10 (Base‘𝑈) = (Base‘𝑈)
14 eqid 2731 . . . . . . . . . 10 (LFnl‘𝑈) = (LFnl‘𝑈)
15 lcfrlem6.l . . . . . . . . . 10 𝐿 = (LKer‘𝑈)
16 lcfrlem6.g . . . . . . . . . . . 12 (𝜑𝐺𝑄)
17 eqid 2731 . . . . . . . . . . . . 13 (Base‘𝐷) = (Base‘𝐷)
18 lcfrlem6.q . . . . . . . . . . . . 13 𝑄 = (LSubSp‘𝐷)
1917, 18lssel 20868 . . . . . . . . . . . 12 ((𝐺𝑄𝑔𝐺) → 𝑔 ∈ (Base‘𝐷))
2016, 19sylan 580 . . . . . . . . . . 11 ((𝜑𝑔𝐺) → 𝑔 ∈ (Base‘𝐷))
21 lcfrlem6.d . . . . . . . . . . . . 13 𝐷 = (LDual‘𝑈)
2214, 21, 17, 9ldualvbase 39164 . . . . . . . . . . . 12 (𝜑 → (Base‘𝐷) = (LFnl‘𝑈))
2322adantr 480 . . . . . . . . . . 11 ((𝜑𝑔𝐺) → (Base‘𝐷) = (LFnl‘𝑈))
2420, 23eleqtrd 2833 . . . . . . . . . 10 ((𝜑𝑔𝐺) → 𝑔 ∈ (LFnl‘𝑈))
2513, 14, 15, 10, 24lkrssv 39134 . . . . . . . . 9 ((𝜑𝑔𝐺) → (𝐿𝑔) ⊆ (Base‘𝑈))
26 eqid 2731 . . . . . . . . . 10 (LSubSp‘𝑈) = (LSubSp‘𝑈)
27 lcfrlem6.o . . . . . . . . . 10 = ((ocH‘𝐾)‘𝑊)
286, 7, 13, 26, 27dochlss 41392 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝑔) ⊆ (Base‘𝑈)) → ( ‘(𝐿𝑔)) ∈ (LSubSp‘𝑈))
2912, 25, 28syl2anc 584 . . . . . . . 8 ((𝜑𝑔𝐺) → ( ‘(𝐿𝑔)) ∈ (LSubSp‘𝑈))
3029adantr 480 . . . . . . 7 (((𝜑𝑔𝐺) ∧ 𝑋 ∈ ( ‘(𝐿𝑔))) → ( ‘(𝐿𝑔)) ∈ (LSubSp‘𝑈))
31 simpr 484 . . . . . . 7 (((𝜑𝑔𝐺) ∧ 𝑋 ∈ ( ‘(𝐿𝑔))) → 𝑋 ∈ ( ‘(𝐿𝑔)))
32 lcfrlem6.en . . . . . . . . . . . . 13 (𝜑 → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))
3332adantr 480 . . . . . . . . . . . 12 ((𝜑𝑔𝐺) → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))
3433adantr 480 . . . . . . . . . . 11 (((𝜑𝑔𝐺) ∧ (𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔))) → (𝑁‘{𝑋}) = (𝑁‘{𝑌}))
35 simpr 484 . . . . . . . . . . 11 (((𝜑𝑔𝐺) ∧ (𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔))) → (𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔)))
3634, 35eqsstrrd 3970 . . . . . . . . . 10 (((𝜑𝑔𝐺) ∧ (𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔))) → (𝑁‘{𝑌}) ⊆ ( ‘(𝐿𝑔)))
3736ex 412 . . . . . . . . 9 ((𝜑𝑔𝐺) → ((𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔)) → (𝑁‘{𝑌}) ⊆ ( ‘(𝐿𝑔))))
38 lcfrlem6.n . . . . . . . . . 10 𝑁 = (LSpan‘𝑈)
396, 27, 7, 13, 15, 21, 18, 2, 8, 16, 1lcfrlem4 41583 . . . . . . . . . . 11 (𝜑𝑋 ∈ (Base‘𝑈))
4039adantr 480 . . . . . . . . . 10 ((𝜑𝑔𝐺) → 𝑋 ∈ (Base‘𝑈))
4113, 26, 38, 10, 29, 40ellspsn5b 20926 . . . . . . . . 9 ((𝜑𝑔𝐺) → (𝑋 ∈ ( ‘(𝐿𝑔)) ↔ (𝑁‘{𝑋}) ⊆ ( ‘(𝐿𝑔))))
42 lcfrlem6.y . . . . . . . . . . . 12 (𝜑𝑌𝐸)
436, 27, 7, 13, 15, 21, 18, 2, 8, 16, 42lcfrlem4 41583 . . . . . . . . . . 11 (𝜑𝑌 ∈ (Base‘𝑈))
4443adantr 480 . . . . . . . . . 10 ((𝜑𝑔𝐺) → 𝑌 ∈ (Base‘𝑈))
4513, 26, 38, 10, 29, 44ellspsn5b 20926 . . . . . . . . 9 ((𝜑𝑔𝐺) → (𝑌 ∈ ( ‘(𝐿𝑔)) ↔ (𝑁‘{𝑌}) ⊆ ( ‘(𝐿𝑔))))
4637, 41, 453imtr4d 294 . . . . . . . 8 ((𝜑𝑔𝐺) → (𝑋 ∈ ( ‘(𝐿𝑔)) → 𝑌 ∈ ( ‘(𝐿𝑔))))
4746imp 406 . . . . . . 7 (((𝜑𝑔𝐺) ∧ 𝑋 ∈ ( ‘(𝐿𝑔))) → 𝑌 ∈ ( ‘(𝐿𝑔)))
48 lcfrlem6.p . . . . . . . 8 + = (+g𝑈)
4948, 26lssvacl 20874 . . . . . . 7 (((𝑈 ∈ LMod ∧ ( ‘(𝐿𝑔)) ∈ (LSubSp‘𝑈)) ∧ (𝑋 ∈ ( ‘(𝐿𝑔)) ∧ 𝑌 ∈ ( ‘(𝐿𝑔)))) → (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔)))
5011, 30, 31, 47, 49syl22anc 838 . . . . . 6 (((𝜑𝑔𝐺) ∧ 𝑋 ∈ ( ‘(𝐿𝑔))) → (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔)))
5150ex 412 . . . . 5 ((𝜑𝑔𝐺) → (𝑋 ∈ ( ‘(𝐿𝑔)) → (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔))))
5251reximdva 3145 . . . 4 (𝜑 → (∃𝑔𝐺 𝑋 ∈ ( ‘(𝐿𝑔)) → ∃𝑔𝐺 (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔))))
535, 52mpd 15 . . 3 (𝜑 → ∃𝑔𝐺 (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔)))
54 eliun 4945 . . 3 ((𝑋 + 𝑌) ∈ 𝑔𝐺 ( ‘(𝐿𝑔)) ↔ ∃𝑔𝐺 (𝑋 + 𝑌) ∈ ( ‘(𝐿𝑔)))
5553, 54sylibr 234 . 2 (𝜑 → (𝑋 + 𝑌) ∈ 𝑔𝐺 ( ‘(𝐿𝑔)))
5655, 2eleqtrrdi 2842 1 (𝜑 → (𝑋 + 𝑌) ∈ 𝐸)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1541  wcel 2111  wrex 3056  wss 3902  {csn 4576   ciun 4941  cfv 6481  (class class class)co 7346  Basecbs 17117  +gcplusg 17158  LModclmod 20791  LSubSpclss 20862  LSpanclspn 20902  LFnlclfn 39095  LKerclk 39123  LDualcld 39161  HLchlt 39388  LHypclh 40022  DVecHcdvh 41116  ocHcoch 41385
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-10 2144  ax-11 2160  ax-12 2180  ax-ext 2703  ax-rep 5217  ax-sep 5234  ax-nul 5244  ax-pow 5303  ax-pr 5370  ax-un 7668  ax-cnex 11059  ax-resscn 11060  ax-1cn 11061  ax-icn 11062  ax-addcl 11063  ax-addrcl 11064  ax-mulcl 11065  ax-mulrcl 11066  ax-mulcom 11067  ax-addass 11068  ax-mulass 11069  ax-distr 11070  ax-i2m1 11071  ax-1ne0 11072  ax-1rid 11073  ax-rnegex 11074  ax-rrecex 11075  ax-cnre 11076  ax-pre-lttri 11077  ax-pre-lttrn 11078  ax-pre-ltadd 11079  ax-pre-mulgt0 11080  ax-riotaBAD 38991
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2535  df-eu 2564  df-clab 2710  df-cleq 2723  df-clel 2806  df-nfc 2881  df-ne 2929  df-nel 3033  df-ral 3048  df-rex 3057  df-rmo 3346  df-reu 3347  df-rab 3396  df-v 3438  df-sbc 3742  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4476  df-pw 4552  df-sn 4577  df-pr 4579  df-tp 4581  df-op 4583  df-uni 4860  df-int 4898  df-iun 4943  df-iin 4944  df-br 5092  df-opab 5154  df-mpt 5173  df-tr 5199  df-id 5511  df-eprel 5516  df-po 5524  df-so 5525  df-fr 5569  df-we 5571  df-xp 5622  df-rel 5623  df-cnv 5624  df-co 5625  df-dm 5626  df-rn 5627  df-res 5628  df-ima 5629  df-pred 6248  df-ord 6309  df-on 6310  df-lim 6311  df-suc 6312  df-iota 6437  df-fun 6483  df-fn 6484  df-f 6485  df-f1 6486  df-fo 6487  df-f1o 6488  df-fv 6489  df-riota 7303  df-ov 7349  df-oprab 7350  df-mpo 7351  df-of 7610  df-om 7797  df-1st 7921  df-2nd 7922  df-tpos 8156  df-undef 8203  df-frecs 8211  df-wrecs 8242  df-recs 8291  df-rdg 8329  df-1o 8385  df-er 8622  df-map 8752  df-en 8870  df-dom 8871  df-sdom 8872  df-fin 8873  df-pnf 11145  df-mnf 11146  df-xr 11147  df-ltxr 11148  df-le 11149  df-sub 11343  df-neg 11344  df-nn 12123  df-2 12185  df-3 12186  df-4 12187  df-5 12188  df-6 12189  df-n0 12379  df-z 12466  df-uz 12730  df-fz 13405  df-struct 17055  df-sets 17072  df-slot 17090  df-ndx 17102  df-base 17118  df-ress 17139  df-plusg 17171  df-mulr 17172  df-sca 17174  df-vsca 17175  df-0g 17342  df-proset 18197  df-poset 18216  df-plt 18231  df-lub 18247  df-glb 18248  df-join 18249  df-meet 18250  df-p0 18326  df-p1 18327  df-lat 18335  df-clat 18402  df-mgm 18545  df-sgrp 18624  df-mnd 18640  df-submnd 18689  df-grp 18846  df-minusg 18847  df-sbg 18848  df-subg 19033  df-cntz 19227  df-lsm 19546  df-cmn 19692  df-abl 19693  df-mgp 20057  df-rng 20069  df-ur 20098  df-ring 20151  df-oppr 20253  df-dvdsr 20273  df-unit 20274  df-invr 20304  df-dvr 20317  df-drng 20644  df-lmod 20793  df-lss 20863  df-lsp 20903  df-lvec 21035  df-lfl 39096  df-lkr 39124  df-ldual 39162  df-oposet 39214  df-ol 39216  df-oml 39217  df-covers 39304  df-ats 39305  df-atl 39336  df-cvlat 39360  df-hlat 39389  df-llines 39536  df-lplanes 39537  df-lvols 39538  df-lines 39539  df-psubsp 39541  df-pmap 39542  df-padd 39834  df-lhyp 40026  df-laut 40027  df-ldil 40142  df-ltrn 40143  df-trl 40197  df-tendo 40793  df-edring 40795  df-disoa 41067  df-dvech 41117  df-dib 41177  df-dic 41211  df-dih 41267  df-doch 41386
This theorem is referenced by:  lcfrlem41  41621
  Copyright terms: Public domain W3C validator