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 41264

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 41059	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ LMod)
5		eqid 2740	. . . . . 6 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
6	5	lsssssubg 20973	. . . . 5 ⊢ (𝑈 ∈ LMod → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
7	4, 6	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
8		simp1l 1197	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ HL)
9	8	hllatd 39312	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ Lat)
10		simp2l 1199	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑋 ∈ 𝐵)
11		simp2r 1200	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑌 ∈ 𝐵)
12		dihmeetlem9.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
13		dihmeetlem9.m	. . . . . . 7 ⊢ ∧ = (meet‘𝐾)
14	12, 13	latmcl 18504	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ∈ 𝐵)
15	9, 10, 11, 14	syl3anc 1371	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ∈ 𝐵)
16		dihmeetlem9.i	. . . . . 6 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
17	12, 1, 16, 2, 5	dihlss 41199	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
18	3, 15, 17	syl2anc 583	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
19	7, 18	sseldd 4009	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈))
20		dihmeetlem9.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
21	12, 20	atbase 39237	. . . . . 6 ⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵)
22	21	3ad2ant3 1135	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ 𝐵)
23	12, 1, 16, 2, 5	dihlss 41199	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑝 ∈ 𝐵) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
24	3, 22, 23	syl2anc 583	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (LSubSp‘𝑈))
25	7, 24	sseldd 4009	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑝) ∈ (SubGrp‘𝑈))
26	12, 1, 16, 2, 5	dihlss 41199	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑌 ∈ 𝐵) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
27	3, 11, 26	syl2anc 583	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (LSubSp‘𝑈))
28	7, 27	sseldd 4009	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘𝑌) ∈ (SubGrp‘𝑈))
29		dihmeetlem9.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
30	12, 29, 13	latmle2 18529	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ≤ 𝑌)
31	9, 10, 11, 30	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋 ∧ 𝑌) ≤ 𝑌)
32	12, 29, 1, 16	dihord 41213	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
33	3, 15, 11, 32	syl3anc 1371	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌) ↔ (𝑋 ∧ 𝑌) ≤ 𝑌))
34	31, 33	mpbird 257	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌))
35		dihmeetlem9.s	. . . 4 ⊢ ⊕ = (LSSum‘𝑈)
36	35	lsmmod 19711	. . 3 ⊢ ((((𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑌) ∈ (SubGrp‘𝑈)) ∧ (𝐼‘(𝑋 ∧ 𝑌)) ⊆ (𝐼‘𝑌)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
37	19, 25, 28, 34, 36	syl31anc 1373	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))) = (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)))
38		lmodabl 20923	. . . . 5 ⊢ (𝑈 ∈ LMod → 𝑈 ∈ Abel)
39	4, 38	syl 17	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑈 ∈ Abel)
40	35	lsmcom 19894	. . . 4 ⊢ ((𝑈 ∈ Abel ∧ (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑝) ∈ (SubGrp‘𝑈)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
41	39, 19, 25, 40	syl3anc 1371	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) = ((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
42	41	ineq1d 4240	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑝)) ∩ (𝐼‘𝑌)) = (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)))
43	37, 42	eqtr2d 2781	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝐼‘𝑝) ⊕ (𝐼‘(𝑋 ∧ 𝑌))) ∩ (𝐼‘𝑌)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ ((𝐼‘𝑝) ∩ (𝐼‘𝑌))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1537 ∈ wcel 2108 ∩ cin 3975 ⊆ wss 3976 class class class wbr 5166 ‘cfv 6568 (class class class)co 7443 Basecbs 17252 lecple 17312 joincjn 18375 meetcmee 18376 Latclat 18495 SubGrpcsubg 19154 LSSumclsm 19670 Abelcabl 19817 LModclmod 20874 LSubSpclss 20946 Atomscatm 39211 HLchlt 39298 LHypclh 39933 DVecHcdvh 41027 DIsoHcdih 41177

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1793 ax-4 1807 ax-5 1909 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2158 ax-12 2178 ax-ext 2711 ax-rep 5303 ax-sep 5317 ax-nul 5324 ax-pow 5383 ax-pr 5447 ax-un 7764 ax-cnex 11234 ax-resscn 11235 ax-1cn 11236 ax-icn 11237 ax-addcl 11238 ax-addrcl 11239 ax-mulcl 11240 ax-mulrcl 11241 ax-mulcom 11242 ax-addass 11243 ax-mulass 11244 ax-distr 11245 ax-i2m1 11246 ax-1ne0 11247 ax-1rid 11248 ax-rnegex 11249 ax-rrecex 11250 ax-cnre 11251 ax-pre-lttri 11252 ax-pre-lttrn 11253 ax-pre-ltadd 11254 ax-pre-mulgt0 11255 ax-riotaBAD 38901

