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

Theorem hdmap10lem 41312
Description: Lemma for hdmap10 41313. (Contributed by NM, 17-May-2015.)
Hypotheses
Ref Expression
hdmap10.h 𝐻 = (LHyp‘𝐾)
hdmap10.u 𝑈 = ((DVecH‘𝐾)‘𝑊)
hdmap10.v 𝑉 = (Base‘𝑈)
hdmap10.n 𝑁 = (LSpan‘𝑈)
hdmap10.c 𝐶 = ((LCDual‘𝐾)‘𝑊)
hdmap10.l 𝐿 = (LSpan‘𝐶)
hdmap10.m 𝑀 = ((mapd‘𝐾)‘𝑊)
hdmap10.s 𝑆 = ((HDMap‘𝐾)‘𝑊)
hdmap10.k (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
hdmap10.e 𝐸 = ⟨( I ↾ (Base‘𝐾)), ( I ↾ ((LTrn‘𝐾)‘𝑊))⟩
hdmap10.o 0 = (0g𝑈)
hdmap10.d 𝐷 = (Base‘𝐶)
hdmap10.j 𝐽 = ((HVMap‘𝐾)‘𝑊)
hdmap10.i 𝐼 = ((HDMap1‘𝐾)‘𝑊)
hdmap10lem.t (𝜑𝑇 ∈ (𝑉 ∖ { 0 }))
Assertion
Ref Expression
hdmap10lem (𝜑 → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)}))

