MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mreexmrid Structured version   Visualization version   GIF version

Theorem mreexmrid 17687
Description: In a Moore system whose closure operator has the exchange property, if a set is independent and an element is not in its closure, then adding the element to the set gives another independent set. Lemma 4.1.5 in [FaureFrolicher] p. 84. (Contributed by David Moews, 1-May-2017.)
Hypotheses
Ref Expression
mreexmrid.1 (𝜑𝐴 ∈ (Moore‘𝑋))
mreexmrid.2 𝑁 = (mrCls‘𝐴)
mreexmrid.3 𝐼 = (mrInd‘𝐴)
mreexmrid.4 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
mreexmrid.5 (𝜑𝑆𝐼)
mreexmrid.6 (𝜑𝑌𝑋)
mreexmrid.7 (𝜑 → ¬ 𝑌 ∈ (𝑁𝑆))
Assertion
Ref Expression
mreexmrid (𝜑 → (𝑆 ∪ {𝑌}) ∈ 𝐼)
Distinct variable groups:   𝑋,𝑠,𝑦   𝑆,𝑠,𝑧,𝑦   𝜑,𝑠,𝑦,𝑧   𝑌,𝑠,𝑦,𝑧   𝑁,𝑠,𝑦,𝑧
Allowed substitution hints:   𝐴(𝑦,𝑧,𝑠)   𝐼(𝑦,𝑧,𝑠)   𝑋(𝑧)

