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 37469

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 1127	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
4	1, 2, 3	dvhlmod 37264	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ LMod)
5		eqid 2778	. . . . . 6 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
6	5	lsssssubg 19353	. . . . 5 ⊢ (𝑈 ∈ LMod → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
7	4, 6	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
8		simp1l 1211	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ HL)
9	8	hllatd 35518	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ Lat)
10		simp2l 1213	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑋 ∈ 𝐵)
11		simp2r 1214	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑌 ∈ 𝐵)
12		dihmeetlem9.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
13		dihmeetlem9.m	. . . . . . 7 ⊢ ∧ = (meet‘𝐾)
14	12, 13	latmcl 17438	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ∈ 𝐵)
15	9, 10, 11, 14	syl3anc 1439	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ∈ 𝐵)
16		dihmeetlem9.i	. . . . . 6 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
17	12, 1, 16, 2, 5	dihlss 37404	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
18	3, 15, 17	syl2anc 579	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
19	7, 18	sseldd 3822	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈))
20		dihmeetlem9.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
21	12, 20	atbase 35443	. . . . . 6 ⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵)
22	21	3ad2ant3 1126	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ 𝐵)
23	12, 1, 16, 2, 5	dihlss 37404	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑝 ∈ 𝐵) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
24	3, 22, 23	syl2anc 579	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
25	7, 24	sseldd 3822	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (SubGrp‘𝑈))
26	12, 1, 16, 2, 5	dihlss 37404	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑌 ∈ 𝐵) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
27	3, 11, 26	syl2anc 579	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
28	7, 27	sseldd 3822	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (SubGrp‘𝑈))
29		dihmeetlem9.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
30	12, 29, 13	latmle2 17463	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ≤ 𝑌)
31	9, 10, 11, 30	syl3anc 1439	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ≤ 𝑌)
32	12, 29, 1, 16	dihord 37418	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
33	3, 15, 11, 32	syl3anc 1439	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
34	31, 33	mpbird 249	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌))
35		dihmeetlem9.s	. . . 4 ⊢ ⊕ = (LSSum‘𝑈)
36	35	lsmmod 18472	. . 3 ⊢ ((((𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑌) ∈ (SubGrp‘𝑈)) ∧ (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
37	19, 25, 28, 34, 36	syl31anc 1441	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
38		lmodabl 19302	. . . . 5 ⊢ (𝑈 ∈ LMod → 𝑈 ∈ Abel)
39	4, 38	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ Abel)
40	35	lsmcom 18647	. . . 4 ⊢ ((𝑈 ∈ Abel ∧ (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
41	39, 19, 25, 40	syl3anc 1439	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
42	41	ineq1d 4036	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)) = (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)))
43	37, 42	eqtr2d 2815	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 198 ∧ wa 386 ∧ w3a 1071 = wceq 1601 ∈ wcel 2107 ∩ cin 3791 ⊆ wss 3792 class class class wbr 4886 ‘cfv 6135 (class class class)co 6922 Basecbs 16255 lecple 16345 joincjn 17330 meetcmee 17331 Latclat 17431 SubGrpcsubg 17972 LSSumclsm 18433 Abelcabl 18580 LModclmod 19255 LSubSpclss 19324 Atomscatm 35417 HLchlt 35504 LHypclh 36138 DVecHcdvh 37232 DIsoHcdih 37382

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1839 ax-4 1853 ax-5 1953 ax-6 2021 ax-7 2055 ax-8 2109 ax-9 2116 ax-10 2135 ax-11 2150 ax-12 2163 ax-13 2334 ax-ext 2754 ax-rep 5006 ax-sep 5017 ax-nul 5025 ax-pow 5077 ax-pr 5138 ax-un 7226 ax-cnex 10328 ax-resscn 10329 ax-1cn 10330 ax-icn 10331 ax-addcl 10332 ax-addrcl 10333 ax-mulcl 10334 ax-mulrcl 10335 ax-mulcom 10336 ax-addass 10337 ax-mulass 10338 ax-distr 10339 ax-i2m1 10340 ax-1ne0 10341 ax-1rid 10342 ax-rnegex 10343 ax-rrecex 10344 ax-cnre 10345 ax-pre-lttri 10346 ax-pre-lttrn 10347 ax-pre-ltadd 10348 ax-pre-mulgt0 10349 ax-riotaBAD 35107

This theorem depends on definitions: df-bi 199 df-an 387 df-or 837 df-3or 1072 df-3an 1073 df-tru 1605 df-fal 1615 df-ex 1824 df-nf 1828 df-sb 2012 df-mo 2551 df-eu 2587 df-clab 2764 df-cleq 2770 df-clel 2774 df-nfc 2921 df-ne 2970 df-nel 3076 df-ral 3095 df-rex 3096 df-reu 3097 df-rmo 3098 df-rab 3099 df-v 3400 df-sbc 3653 df-csb 3752 df-dif 3795 df-un 3797 df-in 3799 df-ss 3806 df-pss 3808 df-nul 4142 df-if 4308 df-pw 4381 df-sn 4399 df-pr 4401 df-tp 4403 df-op 4405 df-uni 4672 df-int 4711 df-iun 4755 df-iin 4756 df-br 4887 df-opab 4949 df-mpt 4966 df-tr 4988 df-id 5261 df-eprel 5266 df-po 5274 df-so 5275 df-fr 5314 df-we 5316 df-xp 5361 df-rel 5362 df-cnv 5363 df-co 5364 df-dm 5365 df-rn 5366 df-res 5367 df-ima 5368 df-pred 5933 df-ord 5979 df-on 5980 df-lim 5981 df-suc 5982 df-iota 6099 df-fun 6137 df-fn 6138 df-f 6139 df-f1 6140 df-fo 6141 df-f1o 6142 df-fv 6143 df-riota 6883 df-ov 6925 df-oprab 6926 df-mpt2 6927 df-om 7344 df-1st 7445 df-2nd 7446 df-tpos 7634 df-undef 7681 df-wrecs 7689 df-recs 7751 df-rdg 7789 df-1o 7843 df-oadd 7847 df-er 8026 df-map 8142 df-en 8242 df-dom 8243 df-sdom 8244 df-fin 8245 df-pnf 10413 df-mnf 10414 df-xr 10415 df-ltxr 10416 df-le 10417 df-sub 10608 df-neg 10609 df-nn 11375 df-2 11438 df-3 11439 df-4 11440 df-5 11441 df-6 11442 df-n0 11643 df-z 11729 df-uz 11993 df-fz 12644 df-struct 16257 df-ndx 16258 df-slot 16259 df-base 16261 df-sets 16262 df-ress 16263 df-plusg 16351 df-mulr 16352 df-sca 16354 df-vsca 16355 df-0g 16488 df-mre 16632 df-mrc 16633 df-acs 16635 df-proset 17314 df-poset 17332 df-plt 17344 df-lub 17360 df-glb 17361 df-join 17362 df-meet 17363 df-p0 17425 df-p1 17426 df-lat 17432 df-clat 17494 df-mgm 17628 df-sgrp 17670 df-mnd 17681 df-submnd 17722 df-grp 17812 df-minusg 17813 df-sbg 17814 df-subg 17975 df-cntz 18133 df-lsm 18435 df-cmn 18581 df-abl 18582 df-mgp 18877 df-ur 18889 df-ring 18936 df-oppr 19010 df-dvdsr 19028 df-unit 19029 df-invr 19059 df-dvr 19070 df-drng 19141 df-lmod 19257 df-lss 19325 df-lsp 19367 df-lvec 19498 df-oposet 35330 df-ol 35332 df-oml 35333 df-covers 35420 df-ats 35421 df-atl 35452 df-cvlat 35476 df-hlat 35505 df-llines 35652 df-lplanes 35653 df-lvols 35654 df-lines 35655 df-psubsp 35657 df-pmap 35658 df-padd 35950 df-lhyp 36142 df-laut 36143 df-ldil 36258 df-ltrn 36259 df-trl 36313 df-tendo 36909 df-edring 36911 df-disoa 37183 df-dvech 37233 df-dib 37293 df-dic 37327 df-dih 37383

This theorem is referenced by: dihmeetlem12N 37472

W3C validator