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

Theorem dochkr1OLDN 38794
 Description: A nonzero functional has a value of 1 at some argument belonging to the orthocomplement of its kernel (when its kernel is a closed hyperplane). Tighter version of lfl1 36385. (Contributed by NM, 2-Jan-2015.) (New usage is discouraged.)
Hypotheses
Ref Expression
dochkr1OLD.h 𝐻 = (LHyp‘𝐾)
dochkr1OLD.o = ((ocH‘𝐾)‘𝑊)
dochkr1OLD.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
dochkr1OLD.v 𝑉 = (Base‘𝑈)
dochkr1OLD.r 𝑅 = (Scalar‘𝑈)
dochkr1OLD.z 0 = (0g𝑅)
dochkr1OLD.i 1 = (1r𝑅)
dochkr1OLD.f 𝐹 = (LFnl‘𝑈)
dochkr1OLD.l 𝐿 = (LKer‘𝑈)
dochkr1OLD.k (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
dochkr1OLD.g (𝜑𝐺𝐹)
dochkr1OLD.n (𝜑 → ( ‘( ‘(𝐿𝐺))) ≠ 𝑉)
Assertion
Ref Expression
dochkr1OLDN (𝜑 → ∃𝑥 ∈ ( ‘(𝐿𝐺))(𝐺𝑥) = 1 )
Distinct variable groups:   𝑥, 1   𝑥,𝐺   𝑥,𝐿   𝑥,𝑅   𝑥,𝑈   𝑥,
Allowed substitution hints:   𝜑(𝑥)   𝐹(𝑥)   𝐻(𝑥)   𝐾(𝑥)   𝑉(𝑥)   𝑊(𝑥)   0 (𝑥)

Proof of Theorem dochkr1OLDN
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 eqid 2798 . . . 4 (0g𝑈) = (0g𝑈)
2 eqid 2798 . . . 4 (LSAtoms‘𝑈) = (LSAtoms‘𝑈)
3 dochkr1OLD.h . . . . 5 𝐻 = (LHyp‘𝐾)
4 dochkr1OLD.u . . . . 5 𝑈 = ((DVecH‘𝐾)‘𝑊)
5 dochkr1OLD.k . . . . 5 (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
63, 4, 5dvhlmod 38425 . . . 4 (𝜑𝑈 ∈ LMod)
7 dochkr1OLD.n . . . . 5 (𝜑 → ( ‘( ‘(𝐿𝐺))) ≠ 𝑉)
8 dochkr1OLD.o . . . . . 6 = ((ocH‘𝐾)‘𝑊)
9 dochkr1OLD.v . . . . . 6 𝑉 = (Base‘𝑈)
10 dochkr1OLD.f . . . . . 6 𝐹 = (LFnl‘𝑈)
11 dochkr1OLD.l . . . . . 6 𝐿 = (LKer‘𝑈)
12 dochkr1OLD.g . . . . . 6 (𝜑𝐺𝐹)
133, 8, 4, 9, 2, 10, 11, 5, 12dochkrsat2 38771 . . . . 5 (𝜑 → (( ‘( ‘(𝐿𝐺))) ≠ 𝑉 ↔ ( ‘(𝐿𝐺)) ∈ (LSAtoms‘𝑈)))
147, 13mpbid 235 . . . 4 (𝜑 → ( ‘(𝐿𝐺)) ∈ (LSAtoms‘𝑈))
151, 2, 6, 14lsateln0 36310 . . 3 (𝜑 → ∃𝑧 ∈ ( ‘(𝐿𝐺))𝑧 ≠ (0g𝑈))
16 dochkr1OLD.r . . . . . 6 𝑅 = (Scalar‘𝑈)
17 dochkr1OLD.z . . . . . 6 0 = (0g𝑅)
185ad2antrr 725 . . . . . 6 (((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) ∧ 𝑧 ≠ (0g𝑈)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
1912ad2antrr 725 . . . . . 6 (((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) ∧ 𝑧 ≠ (0g𝑈)) → 𝐺𝐹)
20 eldifsn 4680 . . . . . . . 8 (𝑧 ∈ (( ‘(𝐿𝐺)) ∖ {(0g𝑈)}) ↔ (𝑧 ∈ ( ‘(𝐿𝐺)) ∧ 𝑧 ≠ (0g𝑈)))
2120biimpri 231 . . . . . . 7 ((𝑧 ∈ ( ‘(𝐿𝐺)) ∧ 𝑧 ≠ (0g𝑈)) → 𝑧 ∈ (( ‘(𝐿𝐺)) ∖ {(0g𝑈)}))
2221adantll 713 . . . . . 6 (((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) ∧ 𝑧 ≠ (0g𝑈)) → 𝑧 ∈ (( ‘(𝐿𝐺)) ∖ {(0g𝑈)}))
233, 8, 4, 9, 16, 17, 1, 10, 11, 18, 19, 22dochfln0 38792 . . . . 5 (((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) ∧ 𝑧 ≠ (0g𝑈)) → (𝐺𝑧) ≠ 0 )
2423ex 416 . . . 4 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) → (𝑧 ≠ (0g𝑈) → (𝐺𝑧) ≠ 0 ))
2524reximdva 3233 . . 3 (𝜑 → (∃𝑧 ∈ ( ‘(𝐿𝐺))𝑧 ≠ (0g𝑈) → ∃𝑧 ∈ ( ‘(𝐿𝐺))(𝐺𝑧) ≠ 0 ))
2615, 25mpd 15 . 2 (𝜑 → ∃𝑧 ∈ ( ‘(𝐿𝐺))(𝐺𝑧) ≠ 0 )
279, 10, 11, 6, 12lkrssv 36411 . . . . . . . 8 (𝜑 → (𝐿𝐺) ⊆ 𝑉)
28 eqid 2798 . . . . . . . . 9 (LSubSp‘𝑈) = (LSubSp‘𝑈)
293, 4, 9, 28, 8dochlss 38669 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝐺) ⊆ 𝑉) → ( ‘(𝐿𝐺)) ∈ (LSubSp‘𝑈))
305, 27, 29syl2anc 587 . . . . . . 7 (𝜑 → ( ‘(𝐿𝐺)) ∈ (LSubSp‘𝑈))
316, 30jca 515 . . . . . 6 (𝜑 → (𝑈 ∈ LMod ∧ ( ‘(𝐿𝐺)) ∈ (LSubSp‘𝑈)))
32313ad2ant1 1130 . . . . 5 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (𝑈 ∈ LMod ∧ ( ‘(𝐿𝐺)) ∈ (LSubSp‘𝑈)))
333, 4, 5dvhlvec 38424 . . . . . . . 8 (𝜑𝑈 ∈ LVec)
34333ad2ant1 1130 . . . . . . 7 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝑈 ∈ LVec)
3516lvecdrng 19874 . . . . . . 7 (𝑈 ∈ LVec → 𝑅 ∈ DivRing)
3634, 35syl 17 . . . . . 6 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝑅 ∈ DivRing)
3763ad2ant1 1130 . . . . . . 7 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝑈 ∈ LMod)
38123ad2ant1 1130 . . . . . . 7 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝐺𝐹)
393, 4, 9, 8dochssv 38670 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐿𝐺) ⊆ 𝑉) → ( ‘(𝐿𝐺)) ⊆ 𝑉)
405, 27, 39syl2anc 587 . . . . . . . . 9 (𝜑 → ( ‘(𝐿𝐺)) ⊆ 𝑉)
4140sselda 3915 . . . . . . . 8 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺))) → 𝑧𝑉)
42413adant3 1129 . . . . . . 7 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝑧𝑉)
43 eqid 2798 . . . . . . . 8 (Base‘𝑅) = (Base‘𝑅)
4416, 43, 9, 10lflcl 36379 . . . . . . 7 ((𝑈 ∈ LMod ∧ 𝐺𝐹𝑧𝑉) → (𝐺𝑧) ∈ (Base‘𝑅))
4537, 38, 42, 44syl3anc 1368 . . . . . 6 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (𝐺𝑧) ∈ (Base‘𝑅))
46 simp3 1135 . . . . . 6 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (𝐺𝑧) ≠ 0 )
47 eqid 2798 . . . . . . 7 (invr𝑅) = (invr𝑅)
4843, 17, 47drnginvrcl 19516 . . . . . 6 ((𝑅 ∈ DivRing ∧ (𝐺𝑧) ∈ (Base‘𝑅) ∧ (𝐺𝑧) ≠ 0 ) → ((invr𝑅)‘(𝐺𝑧)) ∈ (Base‘𝑅))
4936, 45, 46, 48syl3anc 1368 . . . . 5 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → ((invr𝑅)‘(𝐺𝑧)) ∈ (Base‘𝑅))
50 simp2 1134 . . . . 5 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → 𝑧 ∈ ( ‘(𝐿𝐺)))
51 eqid 2798 . . . . . 6 ( ·𝑠𝑈) = ( ·𝑠𝑈)
5216, 51, 43, 28lssvscl 19724 . . . . 5 (((𝑈 ∈ LMod ∧ ( ‘(𝐿𝐺)) ∈ (LSubSp‘𝑈)) ∧ (((invr𝑅)‘(𝐺𝑧)) ∈ (Base‘𝑅) ∧ 𝑧 ∈ ( ‘(𝐿𝐺)))) → (((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧) ∈ ( ‘(𝐿𝐺)))
5332, 49, 50, 52syl12anc 835 . . . 4 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧) ∈ ( ‘(𝐿𝐺)))
54 eqid 2798 . . . . . . 7 (.r𝑅) = (.r𝑅)
5516, 43, 54, 9, 51, 10lflmul 36383 . . . . . 6 ((𝑈 ∈ LMod ∧ 𝐺𝐹 ∧ (((invr𝑅)‘(𝐺𝑧)) ∈ (Base‘𝑅) ∧ 𝑧𝑉)) → (𝐺‘(((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧)) = (((invr𝑅)‘(𝐺𝑧))(.r𝑅)(𝐺𝑧)))
5637, 38, 49, 42, 55syl112anc 1371 . . . . 5 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (𝐺‘(((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧)) = (((invr𝑅)‘(𝐺𝑧))(.r𝑅)(𝐺𝑧)))
57 dochkr1OLD.i . . . . . . 7 1 = (1r𝑅)
5843, 17, 54, 57, 47drnginvrl 19518 . . . . . 6 ((𝑅 ∈ DivRing ∧ (𝐺𝑧) ∈ (Base‘𝑅) ∧ (𝐺𝑧) ≠ 0 ) → (((invr𝑅)‘(𝐺𝑧))(.r𝑅)(𝐺𝑧)) = 1 )
5936, 45, 46, 58syl3anc 1368 . . . . 5 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (((invr𝑅)‘(𝐺𝑧))(.r𝑅)(𝐺𝑧)) = 1 )
6056, 59eqtrd 2833 . . . 4 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → (𝐺‘(((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧)) = 1 )
61 fveqeq2 6655 . . . . 5 (𝑥 = (((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧) → ((𝐺𝑥) = 1 ↔ (𝐺‘(((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧)) = 1 ))
6261rspcev 3571 . . . 4 (((((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧) ∈ ( ‘(𝐿𝐺)) ∧ (𝐺‘(((invr𝑅)‘(𝐺𝑧))( ·𝑠𝑈)𝑧)) = 1 ) → ∃𝑥 ∈ ( ‘(𝐿𝐺))(𝐺𝑥) = 1 )
6353, 60, 62syl2anc 587 . . 3 ((𝜑𝑧 ∈ ( ‘(𝐿𝐺)) ∧ (𝐺𝑧) ≠ 0 ) → ∃𝑥 ∈ ( ‘(𝐿𝐺))(𝐺𝑥) = 1 )
6463rexlimdv3a 3245 . 2 (𝜑 → (∃𝑧 ∈ ( ‘(𝐿𝐺))(𝐺𝑧) ≠ 0 → ∃𝑥 ∈ ( ‘(𝐿𝐺))(𝐺𝑥) = 1 ))
6526, 64mpd 15 1 (𝜑 → ∃𝑥 ∈ ( ‘(𝐿𝐺))(𝐺𝑥) = 1 )
 Colors of variables: wff setvar class Syntax hints:   → wi 4   ∧ wa 399   ∧ w3a 1084   = wceq 1538   ∈ wcel 2111   ≠ wne 2987  ∃wrex 3107   ∖ cdif 3878   ⊆ wss 3881  {csn 4525  ‘cfv 6325  (class class class)co 7136  Basecbs 16478  .rcmulr 16561  Scalarcsca 16563   ·𝑠 cvsca 16564  0gc0g 16708  1rcur 19248  invrcinvr 19421  DivRingcdr 19499  LModclmod 19631  LSubSpclss 19700  LVecclvec 19871  LSAtomsclsa 36289  LFnlclfn 36372  LKerclk 36400  HLchlt 36665  LHypclh 37299  DVecHcdvh 38393  ocHcoch 38662 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5155  ax-sep 5168  ax-nul 5175  ax-pow 5232  ax-pr 5296  ax-un 7444  ax-cnex 10585  ax-resscn 10586  ax-1cn 10587  ax-icn 10588  ax-addcl 10589  ax-addrcl 10590  ax-mulcl 10591  ax-mulrcl 10592  ax-mulcom 10593  ax-addass 10594  ax-mulass 10595  ax-distr 10596  ax-i2m1 10597  ax-1ne0 10598  ax-1rid 10599  ax-rnegex 10600  ax-rrecex 10601  ax-cnre 10602  ax-pre-lttri 10603  ax-pre-lttrn 10604  ax-pre-ltadd 10605  ax-pre-mulgt0 10606  ax-riotaBAD 36268 This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-fal 1551  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-nel 3092  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-uni 4802  df-int 4840  df-iun 4884  df-iin 4885  df-br 5032  df-opab 5094  df-mpt 5112  df-tr 5138  df-id 5426  df-eprel 5431  df-po 5439  df-so 5440  df-fr 5479  df-we 5481  df-xp 5526  df-rel 5527  df-cnv 5528  df-co 5529  df-dm 5530  df-rn 5531  df-res 5532  df-ima 5533  df-pred 6117  df-ord 6163  df-on 6164  df-lim 6165  df-suc 6166  df-iota 6284  df-fun 6327  df-fn 6328  df-f 6329  df-f1 6330  df-fo 6331  df-f1o 6332  df-fv 6333  df-riota 7094  df-ov 7139  df-oprab 7140  df-mpo 7141  df-om 7564  df-1st 7674  df-2nd 7675  df-tpos 7878  df-undef 7925  df-wrecs 7933  df-recs 7994  df-rdg 8032  df-1o 8088  df-oadd 8092  df-er 8275  df-map 8394  df-en 8496  df-dom 8497  df-sdom 8498  df-fin 8499  df-pnf 10669  df-mnf 10670  df-xr 10671  df-ltxr 10672  df-le 10673  df-sub 10864  df-neg 10865  df-nn 11629  df-2 11691  df-3 11692  df-4 11693  df-5 11694  df-6 11695  df-n0 11889  df-z 11973  df-uz 12235  df-fz 12889  df-struct 16480  df-ndx 16481  df-slot 16482  df-base 16484  df-sets 16485  df-ress 16486  df-plusg 16573  df-mulr 16574  df-sca 16576  df-vsca 16577  df-0g 16710  df-proset 17533  df-poset 17551  df-plt 17563  df-lub 17579  df-glb 17580  df-join 17581  df-meet 17582  df-p0 17644  df-p1 17645  df-lat 17651  df-clat 17713  df-mgm 17847  df-sgrp 17896  df-mnd 17907  df-submnd 17952  df-grp 18101  df-minusg 18102  df-sbg 18103  df-subg 18272  df-cntz 18443  df-lsm 18757  df-cmn 18904  df-abl 18905  df-mgp 19237  df-ur 19249  df-ring 19296  df-oppr 19373  df-dvdsr 19391  df-unit 19392  df-invr 19422  df-dvr 19433  df-drng 19501  df-lmod 19633  df-lss 19701  df-lsp 19741  df-lvec 19872  df-lsatoms 36291  df-lshyp 36292  df-lfl 36373  df-lkr 36401  df-oposet 36491  df-ol 36493  df-oml 36494  df-covers 36581  df-ats 36582  df-atl 36613  df-cvlat 36637  df-hlat 36666  df-llines 36813  df-lplanes 36814  df-lvols 36815  df-lines 36816  df-psubsp 36818  df-pmap 36819  df-padd 37111  df-lhyp 37303  df-laut 37304  df-ldil 37419  df-ltrn 37420  df-trl 37474  df-tgrp 38058  df-tendo 38070  df-edring 38072  df-dveca 38318  df-disoa 38344  df-dvech 38394  df-dib 38454  df-dic 38488  df-dih 38544  df-doch 38663  df-djh 38710 This theorem is referenced by: (None)
 Copyright terms: Public domain W3C validator