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

Theorem mreexmrid 17686
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 17679 . . 3 (𝜑𝑆𝑋)
6 mreexmrid.6 . . . 4 (𝜑𝑌𝑋)
76snssd 4809 . . 3 (𝜑 → {𝑌} ⊆ 𝑋)
85, 7unssd 4192 . 2 (𝜑 → (𝑆 ∪ {𝑌}) ⊆ 𝑋)
933ad2ant1 1134 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝐴 ∈ (Moore‘𝑋))
109elfvexd 6945 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑋 ∈ V)
11 mreexmrid.4 . . . . . . . . . 10 (𝜑 → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
12113ad2ant1 1134 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ∀𝑠 ∈ 𝒫 𝑋𝑦𝑋𝑧 ∈ ((𝑁‘(𝑠 ∪ {𝑦})) ∖ (𝑁𝑠))𝑦 ∈ (𝑁‘(𝑠 ∪ {𝑧})))
1343ad2ant1 1134 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝐼)
142, 9, 13mrissd 17679 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑆𝑋)
1514ssdifssd 4147 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∖ {𝑥}) ⊆ 𝑋)
1663ad2ant1 1134 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌𝑋)
17 simp3 1139 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
18 difundir 4291 . . . . . . . . . . . 12 ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥}))
19 simp2 1138 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥𝑆)
203, 1, 5mrcssidd 17668 . . . . . . . . . . . . . . . . . 18 (𝜑𝑆 ⊆ (𝑁𝑆))
21 mreexmrid.7 . . . . . . . . . . . . . . . . . 18 (𝜑 → ¬ 𝑌 ∈ (𝑁𝑆))
2220, 21ssneldd 3986 . . . . . . . . . . . . . . . . 17 (𝜑 → ¬ 𝑌𝑆)
23223ad2ant1 1134 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌𝑆)
24 nelneq 2865 . . . . . . . . . . . . . . . 16 ((𝑥𝑆 ∧ ¬ 𝑌𝑆) → ¬ 𝑥 = 𝑌)
2519, 23, 24syl2anc 584 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 = 𝑌)
26 elsni 4643 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑌} → 𝑥 = 𝑌)
2725, 26nsyl 140 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ {𝑌})
28 difsnb 4806 . . . . . . . . . . . . . 14 𝑥 ∈ {𝑌} ↔ ({𝑌} ∖ {𝑥}) = {𝑌})
2927, 28sylib 218 . . . . . . . . . . . . 13 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ({𝑌} ∖ {𝑥}) = {𝑌})
3029uneq2d 4168 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ ({𝑌} ∖ {𝑥})) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3118, 30eqtrid 2789 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∖ {𝑥}) ∪ {𝑌}))
3231fveq2d 6910 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
3317, 32eleqtrd 2843 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑥 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑌})))
341, 2, 9, 13, 19ismri2dad 17680 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑥 ∈ (𝑁‘(𝑆 ∖ {𝑥})))
3510, 12, 15, 16, 33, 34mreexd 17685 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
36213ad2ant1 1134 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁𝑆))
37 undif1 4476 . . . . . . . . . . 11 ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = (𝑆 ∪ {𝑥})
3819snssd 4809 . . . . . . . . . . . 12 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → {𝑥} ⊆ 𝑆)
39 ssequn2 4189 . . . . . . . . . . . 12 ({𝑥} ⊆ 𝑆 ↔ (𝑆 ∪ {𝑥}) = 𝑆)
4038, 39sylib 218 . . . . . . . . . . 11 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑆 ∪ {𝑥}) = 𝑆)
4137, 40eqtrid 2789 . . . . . . . . . 10 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ((𝑆 ∖ {𝑥}) ∪ {𝑥}) = 𝑆)
4241fveq2d 6910 . . . . . . . . 9 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})) = (𝑁𝑆))
4336, 42neleqtrrd 2864 . . . . . . . 8 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) → ¬ 𝑌 ∈ (𝑁‘((𝑆 ∖ {𝑥}) ∪ {𝑥})))
4435, 43pm2.65i 194 . . . . . . 7 ¬ (𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
45 df-3an 1089 . . . . . . 7 ((𝜑𝑥𝑆𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))) ↔ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥}))))
4644, 45mtbi 322 . . . . . 6 ¬ ((𝜑𝑥𝑆) ∧ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4746imnani 400 . . . . 5 ((𝜑𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4847adantlr 715 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥𝑆) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
4926adantl 481 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → 𝑥 = 𝑌)
5021ad2antrr 726 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑌 ∈ (𝑁𝑆))
5149, 50eqneltrd 2861 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁𝑆))
5249sneqd 4638 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → {𝑥} = {𝑌})
5352difeq2d 4126 . . . . . . . 8 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = ((𝑆 ∪ {𝑌}) ∖ {𝑌}))
54 difun2 4481 . . . . . . . 8 ((𝑆 ∪ {𝑌}) ∖ {𝑌}) = (𝑆 ∖ {𝑌})
5553, 54eqtrdi 2793 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = (𝑆 ∖ {𝑌}))
56 difsnb 4806 . . . . . . . . 9 𝑌𝑆 ↔ (𝑆 ∖ {𝑌}) = 𝑆)
5722, 56sylib 218 . . . . . . . 8 (𝜑 → (𝑆 ∖ {𝑌}) = 𝑆)
5857ad2antrr 726 . . . . . . 7 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑆 ∖ {𝑌}) = 𝑆)
5955, 58eqtrd 2777 . . . . . 6 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ((𝑆 ∪ {𝑌}) ∖ {𝑥}) = 𝑆)
6059fveq2d 6910 . . . . 5 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})) = (𝑁𝑆))
6151, 60neleqtrrd 2864 . . . 4 (((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) ∧ 𝑥 ∈ {𝑌}) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
62 simpr 484 . . . . 5 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → 𝑥 ∈ (𝑆 ∪ {𝑌}))
63 elun 4153 . . . . 5 (𝑥 ∈ (𝑆 ∪ {𝑌}) ↔ (𝑥𝑆𝑥 ∈ {𝑌}))
6462, 63sylib 218 . . . 4 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → (𝑥𝑆𝑥 ∈ {𝑌}))
6548, 61, 64mpjaodan 961 . . 3 ((𝜑𝑥 ∈ (𝑆 ∪ {𝑌})) → ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
6665ralrimiva 3146 . 2 (𝜑 → ∀𝑥 ∈ (𝑆 ∪ {𝑌}) ¬ 𝑥 ∈ (𝑁‘((𝑆 ∪ {𝑌}) ∖ {𝑥})))
671, 2, 3, 8, 66ismri2dd 17677 1 (𝜑 → (𝑆 ∪ {𝑌}) ∈ 𝐼)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  wo 848  w3a 1087   = wceq 1540  wcel 2108  wral 3061  Vcvv 3480  cdif 3948  cun 3949  wss 3951  𝒫 cpw 4600  {csn 4626  cfv 6561  Moorecmre 17625  mrClscmrc 17626  mrIndcmri 17627
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-sep 5296  ax-nul 5306  ax-pow 5365  ax-pr 5432  ax-un 7755
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2540  df-eu 2569  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3437  df-v 3482  df-sbc 3789  df-csb 3900  df-dif 3954  df-un 3956  df-in 3958  df-ss 3968  df-nul 4334  df-if 4526  df-pw 4602  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4908  df-int 4947  df-br 5144  df-opab 5206  df-mpt 5226  df-id 5578  df-xp 5691  df-rel 5692  df-cnv 5693  df-co 5694  df-dm 5695  df-rn 5696  df-res 5697  df-ima 5698  df-iota 6514  df-fun 6563  df-fn 6564  df-f 6565  df-fv 6569  df-mre 17629  df-mrc 17630  df-mri 17631
This theorem is referenced by:  mreexexlem2d  17688
  Copyright terms: Public domain W3C validator