This theorem depends on definitions: df-bi 207 df-an 396 df-or 847 df-3or 1088 df-3an 1089 df-tru 1540 df-fal 1550 df-ex 1778 df-nf 1782 df-sb 2065 df-mo 2543 df-eu 2572 df-clab 2718 df-cleq 2732 df-clel 2819 df-nfc 2895 df-ne 2947 df-nel 3053 df-ral 3068 df-rex 3077 df-rmo 3388 df-reu 3389 df-rab 3444 df-v 3490 df-sbc 3805 df-csb 3922 df-dif 3979 df-un 3981 df-in 3983 df-ss 3993 df-pss 3996 df-nul 4353 df-if 4549 df-pw 4624 df-sn 4649 df-pr 4651 df-tp 4653 df-op 4655 df-uni 4932 df-int 4971 df-iun 5017 df-iin 5018 df-br 5167 df-opab 5229 df-mpt 5250 df-tr 5284 df-id 5593 df-eprel 5599 df-po 5607 df-so 5608 df-fr 5650 df-we 5652 df-xp 5701 df-rel 5702 df-cnv 5703 df-co 5704 df-dm 5705 df-rn 5706 df-res 5707 df-ima 5708 df-pred 6327 df-ord 6393 df-on 6394 df-lim 6395 df-suc 6396 df-iota 6520 df-fun 6570 df-fn 6571 df-f 6572 df-f1 6573 df-fo 6574 df-f1o 6575 df-fv 6576 df-riota 7399 df-ov 7446 df-oprab 7447 df-mpo 7448 df-om 7898 df-1st 8024 df-2nd 8025 df-tpos 8261 df-undef 8308 df-frecs 8316 df-wrecs 8347 df-recs 8421 df-rdg 8460 df-1o 8516 df-2o 8517 df-er 8757 df-map 8880 df-en 8998 df-dom 8999 df-sdom 9000 df-fin 9001 df-pnf 11320 df-mnf 11321 df-xr 11322 df-ltxr 11323 df-le 11324 df-sub 11516 df-neg 11517 df-nn 12288 df-2 12350 df-3 12351 df-4 12352 df-5 12353 df-6 12354 df-n0 12548 df-z 12634 df-uz 12898 df-fz 13562 df-struct 17188 df-sets 17205 df-slot 17223 df-ndx 17235 df-base 17253 df-ress 17282 df-plusg 17318 df-mulr 17319 df-sca 17321 df-vsca 17322 df-0g 17495 df-mre 17638 df-mrc 17639 df-acs 17641 df-proset 18359 df-poset 18377 df-plt 18394 df-lub 18410 df-glb 18411 df-join 18412 df-meet 18413 df-p0 18489 df-p1 18490 df-lat 18496 df-clat 18563 df-mgm 18672 df-sgrp 18751 df-mnd 18767 df-submnd 18813 df-grp 18970 df-minusg 18971 df-sbg 18972 df-subg 19157 df-cntz 19351 df-lsm 19672 df-cmn 19818 df-abl 19819 df-mgp 20156 df-rng 20174 df-ur 20203 df-ring 20256 df-oppr 20354 df-dvdsr 20377 df-unit 20378 df-invr 20408 df-dvr 20421 df-drng 20747 df-lmod 20876 df-lss 20947 df-lsp 20987 df-lvec 21119 df-oposet 39124 df-ol 39126 df-oml 39127 df-covers 39214 df-ats 39215 df-atl 39246 df-cvlat 39270 df-hlat 39299 df-llines 39447 df-lplanes 39448 df-lvols 39449 df-lines 39450 df-psubsp 39452 df-pmap 39453 df-padd 39745 df-lhyp 39937 df-laut 39938 df-ldil 40053 df-ltrn 40054 df-trl 40108 df-tendo 40704 df-edring 40706 df-disoa 40978 df-dvech 41028 df-dib 41088 df-dic 41122 df-dih 41178

This theorem is referenced by: dihmeetlem12N 41267

W3C validator