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

Theorem pl42lem1N 39997
Description: Lemma for pl42N 40001. (Contributed by NM, 8-Apr-2012.) (New usage is discouraged.)
Hypotheses
Ref Expression
pl42lem.b 𝐵 = (Base‘𝐾)
pl42lem.l = (le‘𝐾)
pl42lem.j = (join‘𝐾)
pl42lem.m = (meet‘𝐾)
pl42lem.o = (oc‘𝐾)
pl42lem.f 𝐹 = (pmap‘𝐾)
pl42lem.p + = (+𝑃𝐾)
Assertion
Ref Expression
pl42lem1N (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵)) → ((𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊)) → (𝐹‘((((𝑋 𝑌) 𝑍) 𝑊) 𝑉)) = (((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)) ∩ (𝐹𝑉))))

Proof of Theorem pl42lem1N
StepHypRef Expression
1 simp11 1204 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝐾 ∈ HL)
21hllatd 39382 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝐾 ∈ Lat)
3 simp12 1205 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑋𝐵)
4 simp13 1206 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑌𝐵)
5 pl42lem.b . . . . . . . 8 𝐵 = (Base‘𝐾)
6 pl42lem.j . . . . . . . 8 = (join‘𝐾)
75, 6latjcl 18337 . . . . . . 7 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) ∈ 𝐵)
82, 3, 4, 7syl3anc 1373 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝑋 𝑌) ∈ 𝐵)
9 simp21 1207 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑍𝐵)
10 pl42lem.m . . . . . . 7 = (meet‘𝐾)
115, 10latmcl 18338 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑋 𝑌) ∈ 𝐵𝑍𝐵) → ((𝑋 𝑌) 𝑍) ∈ 𝐵)
122, 8, 9, 11syl3anc 1373 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝑋 𝑌) 𝑍) ∈ 𝐵)
13 simp22 1208 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑊𝐵)
145, 6latjcl 18337 . . . . 5 ((𝐾 ∈ Lat ∧ ((𝑋 𝑌) 𝑍) ∈ 𝐵𝑊𝐵) → (((𝑋 𝑌) 𝑍) 𝑊) ∈ 𝐵)
152, 12, 13, 14syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (((𝑋 𝑌) 𝑍) 𝑊) ∈ 𝐵)
16 simp23 1209 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑉𝐵)
17 eqid 2730 . . . . 5 (Atoms‘𝐾) = (Atoms‘𝐾)
18 pl42lem.f . . . . 5 𝐹 = (pmap‘𝐾)
195, 10, 17, 18pmapmeet 39791 . . . 4 ((𝐾 ∈ HL ∧ (((𝑋 𝑌) 𝑍) 𝑊) ∈ 𝐵𝑉𝐵) → (𝐹‘((((𝑋 𝑌) 𝑍) 𝑊) 𝑉)) = ((𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) ∩ (𝐹𝑉)))
201, 15, 16, 19syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘((((𝑋 𝑌) 𝑍) 𝑊) 𝑉)) = ((𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) ∩ (𝐹𝑉)))
21 pl42lem.l . . . . . . 7 = (le‘𝐾)
22 hlop 39380 . . . . . . . . 9 (𝐾 ∈ HL → 𝐾 ∈ OP)
231, 22syl 17 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝐾 ∈ OP)
24 pl42lem.o . . . . . . . . 9 = (oc‘𝐾)
255, 24opoccl 39212 . . . . . . . 8 ((𝐾 ∈ OP ∧ 𝑊𝐵) → ( 𝑊) ∈ 𝐵)
2623, 13, 25syl2anc 584 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ( 𝑊) ∈ 𝐵)
275, 21, 10latmle2 18363 . . . . . . . 8 ((𝐾 ∈ Lat ∧ (𝑋 𝑌) ∈ 𝐵𝑍𝐵) → ((𝑋 𝑌) 𝑍) 𝑍)
282, 8, 9, 27syl3anc 1373 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝑋 𝑌) 𝑍) 𝑍)
29 simp3r 1203 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑍 ( 𝑊))
305, 21, 2, 12, 9, 26, 28, 29lattrd 18344 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝑋 𝑌) 𝑍) ( 𝑊))
31 pl42lem.p . . . . . . 7 + = (+𝑃𝐾)
325, 21, 6, 18, 24, 31pmapojoinN 39986 . . . . . 6 (((𝐾 ∈ HL ∧ ((𝑋 𝑌) 𝑍) ∈ 𝐵𝑊𝐵) ∧ ((𝑋 𝑌) 𝑍) ( 𝑊)) → (𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) = ((𝐹‘((𝑋 𝑌) 𝑍)) + (𝐹𝑊)))
331, 12, 13, 30, 32syl31anc 1375 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) = ((𝐹‘((𝑋 𝑌) 𝑍)) + (𝐹𝑊)))
345, 10, 17, 18pmapmeet 39791 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑋 𝑌) ∈ 𝐵𝑍𝐵) → (𝐹‘((𝑋 𝑌) 𝑍)) = ((𝐹‘(𝑋 𝑌)) ∩ (𝐹𝑍)))
351, 8, 9, 34syl3anc 1373 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘((𝑋 𝑌) 𝑍)) = ((𝐹‘(𝑋 𝑌)) ∩ (𝐹𝑍)))
36 simp3l 1202 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → 𝑋 ( 𝑌))
375, 21, 6, 18, 24, 31pmapojoinN 39986 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ 𝑋 ( 𝑌)) → (𝐹‘(𝑋 𝑌)) = ((𝐹𝑋) + (𝐹𝑌)))
381, 3, 4, 36, 37syl31anc 1375 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘(𝑋 𝑌)) = ((𝐹𝑋) + (𝐹𝑌)))
3938ineq1d 4167 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝐹‘(𝑋 𝑌)) ∩ (𝐹𝑍)) = (((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)))
4035, 39eqtrd 2765 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘((𝑋 𝑌) 𝑍)) = (((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)))
4140oveq1d 7356 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝐹‘((𝑋 𝑌) 𝑍)) + (𝐹𝑊)) = ((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)))
4233, 41eqtrd 2765 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) = ((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)))
4342ineq1d 4167 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → ((𝐹‘(((𝑋 𝑌) 𝑍) 𝑊)) ∩ (𝐹𝑉)) = (((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)) ∩ (𝐹𝑉)))
4420, 43eqtrd 2765 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵) ∧ (𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊))) → (𝐹‘((((𝑋 𝑌) 𝑍) 𝑊) 𝑉)) = (((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)) ∩ (𝐹𝑉)))
45443expia 1121 1 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑍𝐵𝑊𝐵𝑉𝐵)) → ((𝑋 ( 𝑌) ∧ 𝑍 ( 𝑊)) → (𝐹‘((((𝑋 𝑌) 𝑍) 𝑊) 𝑉)) = (((((𝐹𝑋) + (𝐹𝑌)) ∩ (𝐹𝑍)) + (𝐹𝑊)) ∩ (𝐹𝑉))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395  w3a 1086   = wceq 1541  wcel 2110  cin 3899   class class class wbr 5089  cfv 6477  (class class class)co 7341  Basecbs 17112  lecple 17160  occoc 17161  joincjn 18209  meetcmee 18210  Latclat 18329  OPcops 39190  Atomscatm 39281  HLchlt 39368  pmapcpmap 39515  +𝑃cpadd 39813
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2112  ax-9 2120  ax-10 2143  ax-11 2159  ax-12 2179  ax-ext 2702  ax-rep 5215  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7663
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3344  df-reu 3345  df-rab 3394  df-v 3436  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4282  df-if 4474  df-pw 4550  df-sn 4575  df-pr 4577  df-op 4581  df-uni 4858  df-iun 4941  df-iin 4942  df-br 5090  df-opab 5152  df-mpt 5171  df-id 5509  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-iota 6433  df-fun 6479  df-fn 6480  df-f 6481  df-f1 6482  df-fo 6483  df-f1o 6484  df-fv 6485  df-riota 7298  df-ov 7344  df-oprab 7345  df-mpo 7346  df-1st 7916  df-2nd 7917  df-proset 18192  df-poset 18211  df-plt 18226  df-lub 18242  df-glb 18243  df-join 18244  df-meet 18245  df-p0 18321  df-p1 18322  df-lat 18330  df-clat 18397  df-oposet 39194  df-ol 39196  df-oml 39197  df-covers 39284  df-ats 39285  df-atl 39316  df-cvlat 39340  df-hlat 39369  df-psubsp 39521  df-pmap 39522  df-padd 39814  df-polarityN 39921  df-psubclN 39953
This theorem is referenced by:  pl42lem4N  40000
  Copyright terms: Public domain W3C validator