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

Theorem pexmidlem4N 37268
Description: Lemma for pexmidN 37264. (Contributed by NM, 2-Feb-2012.) (New usage is discouraged.)
Hypotheses
Ref Expression
pexmidlem.l = (le‘𝐾)
pexmidlem.j = (join‘𝐾)
pexmidlem.a 𝐴 = (Atoms‘𝐾)
pexmidlem.p + = (+𝑃𝐾)
pexmidlem.o = (⊥𝑃𝐾)
pexmidlem.m 𝑀 = (𝑋 + {𝑝})
Assertion
Ref Expression
pexmidlem4N (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑝 ∈ (𝑋 + ( 𝑋)))
Distinct variable groups:   𝐴,𝑞   𝐾,𝑞   𝑀,𝑞   ,𝑞   + ,𝑞   𝑋,𝑞   𝑞,𝑝
Allowed substitution hints:   𝐴(𝑝)   + (𝑝)   (𝑞,𝑝)   𝐾(𝑝)   (𝑞,𝑝)   𝑀(𝑝)   (𝑝)   𝑋(𝑝)

Proof of Theorem pexmidlem4N
Dummy variable 𝑟 is distinct from all other variables.
StepHypRef Expression
1 simpl1 1188 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝐾 ∈ HL)
21hllatd 36659 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝐾 ∈ Lat)
3 simpl2 1189 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑋𝐴)
4 simpl3 1190 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑝𝐴)
5 simprl 770 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑋 ≠ ∅)
6 inss2 4159 . . . . . 6 (( 𝑋) ∩ 𝑀) ⊆ 𝑀
76sseli 3914 . . . . 5 (𝑞 ∈ (( 𝑋) ∩ 𝑀) → 𝑞𝑀)
8 pexmidlem.m . . . . 5 𝑀 = (𝑋 + {𝑝})
97, 8eleqtrdi 2903 . . . 4 (𝑞 ∈ (( 𝑋) ∩ 𝑀) → 𝑞 ∈ (𝑋 + {𝑝}))
109ad2antll 728 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑞 ∈ (𝑋 + {𝑝}))
11 pexmidlem.l . . . 4 = (le‘𝐾)
12 pexmidlem.j . . . 4 = (join‘𝐾)
13 pexmidlem.a . . . 4 𝐴 = (Atoms‘𝐾)
14 pexmidlem.p . . . 4 + = (+𝑃𝐾)
1511, 12, 13, 14elpaddatiN 37100 . . 3 (((𝐾 ∈ Lat ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (𝑋 + {𝑝}))) → ∃𝑟𝑋 𝑞 (𝑟 𝑝))
162, 3, 4, 5, 10, 15syl32anc 1375 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → ∃𝑟𝑋 𝑞 (𝑟 𝑝))
17 simp1 1133 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → (𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴))
18 simp3l 1198 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → 𝑟𝑋)
19 inss1 4158 . . . . . . 7 (( 𝑋) ∩ 𝑀) ⊆ ( 𝑋)
20 simp2r 1197 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → 𝑞 ∈ (( 𝑋) ∩ 𝑀))
2119, 20sseldi 3916 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → 𝑞 ∈ ( 𝑋))
22 simp3r 1199 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → 𝑞 (𝑟 𝑝))
23 pexmidlem.o . . . . . . 7 = (⊥𝑃𝐾)
2411, 12, 13, 14, 23, 8pexmidlem3N 37267 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑟𝑋𝑞 ∈ ( 𝑋)) ∧ 𝑞 (𝑟 𝑝)) → 𝑝 ∈ (𝑋 + ( 𝑋)))
2517, 18, 21, 22, 24syl121anc 1372 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀)) ∧ (𝑟𝑋𝑞 (𝑟 𝑝))) → 𝑝 ∈ (𝑋 + ( 𝑋)))
26253expia 1118 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → ((𝑟𝑋𝑞 (𝑟 𝑝)) → 𝑝 ∈ (𝑋 + ( 𝑋))))
2726expd 419 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → (𝑟𝑋 → (𝑞 (𝑟 𝑝) → 𝑝 ∈ (𝑋 + ( 𝑋)))))
2827rexlimdv 3245 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → (∃𝑟𝑋 𝑞 (𝑟 𝑝) → 𝑝 ∈ (𝑋 + ( 𝑋))))
2916, 28mpd 15 1 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (𝑋 ≠ ∅ ∧ 𝑞 ∈ (( 𝑋) ∩ 𝑀))) → 𝑝 ∈ (𝑋 + ( 𝑋)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399  w3a 1084   = wceq 1538  wcel 2112  wne 2990  wrex 3110  cin 3883  wss 3884  c0 4246  {csn 4528   class class class wbr 5033  cfv 6328  (class class class)co 7139  lecple 16568  joincjn 17550  Latclat 17651  Atomscatm 36558  HLchlt 36645  +𝑃cpadd 37090  𝑃cpolN 37197
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2114  ax-9 2122  ax-10 2143  ax-11 2159  ax-12 2176  ax-ext 2773  ax-rep 5157  ax-sep 5170  ax-nul 5177  ax-pow 5234  ax-pr 5298  ax-un 7445  ax-riotaBAD 36248
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2601  df-eu 2632  df-clab 2780  df-cleq 2794  df-clel 2873  df-nfc 2941  df-ne 2991  df-ral 3114  df-rex 3115  df-reu 3116  df-rmo 3117  df-rab 3118  df-v 3446  df-sbc 3724  df-csb 3832  df-dif 3887  df-un 3889  df-in 3891  df-ss 3901  df-nul 4247  df-if 4429  df-pw 4502  df-sn 4529  df-pr 4531  df-op 4535  df-uni 4804  df-iun 4886  df-iin 4887  df-br 5034  df-opab 5096  df-mpt 5114  df-id 5428  df-xp 5529  df-rel 5530  df-cnv 5531  df-co 5532  df-dm 5533  df-rn 5534  df-res 5535  df-ima 5536  df-iota 6287  df-fun 6330  df-fn 6331  df-f 6332  df-f1 6333  df-fo 6334  df-f1o 6335  df-fv 6336  df-riota 7097  df-ov 7142  df-oprab 7143  df-mpo 7144  df-1st 7675  df-2nd 7676  df-undef 7926  df-proset 17534  df-poset 17552  df-plt 17564  df-lub 17580  df-glb 17581  df-join 17582  df-meet 17583  df-p0 17645  df-p1 17646  df-lat 17652  df-clat 17714  df-oposet 36471  df-ol 36473  df-oml 36474  df-covers 36561  df-ats 36562  df-atl 36593  df-cvlat 36617  df-hlat 36646  df-psubsp 36798  df-pmap 36799  df-padd 37091  df-polarityN 37198
This theorem is referenced by:  pexmidlem5N  37269
  Copyright terms: Public domain W3C validator