Proof of Theorem mreexmrid
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 mreexmrid.2 . 2 𝑁 = (mrCls‘𝐴)
2 mreexmrid.3 . 2 𝐼 = (mrInd‘𝐴)
3 mreexmrid.1 . 2 (𝜑𝐴 ∈ (Moore‘𝑋))
4 mreexmrid.5 . . . 4 (𝜑𝑆𝐼)
52, 3, 4mrissd 17680 . . 3 (𝜑𝑆𝑋)
6 mreexmrid.6 . . . 4 (𝜑𝑌𝑋)
76snssd 4813 . . 3 (𝜑 → {𝑌} ⊆ 𝑋)
85, 7unssd 4201 . 2 (𝜑 → (𝑆 ∪ {𝑌}) ⊆ 𝑋)
933ad2ant1 1132 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝐴 ∈ (Moore‘𝑋))
109elfvexd 6945 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑋 ∈ V)
11 mreexmrid.4 . . . . . . . . . 10 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
12113ad2ant1 1132 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
1343ad2ant1 1132 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝐼)
142, 9, 13mrissd 17680 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝑋)
1514ssdifssd 4156 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∖ {𝑥}) ⊆ 𝑋)
1663ad2ant1 1132 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌𝑋)
17 simp3 1137 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
18 difundir 4296 . . . . . . . . . . . 12 ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥}))
19 simp2 1136 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥𝑆)
203, 1, 5mrcssidd 17669 . . . . . . . . . . . . . . . . . 18 (𝜑𝑆 ⊆ (𝑁𝑆))
21 mreexmrid.7 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ 𝑌 ∈ (𝑁𝑆))
2220, 21ssneldd 3997 . . . . . . . . . . . . . . . . 17 (𝜑 → ¬ 𝑌𝑆)
23223ad2ant1 1132 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌𝑆)
24 nelneq 2862 . . . . . . . . . . . . . . . 16 ((𝑥𝑆 ∧ ¬ 𝑌𝑆) → ¬ 𝑥 = 𝑌)
2519, 23, 24syl2anc 584 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 = 𝑌)
26 elsni 4647 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑌} → 𝑥 = 𝑌)
2725, 26nsyl 140 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ {𝑌})
28 difsnb 4810 . . . . . . . . . . . . . 14 𝑥 ∈ {𝑌} ↔ ({𝑌} ∖ {𝑥}) = {𝑌})
2927, 28sylib 218 . . . . . . . . . . . . 13 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ({𝑌} ∖ {𝑥}) = {𝑌})
3029uneq2d 4177 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥})) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3118, 30eqtrid 2786 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3231fveq2d 6910 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
3317, 32eleqtrd 2840 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
341, 2, 9, 13, 19ismri2dad 17681 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ (𝑁‘(𝑆 ∖ {𝑥})))
3510, 12, 15, 16, 33, 34mreexd 17686 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
36213ad2ant1 1132 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁𝑆))
37 undif1 4481 . . . . . . . . . . 11 ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = (𝑆 ∪ {𝑥})
3819snssd 4813 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → {𝑥} ⊆ 𝑆)
39 ssequn2 4198 . . . . . . . . . . . 12 ({𝑥} ⊆ 𝑆 ↔ (𝑆 ∪ {𝑥}) = 𝑆)
4038, 39sylib 218 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∪ {𝑥}) = 𝑆)
4137, 40eqtrid 2786 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = 𝑆)
4241fveq2d 6910 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})) = (𝑁𝑆))
4336, 42neleqtrrd 2861 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
4435, 43pm2.65i 194 . . . . . . 7 ¬ (𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
45 df-3an 1088 . . . . . . 7 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) ↔ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))))
4644, 45mtbi 322 . . . . . 6 ¬ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4746imnani 400 . . . . 5 ((𝜑𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4847adantlr 715 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4926adantl 481 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → 𝑥 = 𝑌)
5021ad2antrr 726 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑌 ∈ (𝑁𝑆))
5149, 50eqneltrd 2858 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁𝑆))
5249sneqd 4642 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → {𝑥} = {𝑌})
5352difeq2d 4135 . . . . . . . 8 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∪ {𝑌}) ∖ {𝑌}))
54 difun2 4486 . . . . . . . 8 ((𝑆 ∪ {𝑌}) ∖ {𝑌}) = (𝑆 ∖ {𝑌})
5553, 54eqtrdi 2790 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = (𝑆 ∖ {𝑌}))
56 difsnb 4810 . . . . . . . . 9 𝑌𝑆 ↔ (𝑆 ∖ {𝑌}) = 𝑆)
5722, 56sylib 218 . . . . . . . 8 (𝜑 → (𝑆 ∖ {𝑌}) = 𝑆)
5857ad2antrr 726 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑆 ∖ {𝑌}) = 𝑆)
5955, 58eqtrd 2774 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = 𝑆)
6059fveq2d 6910 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁𝑆))
6151, 60neleqtrrd 2861 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
62 simpr 484 . . . . 5 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → 𝑥 ∈ (𝑆 ∪ {𝑌}))
63 elun 4162 . . . . 5 (𝑥 ∈ (𝑆 ∪ {𝑌}) ↔ (𝑥𝑆𝑥 ∈ {𝑌}))
6462, 63sylib 218 . . . 4 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → (𝑥𝑆𝑥 ∈ {𝑌}))
6548, 61, 64mpjaodan 960 . . 3 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
6665ralrimiva 3143 . 2 (𝜑 → ∀𝑥 ∈ (𝑆 ∪ {𝑌}) ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
671, 2, 3, 8, 66ismri2dd 17678 1 (𝜑 → (𝑆 ∪ {𝑌}) ∈ 𝐼)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  wo 847  w3a 1086   = wceq 1536  wcel 2105  wral 3058  Vcvv 3477  cdif 3959  cun 3960  wss 3962  𝒫 cpw 4604  {csn 4630  cfv 6562  Moorecmre 17626  mrClscmrc 17627  mrIndcmri 17628
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-10 2138  ax-11 2154  ax-12 2174  ax-ext 2705  ax-sep 5301  ax-nul 5311  ax-pow 5370  ax-pr 5437  ax-un 7753
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1539  df-fal 1549  df-ex 1776  df-nf 1780  df-sb 2062  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2726  df-clel 2813  df-nfc 2889  df-ne 2938  df-ral 3059  df-rex 3068  df-rab 3433  df-v 3479  df-sbc 3791  df-csb 3908  df-dif 3965  df-un 3967  df-in 3969  df-ss 3979  df-nul 4339  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4912  df-int 4951  df-br 5148  df-opab 5210  df-mpt 5231  df-id 5582  df-xp 5694  df-rel 5695  df-cnv 5696  df-co 5697  df-dm 5698  df-rn 5699  df-res 5700  df-ima 5701  df-iota 6515  df-fun 6564  df-fn 6565  df-f 6566  df-fv 6570  df-mre 17630  df-mrc 17631  df-mri 17632
This theorem is referenced by:  mreexexlem2d  17689
  Copyright terms: Public domain W3C validator