Proof of Theorem hdmap10lem
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 hdmap10.h . . 3 𝐻 = (LHyp‘𝐾)
2 hdmap10.u . . 3 𝑈 = ((DVecH‘𝐾)‘𝑊)
3 hdmap10.v . . 3 𝑉 = (Base‘𝑈)
4 hdmap10.n . . 3 𝑁 = (LSpan‘𝑈)
5 hdmap10.k . . 3 (𝜑 → (𝐾 ∈ HL ∧ 𝑊𝐻))
6 eqid 2728 . . . . 5 (Base‘𝐾) = (Base‘𝐾)
7 eqid 2728 . . . . 5 ((LTrn‘𝐾)‘𝑊) = ((LTrn‘𝐾)‘𝑊)
8 hdmap10.o . . . . 5 0 = (0g𝑈)
9 hdmap10.e . . . . 5 𝐸 = ⟨( I ↾ (Base‘𝐾)), ( I ↾ ((LTrn‘𝐾)‘𝑊))⟩
101, 6, 7, 2, 3, 8, 9, 5dvheveccl 40585 . . . 4 (𝜑𝐸 ∈ (𝑉 ∖ { 0 }))
1110eldifad 3959 . . 3 (𝜑𝐸𝑉)
12 hdmap10lem.t . . . 4 (𝜑𝑇 ∈ (𝑉 ∖ { 0 }))
1312eldifad 3959 . . 3 (𝜑𝑇𝑉)
141, 2, 3, 4, 5, 11, 13dvh3dim 40919 . 2 (𝜑 → ∃𝑥𝑉 ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}))
15 hdmap10.c . . . . . . 7 𝐶 = ((LCDual‘𝐾)‘𝑊)
16 hdmap10.d . . . . . . 7 𝐷 = (Base‘𝐶)
17 hdmap10.j . . . . . . 7 𝐽 = ((HVMap‘𝐾)‘𝑊)
18 hdmap10.i . . . . . . 7 𝐼 = ((HDMap1‘𝐾)‘𝑊)
19 hdmap10.s . . . . . . 7 𝑆 = ((HDMap‘𝐾)‘𝑊)
2053ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐾 ∈ HL ∧ 𝑊𝐻))
21133ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑇𝑉)
22 simp2 1135 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑥𝑉)
23 eqid 2728 . . . . . . . . . . . 12 (LSubSp‘𝑈) = (LSubSp‘𝑈)
241, 2, 5dvhlmod 40583 . . . . . . . . . . . 12 (𝜑𝑈 ∈ LMod)
253, 23, 4, 24, 11, 13lspprcl 20862 . . . . . . . . . . . 12 (𝜑 → (𝑁‘{𝐸, 𝑇}) ∈ (LSubSp‘𝑈))
263, 4, 24, 11, 13lspprid1 20881 . . . . . . . . . . . 12 (𝜑𝐸 ∈ (𝑁‘{𝐸, 𝑇}))
2723, 4, 24, 25, 26lspsnel5a 20880 . . . . . . . . . . 11 (𝜑 → (𝑁‘{𝐸}) ⊆ (𝑁‘{𝐸, 𝑇}))
283, 4, 24, 11, 13lspprid2 20882 . . . . . . . . . . . 12 (𝜑𝑇 ∈ (𝑁‘{𝐸, 𝑇}))
2923, 4, 24, 25, 28lspsnel5a 20880 . . . . . . . . . . 11 (𝜑 → (𝑁‘{𝑇}) ⊆ (𝑁‘{𝐸, 𝑇}))
3027, 29unssd 4186 . . . . . . . . . 10 (𝜑 → ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})) ⊆ (𝑁‘{𝐸, 𝑇}))
3130sseld 3979 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})) → 𝑥 ∈ (𝑁‘{𝐸, 𝑇})))
3231con3dimp 408 . . . . . . . 8 ((𝜑 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})))
33323adant2 1129 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ ((𝑁‘{𝐸}) ∪ (𝑁‘{𝑇})))
341, 9, 2, 3, 4, 15, 16, 17, 18, 19, 20, 21, 22, 33hdmapval2 41305 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑆𝑇) = (𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩), 𝑇⟩))
3534eqcomd 2734 . . . . 5 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩), 𝑇⟩) = (𝑆𝑇))
36 eqid 2728 . . . . . 6 (-g𝑈) = (-g𝑈)
37 eqid 2728 . . . . . 6 (-g𝐶) = (-g𝐶)
38 hdmap10.l . . . . . 6 𝐿 = (LSpan‘𝐶)
39 hdmap10.m . . . . . 6 𝑀 = ((mapd‘𝐾)‘𝑊)
40243ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑈 ∈ LMod)
41253ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝐸, 𝑇}) ∈ (LSubSp‘𝑈))
42 simp3 1136 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}))
438, 23, 40, 41, 22, 42lssneln0 20837 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑥 ∈ (𝑉 ∖ { 0 }))
44 eqid 2728 . . . . . . . . . 10 (0g𝐶) = (0g𝐶)
451, 2, 3, 8, 15, 16, 44, 17, 5, 10hvmapcl2 41239 . . . . . . . . 9 (𝜑 → (𝐽𝐸) ∈ (𝐷 ∖ {(0g𝐶)}))
4645eldifad 3959 . . . . . . . 8 (𝜑 → (𝐽𝐸) ∈ 𝐷)
47463ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐽𝐸) ∈ 𝐷)
481, 2, 3, 8, 4, 15, 38, 39, 17, 5, 10mapdhvmap 41242 . . . . . . . 8 (𝜑 → (𝑀‘(𝑁‘{𝐸})) = (𝐿‘{(𝐽𝐸)}))
49483ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝐸})) = (𝐿‘{(𝐽𝐸)}))
501, 2, 5dvhlvec 40582 . . . . . . . . . . 11 (𝜑𝑈 ∈ LVec)
51503ad2ant1 1131 . . . . . . . . . 10 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑈 ∈ LVec)
52113ad2ant1 1131 . . . . . . . . . 10 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝐸𝑉)
533, 4, 51, 22, 52, 21, 42lspindpi 21020 . . . . . . . . 9 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑁‘{𝑥}) ≠ (𝑁‘{𝐸}) ∧ (𝑁‘{𝑥}) ≠ (𝑁‘{𝑇})))
5453simpld 494 . . . . . . . 8 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝑥}) ≠ (𝑁‘{𝐸}))
5554necomd 2993 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝐸}) ≠ (𝑁‘{𝑥}))
56103ad2ant1 1131 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝐸 ∈ (𝑉 ∖ { 0 }))
571, 2, 3, 8, 4, 15, 16, 38, 39, 18, 20, 47, 49, 55, 56, 22hdmap1cl 41277 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩) ∈ 𝐷)
58123ad2ant1 1131 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → 𝑇 ∈ (𝑉 ∖ { 0 }))
591, 2, 3, 15, 16, 19, 5, 13hdmapcl 41303 . . . . . . 7 (𝜑 → (𝑆𝑇) ∈ 𝐷)
60593ad2ant1 1131 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑆𝑇) ∈ 𝐷)
6153simprd 495 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑁‘{𝑥}) ≠ (𝑁‘{𝑇}))
62 eqid 2728 . . . . . . . 8 (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩) = (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)
631, 2, 3, 36, 8, 4, 15, 16, 37, 38, 39, 18, 20, 56, 47, 43, 57, 55, 49hdmap1eq 41274 . . . . . . . 8 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩) = (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩) ↔ ((𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)}) ∧ (𝑀‘(𝑁‘{(𝐸(-g𝑈)𝑥)})) = (𝐿‘{((𝐽𝐸)(-g𝐶)(𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩))}))))
6462, 63mpbii 232 . . . . . . 7 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)}) ∧ (𝑀‘(𝑁‘{(𝐸(-g𝑈)𝑥)})) = (𝐿‘{((𝐽𝐸)(-g𝐶)(𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩))})))
6564simpld 494 . . . . . 6 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝑥})) = (𝐿‘{(𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)}))
661, 2, 3, 36, 8, 4, 15, 16, 37, 38, 39, 18, 20, 43, 57, 58, 60, 61, 65hdmap1eq 41274 . . . . 5 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝐼‘⟨𝑥, (𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩), 𝑇⟩) = (𝑆𝑇) ↔ ((𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)}) ∧ (𝑀‘(𝑁‘{(𝑥(-g𝑈)𝑇)})) = (𝐿‘{((𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)(-g𝐶)(𝑆𝑇))}))))
6735, 66mpbid 231 . . . 4 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → ((𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)}) ∧ (𝑀‘(𝑁‘{(𝑥(-g𝑈)𝑇)})) = (𝐿‘{((𝐼‘⟨𝐸, (𝐽𝐸), 𝑥⟩)(-g𝐶)(𝑆𝑇))})))
6867simpld 494 . . 3 ((𝜑𝑥𝑉 ∧ ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇})) → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)}))
6968rexlimdv3a 3156 . 2 (𝜑 → (∃𝑥𝑉 ¬ 𝑥 ∈ (𝑁‘{𝐸, 𝑇}) → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)})))
7014, 69mpd 15 1 (𝜑 → (𝑀‘(𝑁‘{𝑇})) = (𝐿‘{(𝑆𝑇)}))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1085   = wceq 1534  wcel 2099  wne 2937  wrex 3067  cdif 3944  cun 3945  {csn 4629  {cpr 4631  cop 4635  cotp 4637   I cid 5575  cres 5680  cfv 6548  (class class class)co 7420  Basecbs 17180  0gc0g 17421  -gcsg 18892  LModclmod 20743  LSubSpclss 20815  LSpanclspn 20855  LVecclvec 20987  HLchlt 38822  LHypclh 39457  LTrncltrn 39574  DVecHcdvh 40551  LCDualclcd 41059  mapdcmpd 41097  HVMapchvm 41229  HDMap1chdma1 41264  HDMapchdma 41265
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2699  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5365  ax-pr 5429  ax-un 7740  ax-cnex 11195  ax-resscn 11196  ax-1cn 11197  ax-icn 11198  ax-addcl 11199  ax-addrcl 11200  ax-mulcl 11201  ax-mulrcl 11202  ax-mulcom 11203  ax-addass 11204  ax-mulass 11205  ax-distr 11206  ax-i2m1 11207  ax-1ne0 11208  ax-1rid 11209  ax-rnegex 11210  ax-rrecex 11211  ax-cnre 11212  ax-pre-lttri 11213  ax-pre-lttrn 11214  ax-pre-ltadd 11215  ax-pre-mulgt0 11216  ax-riotaBAD 38425
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2530  df-eu 2559  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2938  df-nel 3044  df-ral 3059  df-rex 3068  df-rmo 3373  df-reu 3374  df-rab 3430  df-v 3473  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-tp 4634  df-op 4636  df-ot 4638  df-uni 4909  df-int 4950  df-iun 4998  df-iin 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5576  df-eprel 5582  df-po 5590  df-so 5591  df-fr 5633  df-we 5635  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-pred 6305  df-ord 6372  df-on 6373  df-lim 6374  df-suc 6375  df-iota 6500  df-fun 6550  df-fn 6551  df-f 6552  df-f1 6553  df-fo 6554  df-f1o 6555  df-fv 6556  df-riota 7376  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7685  df-om 7871  df-1st 7993  df-2nd 7994  df-tpos 8232  df-undef 8279  df-frecs 8287  df-wrecs 8318  df-recs 8392  df-rdg 8431  df-1o 8487  df-er 8725  df-map 8847  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-pnf 11281  df-mnf 11282  df-xr 11283  df-ltxr 11284  df-le 11285  df-sub 11477  df-neg 11478  df-nn 12244  df-2 12306  df-3 12307  df-4 12308  df-5 12309  df-6 12310  df-n0 12504  df-z 12590  df-uz 12854  df-fz 13518  df-struct 17116  df-sets 17133  df-slot 17151  df-ndx 17163  df-base 17181  df-ress 17210  df-plusg 17246  df-mulr 17247  df-sca 17249  df-vsca 17250  df-0g 17423  df-mre 17566  df-mrc 17567  df-acs 17569  df-proset 18287  df-poset 18305  df-plt 18322  df-lub 18338  df-glb 18339  df-join 18340  df-meet 18341  df-p0 18417  df-p1 18418  df-lat 18424  df-clat 18491  df-mgm 18600  df-sgrp 18679  df-mnd 18695  df-submnd 18741  df-grp 18893  df-minusg 18894  df-sbg 18895  df-subg 19078  df-cntz 19268  df-oppg 19297  df-lsm 19591  df-cmn 19737  df-abl 19738  df-mgp 20075  df-rng 20093  df-ur 20122  df-ring 20175  df-oppr 20273  df-dvdsr 20296  df-unit 20297  df-invr 20327  df-dvr 20340  df-drng 20626  df-lmod 20745  df-lss 20816  df-lsp 20856  df-lvec 20988  df-lsatoms 38448  df-lshyp 38449  df-lcv 38491  df-lfl 38530  df-lkr 38558  df-ldual 38596  df-oposet 38648  df-ol 38650  df-oml 38651  df-covers 38738  df-ats 38739  df-atl 38770  df-cvlat 38794  df-hlat 38823  df-llines 38971  df-lplanes 38972  df-lvols 38973  df-lines 38974  df-psubsp 38976  df-pmap 38977  df-padd 39269  df-lhyp 39461  df-laut 39462  df-ldil 39577  df-ltrn 39578  df-trl 39632  df-tgrp 40216  df-tendo 40228  df-edring 40230  df-dveca 40476  df-disoa 40502  df-dvech 40552  df-dib 40612  df-dic 40646  df-dih 40702  df-doch 40821  df-djh 40868  df-lcdual 41060  df-mapd 41098  df-hvmap 41230  df-hdmap1 41266  df-hdmap 41267
This theorem is referenced by:  hdmap10  41313
  Copyright terms: Public domain W3C validator
OSZAR »