lclkrlem2c - Mathbox for Norm Megill

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

Theorem lclkrlem2c 42140

Description: Lemma for lclkr 42164. (Contributed by NM, 16-Jan-2015.)

**Hypotheses**
Ref	Expression
lclkrlem2a.h	⊢ 𝐻 = (LHyp‘𝐾)
lclkrlem2a.o	⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
lclkrlem2a.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
lclkrlem2a.v	⊢ 𝑉 = (Base‘𝑈)
lclkrlem2a.z	⊢ 0 = (0_g‘𝑈)
lclkrlem2a.p	⊢ ⊕ = (LSSum‘𝑈)
lclkrlem2a.n	⊢ 𝑁 = (LSpan‘𝑈)
lclkrlem2a.a	⊢ 𝐴 = (LSAtoms‘𝑈)
lclkrlem2a.k	⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
lclkrlem2a.b	⊢ (𝜑 → 𝐵 ∈ (𝑉 ∖ { 0 }))
lclkrlem2a.x	⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
lclkrlem2a.y	⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
lclkrlem2a.e	⊢ (𝜑 → ( ⊥ ‘{𝑋}) ≠ ( ⊥ ‘{𝑌}))
lclkrlem2b.da	⊢ (𝜑 → (¬ 𝑋 ∈ ( ⊥ ‘{𝐵}) ∨ ¬ 𝑌 ∈ ( ⊥ ‘{𝐵})))
lclkrlem2c.j	⊢ 𝐽 = (LSHyp‘𝑈)

**Assertion**
Ref	Expression
lclkrlem2c	⊢ (𝜑 → ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ⊕ (𝑁‘{𝐵})) ∈ 𝐽)

