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

Theorem lclkrslem2 42030
Description: The set of functionals having closed kernels and majorizing the orthocomplement of a given subspace 𝑄 is closed under scalar product. (Contributed by NM, 28-Jan-2015.)
Hypotheses
Ref Expression
lclkrslem1.h 𝐻 = (LHyp‘𝐾)
lclkrslem1.o = ((ocH‘𝐾)‘𝑊)
lclkrslem1.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
lclkrslem1.s 𝑆 = (LSubSp‘𝑈)
lclkrslem1.f 𝐹 = (LFnl‘𝑈)
lclkrslem1.l 𝐿 = (LKer‘𝑈)
lclkrslem1.d 𝐷 = (LDual‘𝑈)
lclkrslem1.r 𝑅 = (Scalar‘𝑈)
lclkrslem1.b 𝐵 = (Base‘𝑅)
lclkrslem1.t · = ( ·𝑠𝐷)
lclkrslem1.c 𝐶 = {𝑓𝐹 ∣ (( ‘( ‘(𝐿𝑓))) = (𝐿𝑓) ∧ ( ‘(𝐿𝑓)) ⊆ 𝑄)}
lclkrslem1.k (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
lclkrslem1.q (𝜑𝑄𝑆)
lclkrslem1.g (𝜑𝐺𝐶)
lclkrslem2.p + = (+g𝐷)
lclkrslem2.e (𝜑𝐸𝐶)
Assertion
Ref Expression
lclkrslem2 (𝜑 → (𝐸 + 𝐺) ∈ 𝐶)
Distinct variable groups:   ,𝑓   𝑓,𝐹   𝑓,𝐺   𝑓,𝐿   𝑄,𝑓   · ,𝑓   𝑓,𝐸   + ,𝑓
Allowed substitution hints:   𝜑(𝑓)   𝐵(𝑓)   𝐶(𝑓)   𝐷(𝑓)   𝑅(𝑓)   𝑆(𝑓)   𝑈(𝑓)   𝐻(𝑓)   𝐾(𝑓)   𝑊(𝑓)

Proof of Theorem lclkrslem2
StepHypRef Expression
1 lclkrslem1.h . . 3 𝐻 = (LHyp‘𝐾)
2 lclkrslem1.o . . 3 = ((ocH‘𝐾)‘𝑊)
3 lclkrslem1.u . . 3 𝑈 = ((DVecH‘𝐾)‘𝑊)
4 lclkrslem1.f . . 3 𝐹 = (LFnl‘𝑈)
5 lclkrslem1.l . . 3 𝐿 = (LKer‘𝑈)
6 lclkrslem1.d . . 3 𝐷 = (LDual‘𝑈)
7 lclkrslem2.p . . 3 + = (+g𝐷)
8 eqid 2739 . . 3 {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)} = {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)}
9 lclkrslem1.k . . 3 (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
10 lclkrslem2.e . . . 4 (𝜑𝐸𝐶)
11 lclkrslem1.c . . . . . 6 𝐶 = {𝑓𝐹 ∣ (( ‘( ‘(𝐿𝑓))) = (𝐿𝑓) ∧ ( ‘(𝐿𝑓)) ⊆ 𝑄)}
1211, 8lcfls1c 42028 . . . . 5 (𝐸𝐶 ↔ (𝐸 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)} ∧ ( ‘(𝐿𝐸)) ⊆ 𝑄))
1312simplbi 497 . . . 4 (𝐸𝐶𝐸 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)})
1410, 13syl 17 . . 3 (𝜑𝐸 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)})
15 lclkrslem1.g . . . 4 (𝜑𝐺𝐶)
1611, 8lcfls1c 42028 . . . . 5 (𝐺𝐶 ↔ (𝐺 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)} ∧ ( ‘(𝐿𝐺)) ⊆ 𝑄))
1716simplbi 497 . . . 4 (𝐺𝐶𝐺 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)})
1815, 17syl 17 . . 3 (𝜑𝐺 ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)})
191, 2, 3, 4, 5, 6, 7, 8, 9, 14, 18lclkrlem2 42024 . 2 (𝜑 → (𝐸 + 𝐺) ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)})
20 eqid 2739 . . . . 5 (Base‘𝑈) = (Base‘𝑈)
211, 3, 9dvhlmod 41602 . . . . 5 (𝜑𝑈 ∈ LMod)
2211lcfls1lem 42026 . . . . . . . 8 (𝐸𝐶 ↔ (𝐸𝐹 ∧ ( ‘( ‘(𝐿𝐸))) = (𝐿𝐸) ∧ ( ‘(𝐿𝐸)) ⊆ 𝑄))
2310, 22sylib 219 . . . . . . 7 (𝜑 → (𝐸𝐹 ∧ ( ‘( ‘(𝐿𝐸))) = (𝐿𝐸) ∧ ( ‘(𝐿𝐸)) ⊆ 𝑄))
2423simp1d 1148 . . . . . 6 (𝜑𝐸𝐹)
2511lcfls1lem 42026 . . . . . . . 8 (𝐺𝐶 ↔ (𝐺𝐹 ∧ ( ‘( ‘(𝐿𝐺))) = (𝐿𝐺) ∧ ( ‘(𝐿𝐺)) ⊆ 𝑄))
2615, 25sylib 219 . . . . . . 7 (𝜑 → (𝐺𝐹 ∧ ( ‘( ‘(𝐿𝐺))) = (𝐿𝐺) ∧ ( ‘(𝐿𝐺)) ⊆ 𝑄))
2726simp1d 1148 . . . . . 6 (𝜑𝐺𝐹)
284, 6, 7, 21, 24, 27ldualvaddcl 39622 . . . . 5 (𝜑 → (𝐸 + 𝐺) ∈ 𝐹)
2920, 4, 5, 21, 28lkrssv 39588 . . . 4 (𝜑 → (𝐿‘(𝐸 + 𝐺)) ⊆ (Base‘𝑈))
304, 5, 6, 7, 21, 24, 27lkrin 39656 . . . 4 (𝜑 → ((𝐿𝐸) ∩ (𝐿𝐺)) ⊆ (𝐿‘(𝐸 + 𝐺)))
311, 3, 20, 2dochss 41857 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿‘(𝐸 + 𝐺)) ⊆ (Base‘𝑈) ∧ ((𝐿𝐸) ∩ (𝐿𝐺)) ⊆ (𝐿‘(𝐸 + 𝐺))) → ( ‘(𝐿‘(𝐸 + 𝐺))) ⊆ ( ‘((𝐿𝐸) ∩ (𝐿𝐺))))
329, 29, 30, 31syl3anc 1379 . . 3 (𝜑 → ( ‘(𝐿‘(𝐸 + 𝐺))) ⊆ ( ‘((𝐿𝐸) ∩ (𝐿𝐺))))
33 eqid 2739 . . . . . 6 ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
34 eqid 2739 . . . . . 6 ((joinH‘𝐾)‘𝑊) = ((joinH‘𝐾)‘𝑊)
3523simp2d 1149 . . . . . . 7 (𝜑 → ( ‘( ‘(𝐿𝐸))) = (𝐿𝐸))
361, 33, 2, 3, 4, 5, 9, 24lcfl5a 41989 . . . . . . 7 (𝜑 → (( ‘( ‘(𝐿𝐸))) = (𝐿𝐸) ↔ (𝐿𝐸) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
3735, 36mpbid 233 . . . . . 6 (𝜑 → (𝐿𝐸) ∈ ran ((DIsoH‘𝐾)‘𝑊))
3826simp2d 1149 . . . . . . 7 (𝜑 → ( ‘( ‘(𝐿𝐺))) = (𝐿𝐺))
391, 33, 2, 3, 4, 5, 9, 27lcfl5a 41989 . . . . . . 7 (𝜑 → (( ‘( ‘(𝐿𝐺))) = (𝐿𝐺) ↔ (𝐿𝐺) ∈ ran ((DIsoH‘𝐾)‘𝑊)))
4038, 39mpbid 233 . . . . . 6 (𝜑 → (𝐿𝐺) ∈ ran ((DIsoH‘𝐾)‘𝑊))
411, 33, 3, 20, 2, 34, 9, 37, 40dochdmm1 41902 . . . . 5 (𝜑 → ( ‘((𝐿𝐸) ∩ (𝐿𝐺))) = (( ‘(𝐿𝐸))((joinH‘𝐾)‘𝑊)( ‘(𝐿𝐺))))
42 eqid 2739 . . . . . . 7 (LSSum‘𝑈) = (LSSum‘𝑈)
4320, 4, 5, 21, 24lkrssv 39588 . . . . . . . 8 (𝜑 → (𝐿𝐸) ⊆ (Base‘𝑈))
441, 33, 3, 20, 2dochcl 41845 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝐸) ⊆ (Base‘𝑈)) → ( ‘(𝐿𝐸)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
459, 43, 44syl2anc 590 . . . . . . 7 (𝜑 → ( ‘(𝐿𝐸)) ∈ ran ((DIsoH‘𝐾)‘𝑊))
461, 33, 2, 3, 42, 4, 5, 9, 45, 27dochkrsm 41950 . . . . . 6 (𝜑 → (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) ∈ ran ((DIsoH‘𝐾)‘𝑊))
47 lclkrslem1.s . . . . . . 7 𝑆 = (LSubSp‘𝑈)
481, 3, 20, 47, 2dochlss 41846 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝐸) ⊆ (Base‘𝑈)) → ( ‘(𝐿𝐸)) ∈ 𝑆)
499, 43, 48syl2anc 590 . . . . . . 7 (𝜑 → ( ‘(𝐿𝐸)) ∈ 𝑆)
5020, 4, 5, 21, 27lkrssv 39588 . . . . . . . 8 (𝜑 → (𝐿𝐺) ⊆ (Base‘𝑈))
511, 3, 20, 47, 2dochlss 41846 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝐺) ⊆ (Base‘𝑈)) → ( ‘(𝐿𝐺)) ∈ 𝑆)
529, 50, 51syl2anc 590 . . . . . . 7 (𝜑 → ( ‘(𝐿𝐺)) ∈ 𝑆)
531, 3, 20, 47, 42, 33, 34, 9, 49, 52djhlsmcl 41906 . . . . . 6 (𝜑 → ((( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) ∈ ran ((DIsoH‘𝐾)‘𝑊) ↔ (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) = (( ‘(𝐿𝐸))((joinH‘𝐾)‘𝑊)( ‘(𝐿𝐺)))))
5446, 53mpbid 233 . . . . 5 (𝜑 → (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) = (( ‘(𝐿𝐸))((joinH‘𝐾)‘𝑊)( ‘(𝐿𝐺))))
5541, 54eqtr4d 2777 . . . 4 (𝜑 → ( ‘((𝐿𝐸) ∩ (𝐿𝐺))) = (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))))
5623simp3d 1150 . . . . 5 (𝜑 → ( ‘(𝐿𝐸)) ⊆ 𝑄)
5726simp3d 1150 . . . . 5 (𝜑 → ( ‘(𝐿𝐺)) ⊆ 𝑄)
5847lsssssubg 20948 . . . . . . . 8 (𝑈 ∈ LMod → 𝑆 ⊆ (SubGrp‘𝑈))
5921, 58syl 17 . . . . . . 7 (𝜑𝑆 ⊆ (SubGrp‘𝑈))
6059, 49sseldd 3916 . . . . . 6 (𝜑 → ( ‘(𝐿𝐸)) ∈ (SubGrp‘𝑈))
6159, 52sseldd 3916 . . . . . 6 (𝜑 → ( ‘(𝐿𝐺)) ∈ (SubGrp‘𝑈))
62 lclkrslem1.q . . . . . . 7 (𝜑𝑄𝑆)
6359, 62sseldd 3916 . . . . . 6 (𝜑𝑄 ∈ (SubGrp‘𝑈))
6442lsmlub 19630 . . . . . 6 ((( ‘(𝐿𝐸)) ∈ (SubGrp‘𝑈) ∧ ( ‘(𝐿𝐺)) ∈ (SubGrp‘𝑈) ∧ 𝑄 ∈ (SubGrp‘𝑈)) → ((( ‘(𝐿𝐸)) ⊆ 𝑄 ∧ ( ‘(𝐿𝐺)) ⊆ 𝑄) ↔ (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) ⊆ 𝑄))
6560, 61, 63, 64syl3anc 1379 . . . . 5 (𝜑 → ((( ‘(𝐿𝐸)) ⊆ 𝑄 ∧ ( ‘(𝐿𝐺)) ⊆ 𝑄) ↔ (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) ⊆ 𝑄))
6656, 57, 65mpbi2and 718 . . . 4 (𝜑 → (( ‘(𝐿𝐸))(LSSum‘𝑈)( ‘(𝐿𝐺))) ⊆ 𝑄)
6755, 66eqsstrd 3949 . . 3 (𝜑 → ( ‘((𝐿𝐸) ∩ (𝐿𝐺))) ⊆ 𝑄)
6832, 67sstrd 3925 . 2 (𝜑 → ( ‘(𝐿‘(𝐸 + 𝐺))) ⊆ 𝑄)
6911, 8lcfls1c 42028 . 2 ((𝐸 + 𝐺) ∈ 𝐶 ↔ ((𝐸 + 𝐺) ∈ {𝑓𝐹 ∣ ( ‘( ‘(𝐿𝑓))) = (𝐿𝑓)} ∧ ( ‘(𝐿‘(𝐸 + 𝐺))) ⊆ 𝑄))
7019, 68, 69sylanbrc 589 1 (𝜑 → (𝐸 + 𝐺) ∈ 𝐶)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  {crab 3391  cin 3882  wss 3883  ran crn 5619  cfv 6485  (class class class)co 7356  Basecbs 17170  +gcplusg 17211  Scalarcsca 17214   ·𝑠 cvsca 17215  SubGrpcsubg 19087  LSSumclsm 19600  LModclmod 20850  LSubSpclss 20921  LFnlclfn 39549  LKerclk 39577  LDualcld 39615  HLchlt 39842  LHypclh 40476  DVecHcdvh 41570  DIsoHcdih 41720  ocHcoch 41839  joinHcdjh 41886
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-rep 5199  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-riotaBAD 39445
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-tp 4560  df-op 4562  df-uni 4839  df-int 4878  df-iun 4923  df-iin 4924  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-om 7807  df-1st 7931  df-2nd 7932  df-tpos 8166  df-undef 8213  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-map 8765  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-nn 12166  df-2 12235  df-3 12236  df-4 12237  df-5 12238  df-6 12239  df-n0 12429  df-z 12516  df-uz 12780  df-fz 13453  df-struct 17108  df-sets 17125  df-slot 17143  df-ndx 17155  df-base 17171  df-ress 17192  df-plusg 17224  df-mulr 17225  df-sca 17227  df-vsca 17228  df-0g 17395  df-mre 17539  df-mrc 17540  df-acs 17542  df-proset 18251  df-poset 18270  df-plt 18285  df-lub 18301  df-glb 18302  df-join 18303  df-meet 18304  df-p0 18380  df-p1 18381  df-lat 18389  df-clat 18456  df-mgm 18599  df-sgrp 18678  df-mnd 18694  df-submnd 18743  df-grp 18903  df-minusg 18904  df-sbg 18905  df-subg 19090  df-cntz 19283  df-oppg 19312  df-lsm 19602  df-cmn 19748  df-abl 19749  df-mgp 20113  df-rng 20125  df-ur 20154  df-ring 20207  df-oppr 20308  df-dvdsr 20328  df-unit 20329  df-invr 20359  df-dvr 20372  df-drng 20703  df-lmod 20852  df-lss 20922  df-lsp 20962  df-lvec 21093  df-lsatoms 39468  df-lshyp 39469  df-lcv 39511  df-lfl 39550  df-lkr 39578  df-ldual 39616  df-oposet 39668  df-ol 39670  df-oml 39671  df-covers 39758  df-ats 39759  df-atl 39790  df-cvlat 39814  df-hlat 39843  df-llines 39990  df-lplanes 39991  df-lvols 39992  df-lines 39993  df-psubsp 39995  df-pmap 39996  df-padd 40288  df-lhyp 40480  df-laut 40481  df-ldil 40596  df-ltrn 40597  df-trl 40651  df-tgrp 41235  df-tendo 41247  df-edring 41249  df-dveca 41495  df-disoa 41521  df-dvech 41571  df-dib 41631  df-dic 41665  df-dih 41721  df-doch 41840  df-djh 41887
This theorem is referenced by:  lclkrs  42031
  Copyright terms: Public domain W3C validator