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

Theorem dihjust 34691
Description: Part of proof after Lemma N of [Crawley] p. 122 line 4, "the definition of phi(x) is independent of the atom q." (Contributed by NM, 2-Mar-2014.)
Hypotheses
Ref Expression
dihjust.b  |-  B  =  ( Base `  K
)
dihjust.l  |-  .<_  =  ( le `  K )
dihjust.j  |-  .\/  =  ( join `  K )
dihjust.m  |-  ./\  =  ( meet `  K )
dihjust.a  |-  A  =  ( Atoms `  K )
dihjust.h  |-  H  =  ( LHyp `  K
)
dihjust.i  |-  I  =  ( ( DIsoB `  K
) `  W )
dihjust.J  |-  J  =  ( ( DIsoC `  K
) `  W )
dihjust.u  |-  U  =  ( ( DVecH `  K
) `  W )
dihjust.s  |-  .(+)  =  (
LSSum `  U )
Assertion
Ref Expression
dihjust  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( ( J `  Q )  .(+)  ( I `  ( X  ./\  W ) ) )  =  ( ( J `  R ) 
.(+)  ( I `  ( X  ./\  W ) ) ) )

Proof of Theorem dihjust
StepHypRef Expression
1 dihjust.b . . 3  |-  B  =  ( Base `  K
)
2 dihjust.l . . 3  |-  .<_  =  ( le `  K )
3 dihjust.j . . 3  |-  .\/  =  ( join `  K )
4 dihjust.m . . 3  |-  ./\  =  ( meet `  K )
5 dihjust.a . . 3  |-  A  =  ( Atoms `  K )
6 dihjust.h . . 3  |-  H  =  ( LHyp `  K
)
7 dihjust.i . . 3  |-  I  =  ( ( DIsoB `  K
) `  W )
8 dihjust.J . . 3  |-  J  =  ( ( DIsoC `  K
) `  W )
9 dihjust.u . . 3  |-  U  =  ( ( DVecH `  K
) `  W )
10 dihjust.s . . 3  |-  .(+)  =  (
LSSum `  U )
111, 2, 3, 4, 5, 6, 7, 8, 9, 10dihjustlem 34690 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( ( J `  Q )  .(+)  ( I `  ( X  ./\  W ) ) )  C_  ( ( J `  R )  .(+)  ( I `  ( X  ./\  W ) ) ) )
12 simp1 1005 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( K  e.  HL  /\  W  e.  H ) )
13 simp22 1039 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( R  e.  A  /\  -.  R  .<_  W ) )
14 simp21 1038 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( Q  e.  A  /\  -.  Q  .<_  W ) )
15 simp23 1040 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  X  e.  B )
16 simp3 1007 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )
1716eqcomd 2428 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( R  .\/  ( X  ./\  W
) )  =  ( Q  .\/  ( X 
./\  W ) ) )
181, 2, 3, 4, 5, 6, 7, 8, 9, 10dihjustlem 34690 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  X  e.  B
)  /\  ( R  .\/  ( X  ./\  W
) )  =  ( Q  .\/  ( X 
./\  W ) ) )  ->  ( ( J `  R )  .(+)  ( I `  ( X  ./\  W ) ) )  C_  ( ( J `  Q )  .(+)  ( I `  ( X  ./\  W ) ) ) )
1912, 13, 14, 15, 17, 18syl131anc 1277 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( ( J `  R )  .(+)  ( I `  ( X  ./\  W ) ) )  C_  ( ( J `  Q )  .(+)  ( I `  ( X  ./\  W ) ) ) )
2011, 19eqssd 3417 1  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  X  e.  B
)  /\  ( Q  .\/  ( X  ./\  W
) )  =  ( R  .\/  ( X 
./\  W ) ) )  ->  ( ( J `  Q )  .(+)  ( I `  ( X  ./\  W ) ) )  =  ( ( J `  R ) 
.(+)  ( I `  ( X  ./\  W ) ) ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 370    /\ w3a 982    = wceq 1437    e. wcel 1872    C_ wss 3372   class class class wbr 4359   ` cfv 5537  (class class class)co 6242   Basecbs 15057   lecple 15133   joincjn 16125   meetcmee 16126   LSSumclsm 17222   Atomscatm 32735   HLchlt 32822   LHypclh 33455   DVecHcdvh 34552   DIsoBcdib 34612   DIsoCcdic 34646
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-8 1874  ax-9 1876  ax-10 1891  ax-11 1896  ax-12 1909  ax-13 2058  ax-ext 2402  ax-rep 4472  ax-sep 4482  ax-nul 4491  ax-pow 4538  ax-pr 4596  ax-un 6534  ax-cnex 9539  ax-resscn 9540  ax-1cn 9541  ax-icn 9542  ax-addcl 9543  ax-addrcl 9544  ax-mulcl 9545  ax-mulrcl 9546  ax-mulcom 9547  ax-addass 9548  ax-mulass 9549  ax-distr 9550  ax-i2m1 9551  ax-1ne0 9552  ax-1rid 9553  ax-rnegex 9554  ax-rrecex 9555  ax-cnre 9556  ax-pre-lttri 9557  ax-pre-lttrn 9558  ax-pre-ltadd 9559  ax-pre-mulgt0 9560  ax-riotaBAD 32431
This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-fal 1443  df-ex 1658  df-nf 1662  df-sb 1791  df-eu 2274  df-mo 2275  df-clab 2409  df-cleq 2415  df-clel 2418  df-nfc 2552  df-ne 2595  df-nel 2596  df-ral 2713  df-rex 2714  df-reu 2715  df-rmo 2716  df-rab 2717  df-v 3018  df-sbc 3236  df-csb 3332  df-dif 3375  df-un 3377  df-in 3379  df-ss 3386  df-pss 3388  df-nul 3698  df-if 3848  df-pw 3919  df-sn 3935  df-pr 3937  df-tp 3939  df-op 3941  df-uni 4156  df-int 4192  df-iun 4237  df-iin 4238  df-br 4360  df-opab 4419  df-mpt 4420  df-tr 4455  df-eprel 4700  df-id 4704  df-po 4710  df-so 4711  df-fr 4748  df-we 4750  df-xp 4795  df-rel 4796  df-cnv 4797  df-co 4798  df-dm 4799  df-rn 4800  df-res 4801  df-ima 4802  df-pred 5335  df-ord 5381  df-on 5382  df-lim 5383  df-suc 5384  df-iota 5501  df-fun 5539  df-fn 5540  df-f 5541  df-f1 5542  df-fo 5543  df-f1o 5544  df-fv 5545  df-riota 6204  df-ov 6245  df-oprab 6246  df-mpt2 6247  df-om 6644  df-1st 6744  df-2nd 6745  df-tpos 6921  df-undef 6968  df-wrecs 6976  df-recs 7038  df-rdg 7076  df-1o 7130  df-oadd 7134  df-er 7311  df-map 7422  df-en 7518  df-dom 7519  df-sdom 7520  df-fin 7521  df-pnf 9621  df-mnf 9622  df-xr 9623  df-ltxr 9624  df-le 9625  df-sub 9806  df-neg 9807  df-nn 10554  df-2 10612  df-3 10613  df-4 10614  df-5 10615  df-6 10616  df-n0 10814  df-z 10882  df-uz 11104  df-fz 11729  df-struct 15059  df-ndx 15060  df-slot 15061  df-base 15062  df-sets 15063  df-ress 15064  df-plusg 15139  df-mulr 15140  df-sca 15142  df-vsca 15143  df-0g 15276  df-preset 16109  df-poset 16127  df-plt 16140  df-lub 16156  df-glb 16157  df-join 16158  df-meet 16159  df-p0 16221  df-p1 16222  df-lat 16228  df-clat 16290  df-mgm 16424  df-sgrp 16463  df-mnd 16473  df-submnd 16519  df-grp 16609  df-minusg 16610  df-sbg 16611  df-subg 16750  df-cntz 16907  df-lsm 17224  df-cmn 17368  df-abl 17369  df-mgp 17660  df-ur 17672  df-ring 17718  df-oppr 17787  df-dvdsr 17805  df-unit 17806  df-invr 17836  df-dvr 17847  df-drng 17913  df-lmod 18029  df-lss 18092  df-lsp 18131  df-lvec 18262  df-oposet 32648  df-ol 32650  df-oml 32651  df-covers 32738  df-ats 32739  df-atl 32770  df-cvlat 32794  df-hlat 32823  df-llines 32969  df-lplanes 32970  df-lvols 32971  df-lines 32972  df-psubsp 32974  df-pmap 32975  df-padd 33267  df-lhyp 33459  df-laut 33460  df-ldil 33575  df-ltrn 33576  df-trl 33631  df-tendo 34228  df-edring 34230  df-disoa 34503  df-dvech 34553  df-dib 34613  df-dic 34647
This theorem is referenced by:  dihlsscpre  34708  dihvalcqpre  34709
  Copyright terms: Public domain W3C validator