**Proof of Theorem lclkrlem2c**
Step	Hyp	Ref	Expression
1		lclkrlem2a.h	. . . 4 ⊢ 𝐻 = (LHyp‘𝐾)
2		eqid 2765	. . . 4 ⊢ ((DIsoH‘𝐾)‘𝑊) = ((DIsoH‘𝐾)‘𝑊)
3		lclkrlem2a.u	. . . 4 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
4		lclkrlem2a.v	. . . 4 ⊢ 𝑉 = (Base‘𝑈)
5		lclkrlem2a.o	. . . 4 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊)
6		eqid 2765	. . . 4 ⊢ ((joinH‘𝐾)‘𝑊) = ((joinH‘𝐾)‘𝑊)
7		lclkrlem2a.k	. . . 4 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
8		lclkrlem2a.p	. . . . 5 ⊢ ⊕ = (LSSum‘𝑈)
9		lclkrlem2a.a	. . . . 5 ⊢ 𝐴 = (LSAtoms‘𝑈)
10		lclkrlem2a.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 }))
11	10	eldifad 3919	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
12		lclkrlem2a.n	. . . . . . 7 ⊢ 𝑁 = (LSpan‘𝑈)
13	1, 3, 4, 12, 2	dihlsprn 41962	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝑉) → (𝑁‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
14	7, 11, 13	syl2anc 595	. . . . 5 ⊢ (𝜑 → (𝑁‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
15		lclkrlem2a.z	. . . . . 6 ⊢ 0 = (0_g‘𝑈)
16	1, 3, 7	dvhlmod 41741	. . . . . 6 ⊢ (𝜑 → 𝑈 ∈ LMod)
17		lclkrlem2a.y	. . . . . 6 ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 }))
18	4, 12, 15, 9, 16, 17	lsatlspsn 39624	. . . . 5 ⊢ (𝜑 → (𝑁‘{𝑌}) ∈ 𝐴)
19	1, 2, 3, 8, 9, 7, 14, 18	dihsmatrn 42067	. . . 4 ⊢ (𝜑 → ((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) ∈ ran ((DIsoH‘𝐾)‘𝑊))
20		lclkrlem2a.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ (𝑉 ∖ { 0 }))
21	20	eldifad 3919	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
22	21	snssd 4748	. . . . 5 ⊢ (𝜑 → {𝐵} ⊆ 𝑉)
23	1, 2, 3, 4, 5	dochcl 41984	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝐵} ⊆ 𝑉) → ( ⊥ ‘{𝐵}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
24	7, 22, 23	syl2anc 595	. . . 4 ⊢ (𝜑 → ( ⊥ ‘{𝐵}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
25	1, 2, 3, 4, 5, 6, 7, 19, 24	dochdmm1 42041	. . 3 ⊢ (𝜑 → ( ⊥ ‘(((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) ∩ ( ⊥ ‘{𝐵}))) = (( ⊥ ‘((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})))((joinH‘𝐾)‘𝑊)( ⊥ ‘( ⊥ ‘{𝐵}))))
26	17	eldifad 3919	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ 𝑉)
27	4, 12, 8, 16, 11, 26	lsmpr 21176	. . . . . . 7 ⊢ (𝜑 → (𝑁‘{𝑋, 𝑌}) = ((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})))
28		df-pr 4588	. . . . . . . 8 ⊢ {𝑋, 𝑌} = ({𝑋} ∪ {𝑌})
29	28	fveq2i 6874	. . . . . . 7 ⊢ (𝑁‘{𝑋, 𝑌}) = (𝑁‘({𝑋} ∪ {𝑌}))
30	27, 29	eqtr3di 2815	. . . . . 6 ⊢ (𝜑 → ((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) = (𝑁‘({𝑋} ∪ {𝑌})))
31	30	fveq2d 6875	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌}))) = ( ⊥ ‘(𝑁‘({𝑋} ∪ {𝑌}))))
32	11	snssd 4748	. . . . . . 7 ⊢ (𝜑 → {𝑋} ⊆ 𝑉)
33	26	snssd 4748	. . . . . . 7 ⊢ (𝜑 → {𝑌} ⊆ 𝑉)
34	32, 33	unssd 4147	. . . . . 6 ⊢ (𝜑 → ({𝑋} ∪ {𝑌}) ⊆ 𝑉)
35	1, 3, 5, 4, 12, 7, 34	dochocsp 42010	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘(𝑁‘({𝑋} ∪ {𝑌}))) = ( ⊥ ‘({𝑋} ∪ {𝑌})))
36	1, 3, 4, 5	dochdmj1 42021	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝑋} ⊆ 𝑉 ∧ {𝑌} ⊆ 𝑉) → ( ⊥ ‘({𝑋} ∪ {𝑌})) = (( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})))
37	7, 32, 33, 36	syl3anc 1394	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘({𝑋} ∪ {𝑌})) = (( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})))
38	31, 35, 37	3eqtrd 2804	. . . 4 ⊢ (𝜑 → ( ⊥ ‘((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌}))) = (( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})))
39	1, 3, 5, 4, 12, 7, 21	dochocsn 42012	. . . 4 ⊢ (𝜑 → ( ⊥ ‘( ⊥ ‘{𝐵})) = (𝑁‘{𝐵}))
40	38, 39	oveq12d 7418	. . 3 ⊢ (𝜑 → (( ⊥ ‘((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})))((joinH‘𝐾)‘𝑊)( ⊥ ‘( ⊥ ‘{𝐵}))) = ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌}))((joinH‘𝐾)‘𝑊)(𝑁‘{𝐵})))
41	1, 2, 3, 4, 5	dochcl 41984	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝑋} ⊆ 𝑉) → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
42	7, 32, 41	syl2anc 595	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
43	1, 2, 3, 4, 5	dochcl 41984	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ {𝑌} ⊆ 𝑉) → ( ⊥ ‘{𝑌}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
44	7, 33, 43	syl2anc 595	. . . . 5 ⊢ (𝜑 → ( ⊥ ‘{𝑌}) ∈ ran ((DIsoH‘𝐾)‘𝑊))
45	1, 2	dihmeetcl 41976	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (( ⊥ ‘{𝑋}) ∈ ran ((DIsoH‘𝐾)‘𝑊) ∧ ( ⊥ ‘{𝑌}) ∈ ran ((DIsoH‘𝐾)‘𝑊))) → (( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ∈ ran ((DIsoH‘𝐾)‘𝑊))
46	7, 42, 44, 45	syl12anc 849	. . . 4 ⊢ (𝜑 → (( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ∈ ran ((DIsoH‘𝐾)‘𝑊))
47	1, 3, 4, 8, 12, 2, 6, 7, 46, 21	dihjat1 42060	. . 3 ⊢ (𝜑 → ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌}))((joinH‘𝐾)‘𝑊)(𝑁‘{𝐵})) = ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ⊕ (𝑁‘{𝐵})))
48	25, 40, 47	3eqtrrd 2805	. 2 ⊢ (𝜑 → ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ⊕ (𝑁‘{𝐵})) = ( ⊥ ‘(((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) ∩ ( ⊥ ‘{𝐵}))))
49		lclkrlem2c.j	. . 3 ⊢ 𝐽 = (LSHyp‘𝑈)
50		lclkrlem2a.e	. . . 4 ⊢ (𝜑 → ( ⊥ ‘{𝑋}) ≠ ( ⊥ ‘{𝑌}))
51		lclkrlem2b.da	. . . 4 ⊢ (𝜑 → (¬ 𝑋 ∈ ( ⊥ ‘{𝐵}) ∨ ¬ 𝑌 ∈ ( ⊥ ‘{𝐵})))
52	1, 5, 3, 4, 15, 8, 12, 9, 7, 20, 10, 17, 50, 51	lclkrlem2b 42139	. . 3 ⊢ (𝜑 → (((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) ∩ ( ⊥ ‘{𝐵})) ∈ 𝐴)
53	1, 3, 5, 9, 49, 7, 52	dochsatshp 42082	. 2 ⊢ (𝜑 → ( ⊥ ‘(((𝑁‘{𝑋}) ⊕ (𝑁‘{𝑌})) ∩ ( ⊥ ‘{𝐵}))) ∈ 𝐽)
54	48, 53	eqeltrd 2865	1 ⊢ (𝜑 → ((( ⊥ ‘{𝑋}) ∩ ( ⊥ ‘{𝑌})) ⊕ (𝑁‘{𝐵})) ∈ 𝐽)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 400 ∨ wo 860 = wceq 1563 ∈ wcel 2145 ≠ wne 2960 ∖ cdif 3904 ∪ cun 3905 ∩ cin 3906 ⊆ wss 3907 {csn 4585 {cpr 4587 ran crn 5652 ‘cfv 6525 (class class class)co 7400 Basecbs 17257 0_gc0g 17480 LSSumclsm 19692 LSpanclspn 21058 LSAtomsclsa 39605 LSHypclsh 39606 HLchlt 39981 LHypclh 40615 DVecHcdvh 41709 DIsoHcdih 41859 ocHcoch 41978 joinHcdjh 42025

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1818 ax-4 1832 ax-5 1933 ax-6 1990 ax-7 2031 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2215 ax-ext 2737 ax-rep 5231 ax-sep 5250 ax-nul 5260 ax-pow 5326 ax-pr 5394 ax-un 7722 ax-cnex 11144 ax-resscn 11145 ax-1cn 11146 ax-icn 11147 ax-addcl 11148 ax-addrcl 11149 ax-mulcl 11150 ax-mulrcl 11151 ax-mulcom 11152 ax-addass 11153 ax-mulass 11154 ax-distr 11155 ax-i2m1 11156 ax-1ne0 11157 ax-1rid 11158 ax-rnegex 11159 ax-rrecex 11160 ax-cnre 11161 ax-pre-lttri 11162 ax-pre-lttrn 11163 ax-pre-ltadd 11164 ax-pre-mulgt0 11165 ax-riotaBAD 39584

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1566 df-fal 1576 df-ex 1803 df-nf 1807 df-sb 2094 df-mo 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3370 df-reu 3371 df-rab 3418 df-v 3459 df-sbc 3748 df-csb 3856 df-dif 3910 df-un 3912 df-in 3914 df-ss 3924 df-pss 3927 df-nul 4289 df-if 4484 df-pw 4560 df-sn 4586 df-pr 4588 df-tp 4590 df-op 4592 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 df-br 5105 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5546 df-eprel 5551 df-po 5559 df-so 5560 df-fr 5604 df-we 5606 df-xp 5657 df-rel 5658 df-cnv 5659 df-co 5660 df-dm 5661 df-rn 5662 df-res 5663 df-ima 5664 df-pred 6291 df-ord 6352 df-on 6353 df-lim 6354 df-suc 6355 df-iota 6481 df-fun 6527 df-fn 6528 df-f 6529 df-f1 6530 df-fo 6531 df-f1o 6532 df-fv 6533 df-riota 7357 df-ov 7403 df-oprab 7404 df-mpo 7405 df-om 7851 df-1st 7974 df-2nd 7975 df-tpos 8210 df-undef 8257 df-frecs 8266 df-wrecs 8297 df-recs 8346 df-rdg 8385 df-1o 8441 df-2o 8442 df-er 8682 df-map 8814 df-en 8932 df-dom 8933 df-sdom 8934 df-fin 8935 df-pnf 11233 df-mnf 11234 df-xr 11235 df-ltxr 11236 df-le 11237 df-sub 11431 df-neg 11432 df-nn 12222 df-2 12291 df-3 12292 df-4 12293 df-5 12294 df-6 12295 df-n0 12493 df-z 12580 df-uz 12851 df-fz 13524 df-struct 17195 df-sets 17212 df-slot 17230 df-ndx 17242 df-base 17258 df-ress 17279 df-plusg 17311 df-mulr 17312 df-sca 17314 df-vsca 17315 df-0g 17482 df-mre 17626 df-mrc 17627 df-acs 17629 df-proset 18338 df-poset 18357 df-plt 18372 df-lub 18388 df-glb 18389 df-join 18390 df-meet 18391 df-p0 18467 df-p1 18468 df-lat 18476 df-clat 18543 df-mgm 18686 df-sgrp 18765 df-mnd 18781 df-submnd 18830 df-grp 18991 df-minusg 18992 df-sbg 18993 df-subg 19177 df-cntz 19375 df-oppg 19404 df-lsm 19694 df-cmn 19840 df-abl 19841 df-mgp 20205 df-rng 20219 df-ur 20252 df-ring 20305 df-oppr 20407 df-dvdsr 20427 df-unit 20428 df-invr 20458 df-dvr 20471 df-drng 20803 df-lmod 20949 df-lss 21019 df-lsp 21059 df-lvec 21190 df-lsatoms 39607 df-lshyp 39608 df-lcv 39650 df-oposet 39807 df-ol 39809 df-oml 39810 df-covers 39897 df-ats 39898 df-atl 39929 df-cvlat 39953 df-hlat 39982 df-llines 40129 df-lplanes 40130 df-lvols 40131 df-lines 40132 df-psubsp 40134 df-pmap 40135 df-padd 40427 df-lhyp 40619 df-laut 40620 df-ldil 40735 df-ltrn 40736 df-trl 40790 df-tgrp 41374 df-tendo 41386 df-edring 41388 df-dveca 41634 df-disoa 41660 df-dvech 41710 df-dib 41770 df-dic 41804 df-dih 41860 df-doch 41979 df-djh 42026

This theorem is referenced by: lclkrlem2g 42144

W3C validator