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

Theorem dihmeetALTN 40001
Description: Isomorphism H of a lattice meet. This version does not depend on the atomisticity of the constructed vector space. TODO: Delete? (Contributed by NM, 7-Apr-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
dihmeetALT.b 𝐵 = (Base‘𝐾)
dihmeetALT.m = (meet‘𝐾)
dihmeetALT.h 𝐻 = (LHyp‘𝐾)
dihmeetALT.i 𝐼 = ((DIsoH‘𝐾)‘𝑊)
Assertion
Ref Expression
dihmeetALTN (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))

Proof of Theorem dihmeetALTN
StepHypRef Expression
1 simpl1l 1224 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → 𝐾 ∈ HL)
21hllatd 38037 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → 𝐾 ∈ Lat)
3 simpl2 1192 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → 𝑋𝐵)
4 simpl3 1193 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → 𝑌𝐵)
5 dihmeetALT.b . . . . . 6 𝐵 = (Base‘𝐾)
6 dihmeetALT.m . . . . . 6 = (meet‘𝐾)
75, 6latmcom 18398 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) = (𝑌 𝑋))
82, 3, 4, 7syl3anc 1371 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝑋 𝑌) = (𝑌 𝑋))
98fveq2d 6882 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = (𝐼‘(𝑌 𝑋)))
10 simpl1 1191 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝐾 ∈ HL ∧ 𝑊𝐻))
11 simpr 485 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → 𝑋(le‘𝐾)𝑊)
12 eqid 2731 . . . . . 6 (le‘𝐾) = (le‘𝐾)
13 dihmeetALT.h . . . . . 6 𝐻 = (LHyp‘𝐾)
14 dihmeetALT.i . . . . . 6 𝐼 = ((DIsoH‘𝐾)‘𝑊)
155, 12, 6, 13, 14dihmeetbN 39977 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑌𝐵 ∧ (𝑋𝐵𝑋(le‘𝐾)𝑊)) → (𝐼‘(𝑌 𝑋)) = ((𝐼𝑌) ∩ (𝐼𝑋)))
1610, 4, 3, 11, 15syl112anc 1374 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝐼‘(𝑌 𝑋)) = ((𝐼𝑌) ∩ (𝐼𝑋)))
17 incom 4197 . . . 4 ((𝐼𝑌) ∩ (𝐼𝑋)) = ((𝐼𝑋) ∩ (𝐼𝑌))
1816, 17eqtrdi 2787 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝐼‘(𝑌 𝑋)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
199, 18eqtrd 2771 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
20 simpll1 1212 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → (𝐾 ∈ HL ∧ 𝑊𝐻))
21 simpll2 1213 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → 𝑋𝐵)
22 simpll3 1214 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → 𝑌𝐵)
23 simpr 485 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → 𝑌(le‘𝐾)𝑊)
245, 12, 6, 13, 14dihmeetbN 39977 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵 ∧ (𝑌𝐵𝑌(le‘𝐾)𝑊)) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
2520, 21, 22, 23, 24syl112anc 1374 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
2625adantlr 713 . . . 4 ((((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊) ∧ 𝑌(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
27 simp1l1 1266 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → (𝐾 ∈ HL ∧ 𝑊𝐻))
28 simp1l2 1267 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → 𝑋𝐵)
29 simp1r 1198 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → ¬ 𝑋(le‘𝐾)𝑊)
30 simp1l3 1268 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → 𝑌𝐵)
31 simp3 1138 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → ¬ 𝑌(le‘𝐾)𝑊)
3230, 31jca 512 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → (𝑌𝐵 ∧ ¬ 𝑌(le‘𝐾)𝑊))
33 simp2 1137 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → (𝑋 𝑌)(le‘𝐾)𝑊)
34 eqid 2731 . . . . . . 7 (join‘𝐾) = (join‘𝐾)
35 eqid 2731 . . . . . . 7 (Atoms‘𝐾) = (Atoms‘𝐾)
36 eqid 2731 . . . . . . 7 ((DVecH‘𝐾)‘𝑊) = ((DVecH‘𝐾)‘𝑊)
37 eqid 2731 . . . . . . 7 (LSSum‘((DVecH‘𝐾)‘𝑊)) = (LSSum‘((DVecH‘𝐾)‘𝑊))
385, 12, 13, 34, 6, 35, 36, 37, 14dihmeetlem20N 40000 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ((𝑌𝐵 ∧ ¬ 𝑌(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊)) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
3927, 28, 29, 32, 33, 38syl122anc 1379 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊 ∧ ¬ 𝑌(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
40393expa 1118 . . . 4 ((((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊) ∧ ¬ 𝑌(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
4126, 40pm2.61dan 811 . . 3 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ (𝑋 𝑌)(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
42 simpll1 1212 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → (𝐾 ∈ HL ∧ 𝑊𝐻))
43 simpll2 1213 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → 𝑋𝐵)
44 simpll3 1214 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → 𝑌𝐵)
45 simpr 485 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → ¬ (𝑋 𝑌)(le‘𝐾)𝑊)
465, 12, 6, 13, 14dihmeetcN 39976 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑌𝐵) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
4742, 43, 44, 45, 46syl121anc 1375 . . 3 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) ∧ ¬ (𝑋 𝑌)(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
4841, 47pm2.61dan 811 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) ∧ ¬ 𝑋(le‘𝐾)𝑊) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
4919, 48pm2.61dan 811 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝐵𝑌𝐵) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  w3a 1087   = wceq 1541  wcel 2106  cin 3943   class class class wbr 5141  cfv 6532  (class class class)co 7393  Basecbs 17126  lecple 17186  joincjn 18246  meetcmee 18247  Latclat 18366  LSSumclsm 19466  Atomscatm 37936  HLchlt 38023  LHypclh 38658  DVecHcdvh 39752  DIsoHcdih 39902
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2702  ax-rep 5278  ax-sep 5292  ax-nul 5299  ax-pow 5356  ax-pr 5420  ax-un 7708  ax-cnex 11148  ax-resscn 11149  ax-1cn 11150  ax-icn 11151  ax-addcl 11152  ax-addrcl 11153  ax-mulcl 11154  ax-mulrcl 11155  ax-mulcom 11156  ax-addass 11157  ax-mulass 11158  ax-distr 11159  ax-i2m1 11160  ax-1ne0 11161  ax-1rid 11162  ax-rnegex 11163  ax-rrecex 11164  ax-cnre 11165  ax-pre-lttri 11166  ax-pre-lttrn 11167  ax-pre-ltadd 11168  ax-pre-mulgt0 11169  ax-riotaBAD 37626
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3963  df-nul 4319  df-if 4523  df-pw 4598  df-sn 4623  df-pr 4625  df-tp 4627  df-op 4629  df-uni 4902  df-int 4944  df-iun 4992  df-iin 4993  df-br 5142  df-opab 5204  df-mpt 5225  df-tr 5259  df-id 5567  df-eprel 5573  df-po 5581  df-so 5582  df-fr 5624  df-we 5626  df-xp 5675  df-rel 5676  df-cnv 5677  df-co 5678  df-dm 5679  df-rn 5680  df-res 5681  df-ima 5682  df-pred 6289  df-ord 6356  df-on 6357  df-lim 6358  df-suc 6359  df-iota 6484  df-fun 6534  df-fn 6535  df-f 6536  df-f1 6537  df-fo 6538  df-f1o 6539  df-fv 6540  df-riota 7349  df-ov 7396  df-oprab 7397  df-mpo 7398  df-om 7839  df-1st 7957  df-2nd 7958  df-tpos 8193  df-undef 8240  df-frecs 8248  df-wrecs 8279  df-recs 8353  df-rdg 8392  df-1o 8448  df-er 8686  df-map 8805  df-en 8923  df-dom 8924  df-sdom 8925  df-fin 8926  df-pnf 11232  df-mnf 11233  df-xr 11234  df-ltxr 11235  df-le 11236  df-sub 11428  df-neg 11429  df-nn 12195  df-2 12257  df-3 12258  df-4 12259  df-5 12260  df-6 12261  df-n0 12455  df-z 12541  df-uz 12805  df-fz 13467  df-struct 17062  df-sets 17079  df-slot 17097  df-ndx 17109  df-base 17127  df-ress 17156  df-plusg 17192  df-mulr 17193  df-sca 17195  df-vsca 17196  df-0g 17369  df-mre 17512  df-mrc 17513  df-acs 17515  df-proset 18230  df-poset 18248  df-plt 18265  df-lub 18281  df-glb 18282  df-join 18283  df-meet 18284  df-p0 18360  df-p1 18361  df-lat 18367  df-clat 18434  df-mgm 18543  df-sgrp 18592  df-mnd 18603  df-submnd 18648  df-grp 18797  df-minusg 18798  df-sbg 18799  df-subg 18975  df-cntz 19147  df-lsm 19468  df-cmn 19614  df-abl 19615  df-mgp 19947  df-ur 19964  df-ring 20016  df-oppr 20102  df-dvdsr 20123  df-unit 20124  df-invr 20154  df-dvr 20165  df-drng 20267  df-lmod 20422  df-lss 20492  df-lsp 20532  df-lvec 20663  df-oposet 37849  df-ol 37851  df-oml 37852  df-covers 37939  df-ats 37940  df-atl 37971  df-cvlat 37995  df-hlat 38024  df-llines 38172  df-lplanes 38173  df-lvols 38174  df-lines 38175  df-psubsp 38177  df-pmap 38178  df-padd 38470  df-lhyp 38662  df-laut 38663  df-ldil 38778  df-ltrn 38779  df-trl 38833  df-tendo 39429  df-edring 39431  df-disoa 39703  df-dvech 39753  df-dib 39813  df-dic 39847  df-dih 39903
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator