dihmeetlem9N - Mathbox for Norm Megill

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

Theorem dihmeetlem9N 41304

Description: Lemma for isomorphism H of a lattice meet. (Contributed by NM, 6-Apr-2014.) (New usage is discouraged.)

**Hypotheses**
Ref	Expression
dihmeetlem9.b	⊢ 𝐵 = (Base‘𝐾)
dihmeetlem9.l	⊢ ≤ = (le‘𝐾)
dihmeetlem9.h	⊢ 𝐻 = (LHyp‘𝐾)
dihmeetlem9.j	⊢ ∨ = (join‘𝐾)
dihmeetlem9.m	⊢ ∧ = (meet‘𝐾)
dihmeetlem9.a	⊢ 𝐴 = (Atoms‘𝐾)
dihmeetlem9.u	⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
dihmeetlem9.s	⊢ ⊕ = (LSSum‘𝑈)
dihmeetlem9.i	⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)

**Assertion**
Ref	Expression
dihmeetlem9N	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))))

**Proof of Theorem dihmeetlem9N**
Step	Hyp	Ref	Expression
1		dihmeetlem9.h	. . . . . 6 ⊢ 𝐻 = (LHyp‘𝐾)
2		dihmeetlem9.u	. . . . . 6 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
3		simp1 1136	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
4	1, 2, 3	dvhlmod 41099	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ LMod)
5		eqid 2730	. . . . . 6 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
6	5	lsssssubg 20870	. . . . 5 ⊢ (𝑈 ∈ LMod → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
7	4, 6	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
8		simp1l 1198	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ HL)
9	8	hllatd 39352	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ Lat)
10		simp2l 1200	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑋 ∈ 𝐵)
11		simp2r 1201	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑌 ∈ 𝐵)
12		dihmeetlem9.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
13		dihmeetlem9.m	. . . . . . 7 ⊢ ∧ = (meet‘𝐾)
14	12, 13	latmcl 18405	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ∈ 𝐵)
15	9, 10, 11, 14	syl3anc 1373	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ∈ 𝐵)
16		dihmeetlem9.i	. . . . . 6 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
17	12, 1, 16, 2, 5	dihlss 41239	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
18	3, 15, 17	syl2anc 584	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
19	7, 18	sseldd 3949	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈))
20		dihmeetlem9.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
21	12, 20	atbase 39277	. . . . . 6 ⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵)
22	21	3ad2ant3 1135	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ 𝐵)
23	12, 1, 16, 2, 5	dihlss 41239	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑝 ∈ 𝐵) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
24	3, 22, 23	syl2anc 584	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
25	7, 24	sseldd 3949	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (SubGrp‘𝑈))
26	12, 1, 16, 2, 5	dihlss 41239	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑌 ∈ 𝐵) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
27	3, 11, 26	syl2anc 584	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
28	7, 27	sseldd 3949	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (SubGrp‘𝑈))
29		dihmeetlem9.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
30	12, 29, 13	latmle2 18430	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ≤ 𝑌)
31	9, 10, 11, 30	syl3anc 1373	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ≤ 𝑌)
32	12, 29, 1, 16	dihord 41253	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
33	3, 15, 11, 32	syl3anc 1373	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
34	31, 33	mpbird 257	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌))
35		dihmeetlem9.s	. . . 4 ⊢ ⊕ = (LSSum‘𝑈)
36	35	lsmmod 19611	. . 3 ⊢ ((((𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑌) ∈ (SubGrp‘𝑈)) ∧ (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
37	19, 25, 28, 34, 36	syl31anc 1375	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
38		lmodabl 20821	. . . . 5 ⊢ (𝑈 ∈ LMod → 𝑈 ∈ Abel)
39	4, 38	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ Abel)
40	35	lsmcom 19794	. . . 4 ⊢ ((𝑈 ∈ Abel ∧ (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
41	39, 19, 25, 40	syl3anc 1373	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
42	41	ineq1d 4184	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)) = (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)))
43	37, 42	eqtr2d 2766	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ∩ cin 3915 ⊆ wss 3916 class class class wbr 5109 ‘cfv 6513 (class class class)co 7389 Basecbs 17185 lecple 17233 joincjn 18278 meetcmee 18279 Latclat 18396 SubGrpcsubg 19058 LSSumclsm 19570 Abelcabl 19717 LModclmod 20772 LSubSpclss 20843 Atomscatm 39251 HLchlt 39338 LHypclh 39973 DVecHcdvh 41067 DIsoHcdih 41217

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-rep 5236 ax-sep 5253 ax-nul 5263 ax-pow 5322 ax-pr 5389 ax-un 7713 ax-cnex 11130 ax-resscn 11131 ax-1cn 11132 ax-icn 11133 ax-addcl 11134 ax-addrcl 11135 ax-mulcl 11136 ax-mulrcl 11137 ax-mulcom 11138 ax-addass 11139 ax-mulass 11140 ax-distr 11141 ax-i2m1 11142 ax-1ne0 11143 ax-1rid 11144 ax-rnegex 11145 ax-rrecex 11146 ax-cnre 11147 ax-pre-lttri 11148 ax-pre-lttrn 11149 ax-pre-ltadd 11150 ax-pre-mulgt0 11151 ax-riotaBAD 38941

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3756 df-csb 3865 df-dif 3919 df-un 3921 df-in 3923 df-ss 3933 df-pss 3936 df-nul 4299 df-if 4491 df-pw 4567 df-sn 4592 df-pr 4594 df-tp 4596 df-op 4598 df-uni 4874 df-int 4913 df-iun 4959 df-iin 4960 df-br 5110 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5535 df-eprel 5540 df-po 5548 df-so 5549 df-fr 5593 df-we 5595 df-xp 5646 df-rel 5647 df-cnv 5648 df-co 5649 df-dm 5650 df-rn 5651 df-res 5652 df-ima 5653 df-pred 6276 df-ord 6337 df-on 6338 df-lim 6339 df-suc 6340 df-iota 6466 df-fun 6515 df-fn 6516 df-f 6517 df-f1 6518 df-fo 6519 df-f1o 6520 df-fv 6521 df-riota 7346 df-ov 7392 df-oprab 7393 df-mpo 7394 df-om 7845 df-1st 7970 df-2nd 7971 df-tpos 8207 df-undef 8254 df-frecs 8262 df-wrecs 8293 df-recs 8342 df-rdg 8380 df-1o 8436 df-2o 8437 df-er 8673 df-map 8803 df-en 8921 df-dom 8922 df-sdom 8923 df-fin 8924 df-pnf 11216 df-mnf 11217 df-xr 11218 df-ltxr 11219 df-le 11220 df-sub 11413 df-neg 11414 df-nn 12188 df-2 12250 df-3 12251 df-4 12252 df-5 12253 df-6 12254 df-n0 12449 df-z 12536 df-uz 12800 df-fz 13475 df-struct 17123 df-sets 17140 df-slot 17158 df-ndx 17170 df-base 17186 df-ress 17207 df-plusg 17239 df-mulr 17240 df-sca 17242 df-vsca 17243 df-0g 17410 df-mre 17553 df-mrc 17554 df-acs 17556 df-proset 18261 df-poset 18280 df-plt 18295 df-lub 18311 df-glb 18312 df-join 18313 df-meet 18314 df-p0 18390 df-p1 18391 df-lat 18397 df-clat 18464 df-mgm 18573 df-sgrp 18652 df-mnd 18668 df-submnd 18717 df-grp 18874 df-minusg 18875 df-sbg 18876 df-subg 19061 df-cntz 19255 df-lsm 19572 df-cmn 19718 df-abl 19719 df-mgp 20056 df-rng 20068 df-ur 20097 df-ring 20150 df-oppr 20252 df-dvdsr 20272 df-unit 20273 df-invr 20303 df-dvr 20316 df-drng 20646 df-lmod 20774 df-lss 20844 df-lsp 20884 df-lvec 21016 df-oposet 39164 df-ol 39166 df-oml 39167 df-covers 39254 df-ats 39255 df-atl 39286 df-cvlat 39310 df-hlat 39339 df-llines 39487 df-lplanes 39488 df-lvols 39489 df-lines 39490 df-psubsp 39492 df-pmap 39493 df-padd 39785 df-lhyp 39977 df-laut 39978 df-ldil 40093 df-ltrn 40094 df-trl 40148 df-tendo 40744 df-edring 40746 df-disoa 41018 df-dvech 41068 df-dib 41128 df-dic 41162 df-dih 41218

This theorem is referenced by: dihmeetlem12N 41307

W3C validator