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

Theorem pexmidlem7N 38016
Description: Lemma for pexmidN 38009. Contradict pexmidlem6N 38015. (Contributed by NM, 3-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
pexmidlem7N (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑀𝑋)

Proof of Theorem pexmidlem7N
StepHypRef Expression
1 simpl1 1189 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝐾 ∈ HL)
2 simpl3 1191 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑝𝐴)
32snssd 4745 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → {𝑝} ⊆ 𝐴)
4 simpl2 1190 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑋𝐴)
5 pexmidlem.a . . . . . 6 𝐴 = (Atoms‘𝐾)
6 pexmidlem.p . . . . . 6 + = (+𝑃𝐾)
75, 6sspadd2 37856 . . . . 5 ((𝐾 ∈ HL ∧ {𝑝} ⊆ 𝐴𝑋𝐴) → {𝑝} ⊆ (𝑋 + {𝑝}))
81, 3, 4, 7syl3anc 1369 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → {𝑝} ⊆ (𝑋 + {𝑝}))
9 vex 3438 . . . . 5 𝑝 ∈ V
109snss 4722 . . . 4 (𝑝 ∈ (𝑋 + {𝑝}) ↔ {𝑝} ⊆ (𝑋 + {𝑝}))
118, 10sylibr 233 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑝 ∈ (𝑋 + {𝑝}))
12 pexmidlem.m . . 3 𝑀 = (𝑋 + {𝑝})
1311, 12eleqtrrdi 2845 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑝𝑀)
14 pexmidlem.o . . . . . 6 = (⊥𝑃𝐾)
155, 14polssatN 37948 . . . . 5 ((𝐾 ∈ HL ∧ 𝑋𝐴) → ( 𝑋) ⊆ 𝐴)
161, 4, 15syl2anc 583 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → ( 𝑋) ⊆ 𝐴)
175, 6sspadd1 37855 . . . 4 ((𝐾 ∈ HL ∧ 𝑋𝐴 ∧ ( 𝑋) ⊆ 𝐴) → 𝑋 ⊆ (𝑋 + ( 𝑋)))
181, 4, 16, 17syl3anc 1369 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑋 ⊆ (𝑋 + ( 𝑋)))
19 simpr3 1194 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))
2018, 19ssneldd 3926 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → ¬ 𝑝𝑋)
21 nelne1 3036 . 2 ((𝑝𝑀 ∧ ¬ 𝑝𝑋) → 𝑀𝑋)
2213, 20, 21syl2anc 583 1 (((𝐾 ∈ HL ∧ 𝑋𝐴𝑝𝐴) ∧ (( ‘( 𝑋)) = 𝑋𝑋 ≠ ∅ ∧ ¬ 𝑝 ∈ (𝑋 + ( 𝑋)))) → 𝑀𝑋)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1085   = wceq 1537  wcel 2101  wne 2938  wss 3889  c0 4259  {csn 4564  cfv 6447  (class class class)co 7295  lecple 16997  joincjn 18057  Atomscatm 37303  HLchlt 37390  +𝑃cpadd 37835  𝑃cpolN 37942
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2103  ax-9 2111  ax-10 2132  ax-11 2149  ax-12 2166  ax-ext 2704  ax-rep 5212  ax-sep 5226  ax-nul 5233  ax-pow 5291  ax-pr 5355  ax-un 7608  ax-riotaBAD 36993
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3an 1087  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2063  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2884  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3222  df-reu 3223  df-rab 3224  df-v 3436  df-sbc 3719  df-csb 3835  df-dif 3892  df-un 3894  df-in 3896  df-ss 3906  df-nul 4260  df-if 4463  df-pw 4538  df-sn 4565  df-pr 4567  df-op 4571  df-uni 4842  df-iun 4929  df-iin 4930  df-br 5078  df-opab 5140  df-mpt 5161  df-id 5491  df-xp 5597  df-rel 5598  df-cnv 5599  df-co 5600  df-dm 5601  df-rn 5602  df-res 5603  df-ima 5604  df-iota 6399  df-fun 6449  df-fn 6450  df-f 6451  df-f1 6452  df-fo 6453  df-f1o 6454  df-fv 6455  df-riota 7252  df-ov 7298  df-oprab 7299  df-mpo 7300  df-1st 7851  df-2nd 7852  df-undef 8109  df-proset 18041  df-poset 18059  df-lub 18092  df-glb 18093  df-join 18094  df-meet 18095  df-p1 18172  df-lat 18178  df-clat 18245  df-oposet 37216  df-ol 37218  df-oml 37219  df-ats 37307  df-atl 37338  df-cvlat 37362  df-hlat 37391  df-psubsp 37543  df-pmap 37544  df-padd 37836  df-polarityN 37943
This theorem is referenced by:  pexmidlem8N  38017
  Copyright terms: Public domain W3C validator