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

Theorem lplnle 37240
Description: Any element greater than 0 and not an atom and not a lattice line majorizes a lattice plane. (Contributed by NM, 28-Jun-2012.)
Hypotheses
Ref Expression
lplnle.b 𝐵 = (Base‘𝐾)
lplnle.l = (le‘𝐾)
lplnle.z 0 = (0.‘𝐾)
lplnle.a 𝐴 = (Atoms‘𝐾)
lplnle.n 𝑁 = (LLines‘𝐾)
lplnle.p 𝑃 = (LPlanes‘𝐾)
Assertion
Ref Expression
lplnle (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → ∃𝑦𝑃 𝑦 𝑋)
Distinct variable groups:   𝑦,𝐾   𝑦,   𝑦,𝑃   𝑦,𝑋
Allowed substitution hints:   𝐴(𝑦)   𝐵(𝑦)   𝑁(𝑦)   0 (𝑦)

Proof of Theorem lplnle
Dummy variables 𝑧 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 lplnle.b . . . 4 𝐵 = (Base‘𝐾)
2 lplnle.l . . . 4 = (le‘𝐾)
3 lplnle.z . . . 4 0 = (0.‘𝐾)
4 lplnle.a . . . 4 𝐴 = (Atoms‘𝐾)
5 lplnle.n . . . 4 𝑁 = (LLines‘𝐾)
61, 2, 3, 4, 5llnle 37218 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴)) → ∃𝑧𝑁 𝑧 𝑋)
763adantr3 1173 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → ∃𝑧𝑁 𝑧 𝑋)
8 simp1ll 1238 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝐾 ∈ HL)
91, 5llnbase 37209 . . . . . . 7 (𝑧𝑁𝑧𝐵)
1093ad2ant2 1136 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑧𝐵)
11 simp1lr 1239 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑋𝐵)
12 simp3 1140 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑧 𝑋)
13 simp2 1139 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑧𝑁)
14 simp1r3 1273 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → ¬ 𝑋𝑁)
15 nelne2 3029 . . . . . . . 8 ((𝑧𝑁 ∧ ¬ 𝑋𝑁) → 𝑧𝑋)
1613, 14, 15syl2anc 587 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑧𝑋)
17 eqid 2736 . . . . . . . . 9 (lt‘𝐾) = (lt‘𝐾)
182, 17pltval 17792 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑧𝑁𝑋𝐵) → (𝑧(lt‘𝐾)𝑋 ↔ (𝑧 𝑋𝑧𝑋)))
198, 13, 11, 18syl3anc 1373 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → (𝑧(lt‘𝐾)𝑋 ↔ (𝑧 𝑋𝑧𝑋)))
2012, 16, 19mpbir2and 713 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → 𝑧(lt‘𝐾)𝑋)
21 eqid 2736 . . . . . . 7 (join‘𝐾) = (join‘𝐾)
22 eqid 2736 . . . . . . 7 ( ⋖ ‘𝐾) = ( ⋖ ‘𝐾)
231, 2, 17, 21, 22, 4hlrelat3 37112 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑧𝐵𝑋𝐵) ∧ 𝑧(lt‘𝐾)𝑋) → ∃𝑝𝐴 (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋))
248, 10, 11, 20, 23syl31anc 1375 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → ∃𝑝𝐴 (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋))
25 simp1ll 1238 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝐾 ∈ HL)
2625hllatd 37064 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝐾 ∈ Lat)
27 simp21 1208 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝑧𝑁)
2827, 9syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝑧𝐵)
29 simp23 1210 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝑝𝐴)
301, 4atbase 36989 . . . . . . . . . . . . 13 (𝑝𝐴𝑝𝐵)
3129, 30syl 17 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝑝𝐵)
321, 21latjcl 17899 . . . . . . . . . . . 12 ((𝐾 ∈ Lat ∧ 𝑧𝐵𝑝𝐵) → (𝑧(join‘𝐾)𝑝) ∈ 𝐵)
3326, 28, 31, 32syl3anc 1373 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → (𝑧(join‘𝐾)𝑝) ∈ 𝐵)
34 simp3l 1203 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → 𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝))
35 lplnle.p . . . . . . . . . . . 12 𝑃 = (LPlanes‘𝐾)
361, 22, 5, 35lplni 37232 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ (𝑧(join‘𝐾)𝑝) ∈ 𝐵𝑧𝑁) ∧ 𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝)) → (𝑧(join‘𝐾)𝑝) ∈ 𝑃)
3725, 33, 27, 34, 36syl31anc 1375 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → (𝑧(join‘𝐾)𝑝) ∈ 𝑃)
38 simp3r 1204 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → (𝑧(join‘𝐾)𝑝) 𝑋)
39 breq1 5042 . . . . . . . . . . 11 (𝑦 = (𝑧(join‘𝐾)𝑝) → (𝑦 𝑋 ↔ (𝑧(join‘𝐾)𝑝) 𝑋))
4039rspcev 3527 . . . . . . . . . 10 (((𝑧(join‘𝐾)𝑝) ∈ 𝑃 ∧ (𝑧(join‘𝐾)𝑝) 𝑋) → ∃𝑦𝑃 𝑦 𝑋)
4137, 38, 40syl2anc 587 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ (𝑧𝑁𝑧 𝑋𝑝𝐴) ∧ (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋)) → ∃𝑦𝑃 𝑦 𝑋)
42413exp 1121 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → ((𝑧𝑁𝑧 𝑋𝑝𝐴) → ((𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋) → ∃𝑦𝑃 𝑦 𝑋)))
43423expd 1355 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → (𝑧𝑁 → (𝑧 𝑋 → (𝑝𝐴 → ((𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋) → ∃𝑦𝑃 𝑦 𝑋)))))
44433imp 1113 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → (𝑝𝐴 → ((𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋) → ∃𝑦𝑃 𝑦 𝑋)))
4544rexlimdv 3192 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → (∃𝑝𝐴 (𝑧( ⋖ ‘𝐾)(𝑧(join‘𝐾)𝑝) ∧ (𝑧(join‘𝐾)𝑝) 𝑋) → ∃𝑦𝑃 𝑦 𝑋))
4624, 45mpd 15 . . . 4 ((((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) ∧ 𝑧𝑁𝑧 𝑋) → ∃𝑦𝑃 𝑦 𝑋)
47463exp 1121 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → (𝑧𝑁 → (𝑧 𝑋 → ∃𝑦𝑃 𝑦 𝑋)))
4847rexlimdv 3192 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → (∃𝑧𝑁 𝑧 𝑋 → ∃𝑦𝑃 𝑦 𝑋))
497, 48mpd 15 1 (((𝐾 ∈ HL ∧ 𝑋𝐵) ∧ (𝑋0 ∧ ¬ 𝑋𝐴 ∧ ¬ 𝑋𝑁)) → ∃𝑦𝑃 𝑦 𝑋)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2112  wne 2932  wrex 3052   class class class wbr 5039  cfv 6358  (class class class)co 7191  Basecbs 16666  lecple 16756  ltcplt 17769  joincjn 17772  0.cp0 17883  Latclat 17891  ccvr 36962  Atomscatm 36963  HLchlt 37050  LLinesclln 37191  LPlanesclpl 37192
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2160  ax-12 2177  ax-ext 2708  ax-rep 5164  ax-sep 5177  ax-nul 5184  ax-pow 5243  ax-pr 5307  ax-un 7501
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2728  df-clel 2809  df-nfc 2879  df-ne 2933  df-ral 3056  df-rex 3057  df-reu 3058  df-rab 3060  df-v 3400  df-sbc 3684  df-csb 3799  df-dif 3856  df-un 3858  df-in 3860  df-ss 3870  df-nul 4224  df-if 4426  df-pw 4501  df-sn 4528  df-pr 4530  df-op 4534  df-uni 4806  df-iun 4892  df-br 5040  df-opab 5102  df-mpt 5121  df-id 5440  df-xp 5542  df-rel 5543  df-cnv 5544  df-co 5545  df-dm 5546  df-rn 5547  df-res 5548  df-ima 5549  df-iota 6316  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-riota 7148  df-ov 7194  df-oprab 7195  df-proset 17756  df-poset 17774  df-plt 17790  df-lub 17806  df-glb 17807  df-join 17808  df-meet 17809  df-p0 17885  df-lat 17892  df-clat 17959  df-oposet 36876  df-ol 36878  df-oml 36879  df-covers 36966  df-ats 36967  df-atl 36998  df-cvlat 37022  df-hlat 37051  df-llines 37198  df-lplanes 37199
This theorem is referenced by:  lplncvrlvol  37316
  Copyright terms: Public domain W3C validator