Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > Mathboxes > dihvalcqat | Structured version Visualization version GIF version |
Description: Value of isomorphism H for a lattice 𝐾 at an atom not under 𝑊. (Contributed by NM, 27-Mar-2014.) |
Ref | Expression |
---|---|
dihvalcqat.l | ⊢ ≤ = (le‘𝐾) |
dihvalcqat.a | ⊢ 𝐴 = (Atoms‘𝐾) |
dihvalcqat.h | ⊢ 𝐻 = (LHyp‘𝐾) |
dihvalcqat.j | ⊢ 𝐽 = ((DIsoC‘𝐾)‘𝑊) |
dihvalcqat.i | ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊) |
Ref | Expression |
---|---|
dihvalcqat | ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐼‘𝑄) = (𝐽‘𝑄)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | simpl 485 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) | |
2 | eqid 2821 | . . . . 5 ⊢ (Base‘𝐾) = (Base‘𝐾) | |
3 | dihvalcqat.a | . . . . 5 ⊢ 𝐴 = (Atoms‘𝐾) | |
4 | 2, 3 | atbase 36419 | . . . 4 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ (Base‘𝐾)) |
5 | 4 | ad2antrl 726 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝑄 ∈ (Base‘𝐾)) |
6 | simprr 771 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ¬ 𝑄 ≤ 𝑊) | |
7 | simpr 487 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) | |
8 | dihvalcqat.l | . . . . . 6 ⊢ ≤ = (le‘𝐾) | |
9 | eqid 2821 | . . . . . 6 ⊢ (meet‘𝐾) = (meet‘𝐾) | |
10 | eqid 2821 | . . . . . 6 ⊢ (0.‘𝐾) = (0.‘𝐾) | |
11 | dihvalcqat.h | . . . . . 6 ⊢ 𝐻 = (LHyp‘𝐾) | |
12 | 8, 9, 10, 3, 11 | lhpmat 37160 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝑄(meet‘𝐾)𝑊) = (0.‘𝐾)) |
13 | 12 | oveq2d 7166 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝑄(join‘𝐾)(𝑄(meet‘𝐾)𝑊)) = (𝑄(join‘𝐾)(0.‘𝐾))) |
14 | hlol 36491 | . . . . . 6 ⊢ (𝐾 ∈ HL → 𝐾 ∈ OL) | |
15 | 14 | ad2antrr 724 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐾 ∈ OL) |
16 | eqid 2821 | . . . . . 6 ⊢ (join‘𝐾) = (join‘𝐾) | |
17 | 2, 16, 10 | olj01 36355 | . . . . 5 ⊢ ((𝐾 ∈ OL ∧ 𝑄 ∈ (Base‘𝐾)) → (𝑄(join‘𝐾)(0.‘𝐾)) = 𝑄) |
18 | 15, 5, 17 | syl2anc 586 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝑄(join‘𝐾)(0.‘𝐾)) = 𝑄) |
19 | 13, 18 | eqtrd 2856 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝑄(join‘𝐾)(𝑄(meet‘𝐾)𝑊)) = 𝑄) |
20 | dihvalcqat.i | . . . 4 ⊢ 𝐼 = ((DIsoH‘𝐾)‘𝑊) | |
21 | eqid 2821 | . . . 4 ⊢ ((DIsoB‘𝐾)‘𝑊) = ((DIsoB‘𝐾)‘𝑊) | |
22 | dihvalcqat.j | . . . 4 ⊢ 𝐽 = ((DIsoC‘𝐾)‘𝑊) | |
23 | eqid 2821 | . . . 4 ⊢ ((DVecH‘𝐾)‘𝑊) = ((DVecH‘𝐾)‘𝑊) | |
24 | eqid 2821 | . . . 4 ⊢ (LSSum‘((DVecH‘𝐾)‘𝑊)) = (LSSum‘((DVecH‘𝐾)‘𝑊)) | |
25 | 2, 8, 16, 9, 3, 11, 20, 21, 22, 23, 24 | dihvalcq 38366 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ (Base‘𝐾) ∧ ¬ 𝑄 ≤ 𝑊) ∧ ((𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑄(join‘𝐾)(𝑄(meet‘𝐾)𝑊)) = 𝑄)) → (𝐼‘𝑄) = ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊))(((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊)))) |
26 | 1, 5, 6, 7, 19, 25 | syl122anc 1375 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐼‘𝑄) = ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊))(((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊)))) |
27 | 12 | fveq2d 6668 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊)) = (((DIsoB‘𝐾)‘𝑊)‘(0.‘𝐾))) |
28 | eqid 2821 | . . . . . . 7 ⊢ (0g‘((DVecH‘𝐾)‘𝑊)) = (0g‘((DVecH‘𝐾)‘𝑊)) | |
29 | 10, 11, 21, 23, 28 | dib0 38294 | . . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (((DIsoB‘𝐾)‘𝑊)‘(0.‘𝐾)) = {(0g‘((DVecH‘𝐾)‘𝑊))}) |
30 | 29 | adantr 483 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘(0.‘𝐾)) = {(0g‘((DVecH‘𝐾)‘𝑊))}) |
31 | 27, 30 | eqtrd 2856 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊)) = {(0g‘((DVecH‘𝐾)‘𝑊))}) |
32 | 31 | oveq2d 7166 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊))(((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊))) = ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊)){(0g‘((DVecH‘𝐾)‘𝑊))})) |
33 | 11, 23, 1 | dvhlmod 38240 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ((DVecH‘𝐾)‘𝑊) ∈ LMod) |
34 | eqid 2821 | . . . . . 6 ⊢ (LSubSp‘((DVecH‘𝐾)‘𝑊)) = (LSubSp‘((DVecH‘𝐾)‘𝑊)) | |
35 | 8, 3, 11, 23, 22, 34 | diclss 38323 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐽‘𝑄) ∈ (LSubSp‘((DVecH‘𝐾)‘𝑊))) |
36 | 34 | lsssubg 19723 | . . . . 5 ⊢ ((((DVecH‘𝐾)‘𝑊) ∈ LMod ∧ (𝐽‘𝑄) ∈ (LSubSp‘((DVecH‘𝐾)‘𝑊))) → (𝐽‘𝑄) ∈ (SubGrp‘((DVecH‘𝐾)‘𝑊))) |
37 | 33, 35, 36 | syl2anc 586 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐽‘𝑄) ∈ (SubGrp‘((DVecH‘𝐾)‘𝑊))) |
38 | 28, 24 | lsm01 18791 | . . . 4 ⊢ ((𝐽‘𝑄) ∈ (SubGrp‘((DVecH‘𝐾)‘𝑊)) → ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊)){(0g‘((DVecH‘𝐾)‘𝑊))}) = (𝐽‘𝑄)) |
39 | 37, 38 | syl 17 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊)){(0g‘((DVecH‘𝐾)‘𝑊))}) = (𝐽‘𝑄)) |
40 | 32, 39 | eqtrd 2856 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → ((𝐽‘𝑄)(LSSum‘((DVecH‘𝐾)‘𝑊))(((DIsoB‘𝐾)‘𝑊)‘(𝑄(meet‘𝐾)𝑊))) = (𝐽‘𝑄)) |
41 | 26, 40 | eqtrd 2856 | 1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → (𝐼‘𝑄) = (𝐽‘𝑄)) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ∧ wa 398 = wceq 1533 ∈ wcel 2110 {csn 4560 class class class wbr 5058 ‘cfv 6349 (class class class)co 7150 Basecbs 16477 lecple 16566 0gc0g 16707 joincjn 17548 meetcmee 17549 0.cp0 17641 SubGrpcsubg 18267 LSSumclsm 18753 LModclmod 19628 LSubSpclss 19697 OLcol 36304 Atomscatm 36393 HLchlt 36480 LHypclh 37114 DVecHcdvh 38208 DIsoBcdib 38268 DIsoCcdic 38302 DIsoHcdih 38358 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2157 ax-12 2173 ax-ext 2793 ax-rep 5182 ax-sep 5195 ax-nul 5202 ax-pow 5258 ax-pr 5321 ax-un 7455 ax-cnex 10587 ax-resscn 10588 ax-1cn 10589 ax-icn 10590 ax-addcl 10591 ax-addrcl 10592 ax-mulcl 10593 ax-mulrcl 10594 ax-mulcom 10595 ax-addass 10596 ax-mulass 10597 ax-distr 10598 ax-i2m1 10599 ax-1ne0 10600 ax-1rid 10601 ax-rnegex 10602 ax-rrecex 10603 ax-cnre 10604 ax-pre-lttri 10605 ax-pre-lttrn 10606 ax-pre-ltadd 10607 ax-pre-mulgt0 10608 ax-riotaBAD 36083 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-fal 1546 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3772 df-csb 3883 df-dif 3938 df-un 3940 df-in 3942 df-ss 3951 df-pss 3953 df-nul 4291 df-if 4467 df-pw 4540 df-sn 4561 df-pr 4563 df-tp 4565 df-op 4567 df-uni 4832 df-int 4869 df-iun 4913 df-iin 4914 df-br 5059 df-opab 5121 df-mpt 5139 df-tr 5165 df-id 5454 df-eprel 5459 df-po 5468 df-so 5469 df-fr 5508 df-we 5510 df-xp 5555 df-rel 5556 df-cnv 5557 df-co 5558 df-dm 5559 df-rn 5560 df-res 5561 df-ima 5562 df-pred 6142 df-ord 6188 df-on 6189 df-lim 6190 df-suc 6191 df-iota 6308 df-fun 6351 df-fn 6352 df-f 6353 df-f1 6354 df-fo 6355 df-f1o 6356 df-fv 6357 df-riota 7108 df-ov 7153 df-oprab 7154 df-mpo 7155 df-om 7575 df-1st 7683 df-2nd 7684 df-tpos 7886 df-undef 7933 df-wrecs 7941 df-recs 8002 df-rdg 8040 df-1o 8096 df-oadd 8100 df-er 8283 df-map 8402 df-en 8504 df-dom 8505 df-sdom 8506 df-fin 8507 df-pnf 10671 df-mnf 10672 df-xr 10673 df-ltxr 10674 df-le 10675 df-sub 10866 df-neg 10867 df-nn 11633 df-2 11694 df-3 11695 df-4 11696 df-5 11697 df-6 11698 df-n0 11892 df-z 11976 df-uz 12238 df-fz 12887 df-struct 16479 df-ndx 16480 df-slot 16481 df-base 16483 df-sets 16484 df-ress 16485 df-plusg 16572 df-mulr 16573 df-sca 16575 df-vsca 16576 df-0g 16709 df-proset 17532 df-poset 17550 df-plt 17562 df-lub 17578 df-glb 17579 df-join 17580 df-meet 17581 df-p0 17643 df-p1 17644 df-lat 17650 df-clat 17712 df-mgm 17846 df-sgrp 17895 df-mnd 17906 df-submnd 17951 df-grp 18100 df-minusg 18101 df-sbg 18102 df-subg 18270 df-cntz 18441 df-lsm 18755 df-cmn 18902 df-abl 18903 df-mgp 19234 df-ur 19246 df-ring 19293 df-oppr 19367 df-dvdsr 19385 df-unit 19386 df-invr 19416 df-dvr 19427 df-drng 19498 df-lmod 19630 df-lss 19698 df-lsp 19738 df-lvec 19869 df-oposet 36306 df-ol 36308 df-oml 36309 df-covers 36396 df-ats 36397 df-atl 36428 df-cvlat 36452 df-hlat 36481 df-llines 36628 df-lplanes 36629 df-lvols 36630 df-lines 36631 df-psubsp 36633 df-pmap 36634 df-padd 36926 df-lhyp 37118 df-laut 37119 df-ldil 37234 df-ltrn 37235 df-trl 37289 df-tendo 37885 df-edring 37887 df-disoa 38159 df-dvech 38209 df-dib 38269 df-dic 38303 df-dih 38359 |
This theorem is referenced by: dih1dimc 38372 dihopelvalcqat 38376 dihvalcq2 38377 dih1dimatlem 38459 dihpN 38466 |
Copyright terms: Public domain | W3C validator |