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

Theorem cdlemb3 34711
Description: Given two atoms not under the fiducial co-atom 𝑊, there is a third. Lemma B in [Crawley] p. 112. TODO: Is there a simpler more direct proof, that could be placed earlier e.g. near lhpexle 34108? Then replace cdlemb2 34144 with it. This is a more general version of cdlemb2 34144 without 𝑃𝑄 condition. (Contributed by NM, 27-Apr-2013.)
Hypotheses
Ref Expression
cdlemg5.l = (le‘𝐾)
cdlemg5.j = (join‘𝐾)
cdlemg5.a 𝐴 = (Atoms‘𝐾)
cdlemg5.h 𝐻 = (LHyp‘𝐾)
Assertion
Ref Expression
cdlemb3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄)))
Distinct variable groups:   𝐴,𝑟   𝐻,𝑟   𝐾,𝑟   ,𝑟   𝑃,𝑟   𝑊,𝑟   ,𝑟   𝑄,𝑟

Proof of Theorem cdlemb3
StepHypRef Expression
1 simpl1 1056 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simpl2 1057 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
3 cdlemg5.l . . . . 5 = (le‘𝐾)
4 cdlemg5.j . . . . 5 = (join‘𝐾)
5 cdlemg5.a . . . . 5 𝐴 = (Atoms‘𝐾)
6 cdlemg5.h . . . . 5 𝐻 = (LHyp‘𝐾)
73, 4, 5, 6cdlemg5 34710 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → ∃𝑟𝐴 (𝑃𝑟 ∧ ¬ 𝑟 𝑊))
81, 2, 7syl2anc 690 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) → ∃𝑟𝐴 (𝑃𝑟 ∧ ¬ 𝑟 𝑊))
9 ancom 464 . . . . . 6 ((𝑃𝑟 ∧ ¬ 𝑟 𝑊) ↔ (¬ 𝑟 𝑊𝑃𝑟))
10 eqcom 2612 . . . . . . . . 9 (𝑃 = 𝑟𝑟 = 𝑃)
11 simp2 1054 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → 𝑃 = 𝑄)
1211oveq2d 6539 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑃 𝑃) = (𝑃 𝑄))
13 simp11l 1164 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → 𝐾 ∈ HL)
14 simp12l 1166 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → 𝑃𝐴)
154, 5hlatjidm 33472 . . . . . . . . . . . . 13 ((𝐾 ∈ HL ∧ 𝑃𝐴) → (𝑃 𝑃) = 𝑃)
1613, 14, 15syl2anc 690 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑃 𝑃) = 𝑃)
1712, 16eqtr3d 2641 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑃 𝑄) = 𝑃)
1817breq2d 4585 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑟 (𝑃 𝑄) ↔ 𝑟 𝑃))
19 hlatl 33464 . . . . . . . . . . . 12 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
2013, 19syl 17 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → 𝐾 ∈ AtLat)
21 simp3 1055 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → 𝑟𝐴)
223, 5atcmp 33415 . . . . . . . . . . 11 ((𝐾 ∈ AtLat ∧ 𝑟𝐴𝑃𝐴) → (𝑟 𝑃𝑟 = 𝑃))
2320, 21, 14, 22syl3anc 1317 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑟 𝑃𝑟 = 𝑃))
2418, 23bitr2d 267 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑟 = 𝑃𝑟 (𝑃 𝑄)))
2510, 24syl5bb 270 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑃 = 𝑟𝑟 (𝑃 𝑄)))
2625necon3abid 2813 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → (𝑃𝑟 ↔ ¬ 𝑟 (𝑃 𝑄)))
2726anbi2d 735 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → ((¬ 𝑟 𝑊𝑃𝑟) ↔ (¬ 𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄))))
289, 27syl5bb 270 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄𝑟𝐴) → ((𝑃𝑟 ∧ ¬ 𝑟 𝑊) ↔ (¬ 𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄))))
29283expa 1256 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) ∧ 𝑟𝐴) → ((𝑃𝑟 ∧ ¬ 𝑟 𝑊) ↔ (¬ 𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄))))
3029rexbidva 3026 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) → (∃𝑟𝐴 (𝑃𝑟 ∧ ¬ 𝑟 𝑊) ↔ ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄))))
318, 30mpbid 220 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃 = 𝑄) → ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄)))
32 simpl1 1056 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → (𝐾 ∈ HL ∧ 𝑊𝐻))
33 simpl2 1057 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
34 simpl3 1058 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
35 simpr 475 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → 𝑃𝑄)
363, 4, 5, 6cdlemb2 34144 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄)))
3732, 33, 34, 35, 36syl121anc 1322 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ 𝑃𝑄) → ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄)))
3831, 37pm2.61dane 2864 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) → ∃𝑟𝐴𝑟 𝑊 ∧ ¬ 𝑟 (𝑃 𝑄)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 194  wa 382  w3a 1030   = wceq 1474  wcel 1975  wne 2775  wrex 2892   class class class wbr 4573  cfv 5786  (class class class)co 6523  lecple 15717  joincjn 16709  Atomscatm 33367  AtLatcal 33368  HLchlt 33454  LHypclh 34087
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1711  ax-4 1726  ax-5 1825  ax-6 1873  ax-7 1920  ax-8 1977  ax-9 1984  ax-10 2004  ax-11 2019  ax-12 2031  ax-13 2228  ax-ext 2585  ax-rep 4689  ax-sep 4699  ax-nul 4708  ax-pow 4760  ax-pr 4824  ax-un 6820
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1866  df-eu 2457  df-mo 2458  df-clab 2592  df-cleq 2598  df-clel 2601  df-nfc 2735  df-ne 2777  df-ral 2896  df-rex 2897  df-reu 2898  df-rab 2900  df-v 3170  df-sbc 3398  df-csb 3495  df-dif 3538  df-un 3540  df-in 3542  df-ss 3549  df-nul 3870  df-if 4032  df-pw 4105  df-sn 4121  df-pr 4123  df-op 4127  df-uni 4363  df-iun 4447  df-br 4574  df-opab 4634  df-mpt 4635  df-id 4939  df-xp 5030  df-rel 5031  df-cnv 5032  df-co 5033  df-dm 5034  df-rn 5035  df-res 5036  df-ima 5037  df-iota 5750  df-fun 5788  df-fn 5789  df-f 5790  df-f1 5791  df-fo 5792  df-f1o 5793  df-fv 5794  df-riota 6485  df-ov 6526  df-oprab 6527  df-preset 16693  df-poset 16711  df-plt 16723  df-lub 16739  df-glb 16740  df-join 16741  df-meet 16742  df-p0 16804  df-p1 16805  df-lat 16811  df-clat 16873  df-oposet 33280  df-ol 33282  df-oml 33283  df-covers 33370  df-ats 33371  df-atl 33402  df-cvlat 33426  df-hlat 33455  df-lhyp 34091
This theorem is referenced by:  cdlemg6e  34727
  Copyright terms: Public domain W3C validator