dihjatc3 - Mathbox for Norm Megill

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

Theorem dihjatc3 39336

Description: Isomorphism H of join with an atom. (Contributed by NM, 26-Aug-2014.)

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

**Assertion**
Ref	Expression
dihjatc3	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘((𝑋 ∧ 𝑌) ∨ 𝑄)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑄)))

**Proof of Theorem dihjatc3**
Step	Hyp	Ref	Expression
1		dihjatc1.b	. . 3 ⊢ 𝐵 = (Base‘𝐾)
2		dihjatc1.l	. . 3 ⊢ ≤ = (le‘𝐾)
3		dihjatc1.h	. . 3 ⊢ 𝐻 = (LHyp‘𝐾)
4		dihjatc1.j	. . 3 ⊢ ∨ = (join‘𝐾)
5		dihjatc1.m	. . 3 ⊢ ∧ = (meet‘𝐾)
6		dihjatc1.a	. . 3 ⊢ 𝐴 = (Atoms‘𝐾)
7		dihjatc1.u	. . 3 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊)
8		dihjatc1.s	. . 3 ⊢ ⊕ = (LSSum‘𝑈)
9		dihjatc1.i	. . 3 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊)
10	1, 2, 3, 4, 5, 6, 7, 8, 9	dihjatc1 39334	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘((𝑋 ∧ 𝑌) ∨ 𝑄)) = ((𝐼‘𝑄) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
11		simp11 1202	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
12	3, 7, 11	dvhlmod 39133	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑈 ∈ LMod)
13		lmodabl 20181	. . . 4 ⊢ (𝑈 ∈ LMod → 𝑈 ∈ Abel)
14	12, 13	syl 17	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑈 ∈ Abel)
15		eqid 2740	. . . . . 6 ⊢ (LSubSp‘𝑈) = (LSubSp‘𝑈)
16	15	lsssssubg 20231	. . . . 5 ⊢ (𝑈 ∈ LMod → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
17	12, 16	syl 17	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (LSubSp‘𝑈) ⊆ (SubGrp‘𝑈))
18		simp11l 1283	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝐾 ∈ HL)
19	18	hllatd 37387	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝐾 ∈ Lat)
20		simp12 1203	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑋 ∈ 𝐵)
21		simp13 1204	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑌 ∈ 𝐵)
22	1, 5	latmcl 18169	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∧ 𝑌) ∈ 𝐵)
23	19, 20, 21, 22	syl3anc 1370	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝑋 ∧ 𝑌) ∈ 𝐵)
24	1, 3, 9, 7, 15	dihlss 39273	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑋 ∧ 𝑌) ∈ 𝐵) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
25	11, 23, 24	syl2anc 584	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (LSubSp‘𝑈))
26	17, 25	sseldd 3927	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈))
27		simp2l 1198	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑄 ∈ 𝐴)
28	1, 6	atbase 37312	. . . . . 6 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ 𝐵)
29	27, 28	syl 17	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → 𝑄 ∈ 𝐵)
30	1, 3, 9, 7, 15	dihlss 39273	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑄 ∈ 𝐵) → (𝐼‘𝑄) ∈ (LSubSp‘𝑈))
31	11, 29, 30	syl2anc 584	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘𝑄) ∈ (LSubSp‘𝑈))
32	17, 31	sseldd 3927	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘𝑄) ∈ (SubGrp‘𝑈))
33	8	lsmcom 19470	. . 3 ⊢ ((𝑈 ∈ Abel ∧ (𝐼‘(𝑋 ∧ 𝑌)) ∈ (SubGrp‘𝑈) ∧ (𝐼‘𝑄) ∈ (SubGrp‘𝑈)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑄)) = ((𝐼‘𝑄) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
34	14, 26, 32, 33	syl3anc 1370	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑄)) = ((𝐼‘𝑄) ⊕ (𝐼‘(𝑋 ∧ 𝑌))))
35	10, 34	eqtr4d 2783	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄 ≤ 𝑋 ∧ (𝑋 ∧ 𝑌) ≤ 𝑊)) → (𝐼‘((𝑋 ∧ 𝑌) ∨ 𝑄)) = ((𝐼‘(𝑋 ∧ 𝑌)) ⊕ (𝐼‘𝑄)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∧ w3a 1086 = wceq 1542 ∈ wcel 2110 ⊆ wss 3892 class class class wbr 5079 ‘cfv 6432 (class class class)co 7272 Basecbs 16923 lecple 16980 joincjn 18040 meetcmee 18041 Latclat 18160 SubGrpcsubg 18760 LSSumclsm 19250 Abelcabl 19398 LModclmod 20134 LSubSpclss 20204 Atomscatm 37286 HLchlt 37373 LHypclh 38007 DVecHcdvh 39101 DIsoHcdih 39251

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1975 ax-7 2015 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2158 ax-12 2175 ax-ext 2711 ax-rep 5214 ax-sep 5227 ax-nul 5234 ax-pow 5292 ax-pr 5356 ax-un 7583 ax-cnex 10938 ax-resscn 10939 ax-1cn 10940 ax-icn 10941 ax-addcl 10942 ax-addrcl 10943 ax-mulcl 10944 ax-mulrcl 10945 ax-mulcom 10946 ax-addass 10947 ax-mulass 10948 ax-distr 10949 ax-i2m1 10950 ax-1ne0 10951 ax-1rid 10952 ax-rnegex 10953 ax-rrecex 10954 ax-cnre 10955 ax-pre-lttri 10956 ax-pre-lttrn 10957 ax-pre-ltadd 10958 ax-pre-mulgt0 10959 ax-riotaBAD 36976

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1545 df-fal 1555 df-ex 1787 df-nf 1791 df-sb 2072 df-mo 2542 df-eu 2571 df-clab 2718 df-cleq 2732 df-clel 2818 df-nfc 2891 df-ne 2946 df-nel 3052 df-ral 3071 df-rex 3072 df-reu 3073 df-rmo 3074 df-rab 3075 df-v 3433 df-sbc 3721 df-csb 3838 df-dif 3895 df-un 3897 df-in 3899 df-ss 3909 df-pss 3911 df-nul 4263 df-if 4466 df-pw 4541 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4846 df-int 4886 df-iun 4932 df-iin 4933 df-br 5080 df-opab 5142 df-mpt 5163 df-tr 5197 df-id 5490 df-eprel 5496 df-po 5504 df-so 5505 df-fr 5545 df-we 5547 df-xp 5596 df-rel 5597 df-cnv 5598 df-co 5599 df-dm 5600 df-rn 5601 df-res 5602 df-ima 5603 df-pred 6201 df-ord 6268 df-on 6269 df-lim 6270 df-suc 6271 df-iota 6390 df-fun 6434 df-fn 6435 df-f 6436 df-f1 6437 df-fo 6438 df-f1o 6439 df-fv 6440 df-riota 7229 df-ov 7275 df-oprab 7276 df-mpo 7277 df-om 7708 df-1st 7825 df-2nd 7826 df-tpos 8034 df-undef 8081 df-frecs 8089 df-wrecs 8120 df-recs 8194 df-rdg 8233 df-1o 8289 df-er 8490 df-map 8609 df-en 8726 df-dom 8727 df-sdom 8728 df-fin 8729 df-pnf 11022 df-mnf 11023 df-xr 11024 df-ltxr 11025 df-le 11026 df-sub 11218 df-neg 11219 df-nn 11985 df-2 12047 df-3 12048 df-4 12049 df-5 12050 df-6 12051 df-n0 12245 df-z 12331 df-uz 12594 df-fz 13251 df-struct 16859 df-sets 16876 df-slot 16894 df-ndx 16906 df-base 16924 df-ress 16953 df-plusg 16986 df-mulr 16987 df-sca 16989 df-vsca 16990 df-0g 17163 df-proset 18024 df-poset 18042 df-plt 18059 df-lub 18075 df-glb 18076 df-join 18077 df-meet 18078 df-p0 18154 df-p1 18155 df-lat 18161 df-clat 18228 df-mgm 18337 df-sgrp 18386 df-mnd 18397 df-submnd 18442 df-grp 18591 df-minusg 18592 df-sbg 18593 df-subg 18763 df-cntz 18934 df-lsm 19252 df-cmn 19399 df-abl 19400 df-mgp 19732 df-ur 19749 df-ring 19796 df-oppr 19873 df-dvdsr 19894 df-unit 19895 df-invr 19925 df-dvr 19936 df-drng 20004 df-lmod 20136 df-lss 20205 df-lsp 20245 df-lvec 20376 df-oposet 37199 df-ol 37201 df-oml 37202 df-covers 37289 df-ats 37290 df-atl 37321 df-cvlat 37345 df-hlat 37374 df-llines 37521 df-lplanes 37522 df-lvols 37523 df-lines 37524 df-psubsp 37526 df-pmap 37527 df-padd 37819 df-lhyp 38011 df-laut 38012 df-ldil 38127 df-ltrn 38128 df-trl 38182 df-tendo 38778 df-edring 38780 df-disoa 39052 df-dvech 39102 df-dib 39162 df-dic 39196 df-dih 39252

This theorem is referenced by: dihjatc 39440

W3C validator