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

Theorem paddasslem13 37466
Description: Lemma for paddass 37472. The case when 𝑟 (𝑥 𝑦). (Unlike the proof in Maeda and Maeda, we don't need 𝑥𝑦.) (Contributed by NM, 11-Jan-2012.)
Hypotheses
Ref Expression
paddasslem.l = (le‘𝐾)
paddasslem.j = (join‘𝐾)
paddasslem.a 𝐴 = (Atoms‘𝐾)
paddasslem.p + = (+𝑃𝐾)
Assertion
Ref Expression
paddasslem13 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 ∈ ((𝑋 + 𝑌) + 𝑍))

Proof of Theorem paddasslem13
StepHypRef Expression
1 simpl1l 1225 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝐾 ∈ HL)
2 simpl21 1252 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑋𝐴)
3 simpl22 1253 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑌𝐴)
4 paddasslem.a . . . . 5 𝐴 = (Atoms‘𝐾)
5 paddasslem.p . . . . 5 + = (+𝑃𝐾)
64, 5paddssat 37448 . . . 4 ((𝐾 ∈ HL ∧ 𝑋𝐴𝑌𝐴) → (𝑋 + 𝑌) ⊆ 𝐴)
71, 2, 3, 6syl3anc 1372 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → (𝑋 + 𝑌) ⊆ 𝐴)
8 simpl23 1254 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑍𝐴)
94, 5sspadd1 37449 . . 3 ((𝐾 ∈ HL ∧ (𝑋 + 𝑌) ⊆ 𝐴𝑍𝐴) → (𝑋 + 𝑌) ⊆ ((𝑋 + 𝑌) + 𝑍))
101, 7, 8, 9syl3anc 1372 . 2 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → (𝑋 + 𝑌) ⊆ ((𝑋 + 𝑌) + 𝑍))
111hllatd 36998 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝐾 ∈ Lat)
12 simprll 779 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑥𝑋)
13 simprlr 780 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑦𝑌)
14 simpl3l 1229 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝𝐴)
15 eqid 2738 . . . 4 (Base‘𝐾) = (Base‘𝐾)
16 paddasslem.l . . . 4 = (le‘𝐾)
1715, 4atbase 36923 . . . . 5 (𝑝𝐴𝑝 ∈ (Base‘𝐾))
1814, 17syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 ∈ (Base‘𝐾))
192, 12sseldd 3879 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑥𝐴)
2015, 4atbase 36923 . . . . . 6 (𝑥𝐴𝑥 ∈ (Base‘𝐾))
2119, 20syl 17 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑥 ∈ (Base‘𝐾))
22 simpl3r 1230 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑟𝐴)
2315, 4atbase 36923 . . . . . 6 (𝑟𝐴𝑟 ∈ (Base‘𝐾))
2422, 23syl 17 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑟 ∈ (Base‘𝐾))
25 paddasslem.j . . . . . 6 = (join‘𝐾)
2615, 25latjcl 17778 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑥 ∈ (Base‘𝐾) ∧ 𝑟 ∈ (Base‘𝐾)) → (𝑥 𝑟) ∈ (Base‘𝐾))
2711, 21, 24, 26syl3anc 1372 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → (𝑥 𝑟) ∈ (Base‘𝐾))
283, 13sseldd 3879 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑦𝐴)
2915, 4atbase 36923 . . . . . 6 (𝑦𝐴𝑦 ∈ (Base‘𝐾))
3028, 29syl 17 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑦 ∈ (Base‘𝐾))
3115, 25latjcl 17778 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑥 ∈ (Base‘𝐾) ∧ 𝑦 ∈ (Base‘𝐾)) → (𝑥 𝑦) ∈ (Base‘𝐾))
3211, 21, 30, 31syl3anc 1372 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → (𝑥 𝑦) ∈ (Base‘𝐾))
33 simprrr 782 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 (𝑥 𝑟))
3415, 16, 25latlej1 17787 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑥 ∈ (Base‘𝐾) ∧ 𝑦 ∈ (Base‘𝐾)) → 𝑥 (𝑥 𝑦))
3511, 21, 30, 34syl3anc 1372 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑥 (𝑥 𝑦))
36 simprrl 781 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑟 (𝑥 𝑦))
3715, 16, 25latjle12 17789 . . . . . 6 ((𝐾 ∈ Lat ∧ (𝑥 ∈ (Base‘𝐾) ∧ 𝑟 ∈ (Base‘𝐾) ∧ (𝑥 𝑦) ∈ (Base‘𝐾))) → ((𝑥 (𝑥 𝑦) ∧ 𝑟 (𝑥 𝑦)) ↔ (𝑥 𝑟) (𝑥 𝑦)))
3811, 21, 24, 32, 37syl13anc 1373 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → ((𝑥 (𝑥 𝑦) ∧ 𝑟 (𝑥 𝑦)) ↔ (𝑥 𝑟) (𝑥 𝑦)))
3935, 36, 38mpbi2and 712 . . . 4 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → (𝑥 𝑟) (𝑥 𝑦))
4015, 16, 11, 18, 27, 32, 33, 39lattrd 17785 . . 3 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 (𝑥 𝑦))
4116, 25, 4, 5elpaddri 37436 . . 3 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑌𝐴) ∧ (𝑥𝑋𝑦𝑌) ∧ (𝑝𝐴𝑝 (𝑥 𝑦))) → 𝑝 ∈ (𝑋 + 𝑌))
4211, 2, 3, 12, 13, 14, 40, 41syl322anc 1399 . 2 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 ∈ (𝑋 + 𝑌))
4310, 42sseldd 3879 1 ((((𝐾 ∈ HL ∧ 𝑝𝑧) ∧ (𝑋𝐴𝑌𝐴𝑍𝐴) ∧ (𝑝𝐴𝑟𝐴)) ∧ ((𝑥𝑋𝑦𝑌) ∧ (𝑟 (𝑥 𝑦) ∧ 𝑝 (𝑥 𝑟)))) → 𝑝 ∈ ((𝑋 + 𝑌) + 𝑍))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399  w3a 1088   = wceq 1542  wcel 2113  wne 2934  wss 3844   class class class wbr 5031  cfv 6340  (class class class)co 7171  Basecbs 16587  lecple 16676  joincjn 17671  Latclat 17772  Atomscatm 36897  HLchlt 36984  +𝑃cpadd 37429
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 1916  ax-6 1974  ax-7 2019  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2161  ax-12 2178  ax-ext 2710  ax-rep 5155  ax-sep 5168  ax-nul 5175  ax-pow 5233  ax-pr 5297  ax-un 7480
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-ral 3058  df-rex 3059  df-reu 3060  df-rab 3062  df-v 3400  df-sbc 3683  df-csb 3792  df-dif 3847  df-un 3849  df-in 3851  df-ss 3861  df-nul 4213  df-if 4416  df-pw 4491  df-sn 4518  df-pr 4520  df-op 4524  df-uni 4798  df-iun 4884  df-br 5032  df-opab 5094  df-mpt 5112  df-id 5430  df-xp 5532  df-rel 5533  df-cnv 5534  df-co 5535  df-dm 5536  df-rn 5537  df-res 5538  df-ima 5539  df-iota 6298  df-fun 6342  df-fn 6343  df-f 6344  df-f1 6345  df-fo 6346  df-f1o 6347  df-fv 6348  df-riota 7128  df-ov 7174  df-oprab 7175  df-mpo 7176  df-1st 7715  df-2nd 7716  df-poset 17673  df-lub 17701  df-glb 17702  df-join 17703  df-meet 17704  df-lat 17773  df-ats 36901  df-atl 36932  df-cvlat 36956  df-hlat 36985  df-padd 37430
This theorem is referenced by:  paddasslem14  37467
  Copyright terms: Public domain W3C validator