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

Theorem lhpmcvr5N 39970
Description: Specialization of lhpmcvr2 39967. (Contributed by NM, 6-Apr-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
lhpmcvr2.b 𝐵 = (Base‘𝐾)
lhpmcvr2.l = (le‘𝐾)
lhpmcvr2.j = (join‘𝐾)
lhpmcvr2.m = (meet‘𝐾)
lhpmcvr2.a 𝐴 = (Atoms‘𝐾)
lhpmcvr2.h 𝐻 = (LHyp‘𝐾)
Assertion
Ref Expression
lhpmcvr5N (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) → ∃𝑝𝐴𝑝 𝑊 ∧ ¬ 𝑝 𝑌 ∧ (𝑝 (𝑋 𝑊)) = 𝑋))
Distinct variable groups:   𝐴,𝑝   𝐵,𝑝   𝐾,𝑝   ,𝑝   ,𝑝   𝑋,𝑝   𝑊,𝑝   𝐻,𝑝   𝑌,𝑝
Allowed substitution hint:   (𝑝)

Proof of Theorem lhpmcvr5N
StepHypRef Expression
1 lhpmcvr2.b . . . 4 𝐵 = (Base‘𝐾)
2 lhpmcvr2.l . . . 4 = (le‘𝐾)
3 lhpmcvr2.j . . . 4 = (join‘𝐾)
4 lhpmcvr2.m . . . 4 = (meet‘𝐾)
5 lhpmcvr2.a . . . 4 𝐴 = (Atoms‘𝐾)
6 lhpmcvr2.h . . . 4 𝐻 = (LHyp‘𝐾)
71, 2, 3, 4, 5, 6lhpmcvr2 39967 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊)) → ∃𝑝𝐴𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋))
873adant3 1132 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) → ∃𝑝𝐴𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋))
9 simp3l 1201 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → ¬ 𝑝 𝑊)
10 simp11 1203 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
11 simp12 1204 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝑋𝐵 ∧ ¬ 𝑋 𝑊))
12 simp2 1137 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑝𝐴)
1312, 9jca 511 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝑝𝐴 ∧ ¬ 𝑝 𝑊))
14 simp13l 1288 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑌𝐵)
15 simp13r 1289 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝑋 𝑌) 𝑊)
16 simp11l 1284 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝐾 ∈ HL)
1716hllatd 39306 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝐾 ∈ Lat)
181, 5atbase 39231 . . . . . . . . 9 (𝑝𝐴𝑝𝐵)
19183ad2ant2 1134 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑝𝐵)
20 simp12l 1286 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑋𝐵)
21 simp11r 1285 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑊𝐻)
221, 6lhpbase 39941 . . . . . . . . . 10 (𝑊𝐻𝑊𝐵)
2321, 22syl 17 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑊𝐵)
241, 4latmcl 18459 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑊𝐵) → (𝑋 𝑊) ∈ 𝐵)
2517, 20, 23, 24syl3anc 1372 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝑋 𝑊) ∈ 𝐵)
261, 2, 3latlej1 18467 . . . . . . . 8 ((𝐾 ∈ Lat ∧ 𝑝𝐵 ∧ (𝑋 𝑊) ∈ 𝐵) → 𝑝 (𝑝 (𝑋 𝑊)))
2717, 19, 25, 26syl3anc 1372 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑝 (𝑝 (𝑋 𝑊)))
28 simp3r 1202 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (𝑝 (𝑋 𝑊)) = 𝑋)
2927, 28breqtrd 5151 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → 𝑝 𝑋)
301, 2, 3, 4, 5, 6lhpmcvr4N 39969 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑊)) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊𝑝 𝑋)) → ¬ 𝑝 𝑌)
3110, 11, 13, 14, 15, 29, 30syl123anc 1388 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → ¬ 𝑝 𝑌)
329, 31, 283jca 1128 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴 ∧ (¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)) → (¬ 𝑝 𝑊 ∧ ¬ 𝑝 𝑌 ∧ (𝑝 (𝑋 𝑊)) = 𝑋))
33323expia 1121 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) ∧ 𝑝𝐴) → ((¬ 𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋) → (¬ 𝑝 𝑊 ∧ ¬ 𝑝 𝑌 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)))
3433reximdva 3155 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) → (∃𝑝𝐴𝑝 𝑊 ∧ (𝑝 (𝑋 𝑊)) = 𝑋) → ∃𝑝𝐴𝑝 𝑊 ∧ ¬ 𝑝 𝑌 ∧ (𝑝 (𝑋 𝑊)) = 𝑋)))
358, 34mpd 15 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵 ∧ ¬ 𝑋 𝑊) ∧ (𝑌𝐵 ∧ (𝑋 𝑌) 𝑊)) → ∃𝑝𝐴𝑝 𝑊 ∧ ¬ 𝑝 𝑌 ∧ (𝑝 (𝑋 𝑊)) = 𝑋))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1539  wcel 2107  wrex 3059   class class class wbr 5125  cfv 6542  (class class class)co 7414  Basecbs 17230  lecple 17284  joincjn 18332  meetcmee 18333  Latclat 18450  Atomscatm 39205  HLchlt 39292  LHypclh 39927
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2706  ax-rep 5261  ax-sep 5278  ax-nul 5288  ax-pow 5347  ax-pr 5414  ax-un 7738
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2808  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3773  df-csb 3882  df-dif 3936  df-un 3938  df-in 3940  df-ss 3950  df-nul 4316  df-if 4508  df-pw 4584  df-sn 4609  df-pr 4611  df-op 4615  df-uni 4890  df-iun 4975  df-br 5126  df-opab 5188  df-mpt 5208  df-id 5560  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-iota 6495  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-riota 7371  df-ov 7417  df-oprab 7418  df-proset 18315  df-poset 18334  df-plt 18349  df-lub 18365  df-glb 18366  df-join 18367  df-meet 18368  df-p0 18444  df-p1 18445  df-lat 18451  df-clat 18518  df-oposet 39118  df-ol 39120  df-oml 39121  df-covers 39208  df-ats 39209  df-atl 39240  df-cvlat 39264  df-hlat 39293  df-lhyp 39931
This theorem is referenced by:  lhpmcvr6N  39971
  Copyright terms: Public domain W3C validator