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

Theorem mreexmrid 17631
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 17624 . . 3 (𝜑𝑆𝑋)
6 mreexmrid.6 . . . 4 (𝜑𝑌𝑋)
76snssd 4814 . . 3 (𝜑 → {𝑌} ⊆ 𝑋)
85, 7unssd 4184 . 2 (𝜑 → (𝑆 ∪ {𝑌}) ⊆ 𝑋)
933ad2ant1 1130 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝐴 ∈ (Moore‘𝑋))
109elfvexd 6935 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑋 ∈ V)
11 mreexmrid.4 . . . . . . . . . 10 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
12113ad2ant1 1130 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
1343ad2ant1 1130 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝐼)
142, 9, 13mrissd 17624 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝑋)
1514ssdifssd 4139 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∖ {𝑥}) ⊆ 𝑋)
1663ad2ant1 1130 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌𝑋)
17 simp3 1135 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
18 difundir 4279 . . . . . . . . . . . 12 ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥}))
19 simp2 1134 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥𝑆)
203, 1, 5mrcssidd 17613 . . . . . . . . . . . . . . . . . 18 (𝜑𝑆 ⊆ (𝑁𝑆))
21 mreexmrid.7 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ 𝑌 ∈ (𝑁𝑆))
2220, 21ssneldd 3979 . . . . . . . . . . . . . . . . 17 (𝜑 → ¬ 𝑌𝑆)
23223ad2ant1 1130 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌𝑆)
24 nelneq 2849 . . . . . . . . . . . . . . . 16 ((𝑥𝑆 ∧ ¬ 𝑌𝑆) → ¬ 𝑥 = 𝑌)
2519, 23, 24syl2anc 582 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 = 𝑌)
26 elsni 4647 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑌} → 𝑥 = 𝑌)
2725, 26nsyl 140 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ {𝑌})
28 difsnb 4811 . . . . . . . . . . . . . 14 𝑥 ∈ {𝑌} ↔ ({𝑌} ∖ {𝑥}) = {𝑌})
2927, 28sylib 217 . . . . . . . . . . . . 13 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ({𝑌} ∖ {𝑥}) = {𝑌})
3029uneq2d 4160 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥})) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3118, 30eqtrid 2777 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3231fveq2d 6900 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
3317, 32eleqtrd 2827 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
341, 2, 9, 13, 19ismri2dad 17625 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ (𝑁‘(𝑆 ∖ {𝑥})))
3510, 12, 15, 16, 33, 34mreexd 17630 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
36213ad2ant1 1130 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁𝑆))
37 undif1 4477 . . . . . . . . . . 11 ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = (𝑆 ∪ {𝑥})
3819snssd 4814 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → {𝑥} ⊆ 𝑆)
39 ssequn2 4181 . . . . . . . . . . . 12 ({𝑥} ⊆ 𝑆 ↔ (𝑆 ∪ {𝑥}) = 𝑆)
4038, 39sylib 217 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∪ {𝑥}) = 𝑆)
4137, 40eqtrid 2777 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = 𝑆)
4241fveq2d 6900 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})) = (𝑁𝑆))
4336, 42neleqtrrd 2848 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
4435, 43pm2.65i 193 . . . . . . 7 ¬ (𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
45 df-3an 1086 . . . . . . 7 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) ↔ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))))
4644, 45mtbi 321 . . . . . 6 ¬ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4746imnani 399 . . . . 5 ((𝜑𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4847adantlr 713 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4926adantl 480 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → 𝑥 = 𝑌)
5021ad2antrr 724 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑌 ∈ (𝑁𝑆))
5149, 50eqneltrd 2845 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁𝑆))
5249sneqd 4642 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → {𝑥} = {𝑌})
5352difeq2d 4118 . . . . . . . 8 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∪ {𝑌}) ∖ {𝑌}))
54 difun2 4482 . . . . . . . 8 ((𝑆 ∪ {𝑌}) ∖ {𝑌}) = (𝑆 ∖ {𝑌})
5553, 54eqtrdi 2781 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = (𝑆 ∖ {𝑌}))
56 difsnb 4811 . . . . . . . . 9 𝑌𝑆 ↔ (𝑆 ∖ {𝑌}) = 𝑆)
5722, 56sylib 217 . . . . . . . 8 (𝜑 → (𝑆 ∖ {𝑌}) = 𝑆)
5857ad2antrr 724 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑆 ∖ {𝑌}) = 𝑆)
5955, 58eqtrd 2765 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = 𝑆)
6059fveq2d 6900 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁𝑆))
6151, 60neleqtrrd 2848 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
62 simpr 483 . . . . 5 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → 𝑥 ∈ (𝑆 ∪ {𝑌}))
63 elun 4145 . . . . 5 (𝑥 ∈ (𝑆 ∪ {𝑌}) ↔ (𝑥𝑆𝑥 ∈ {𝑌}))
6462, 63sylib 217 . . . 4 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → (𝑥𝑆𝑥 ∈ {𝑌}))
6548, 61, 64mpjaodan 956 . . 3 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
6665ralrimiva 3135 . 2 (𝜑 → ∀𝑥 ∈ (𝑆 ∪ {𝑌}) ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
671, 2, 3, 8, 66ismri2dd 17622 1 (𝜑 → (𝑆 ∪ {𝑌}) ∈ 𝐼)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 394  wo 845  w3a 1084   = wceq 1533  wcel 2098  wral 3050  Vcvv 3461  cdif 3941  cun 3942  wss 3944  𝒫 cpw 4604  {csn 4630  cfv 6549  Moorecmre 17570  mrClscmrc 17571  mrIndcmri 17572
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-sep 5300  ax-nul 5307  ax-pow 5365  ax-pr 5429  ax-un 7741
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2930  df-ral 3051  df-rex 3060  df-rab 3419  df-v 3463  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-nul 4323  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4910  df-int 4951  df-br 5150  df-opab 5212  df-mpt 5233  df-id 5576  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-iota 6501  df-fun 6551  df-fn 6552  df-f 6553  df-fv 6557  df-mre 17574  df-mrc 17575  df-mri 17576
This theorem is referenced by:  mreexexlem2d  17633
  Copyright terms: Public domain W3C validator