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

Theorem finsschain 9300
Description: A finite subset of the union of a superset chain is a subset of some element of the chain. A useful preliminary result for alexsub 24112 and others. (Contributed by Jeff Hankins, 25-Jan-2010.) (Proof shortened by Mario Carneiro, 11-Feb-2015.) (Revised by Mario Carneiro, 18-May-2015.)
Assertion
Ref Expression
finsschain (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝐵 ∈ Fin ∧ 𝐵 𝐴)) → ∃𝑧𝐴 𝐵𝑧)
Distinct variable groups:   𝑧,𝐴   𝑧,𝐵

Proof of Theorem finsschain
Dummy variables 𝑎 𝑏 𝑐 𝑢 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sseq1 3962 . . . . . 6 (𝑎 = ∅ → (𝑎 𝐴 ↔ ∅ ⊆ 𝐴))
2 sseq1 3962 . . . . . . 7 (𝑎 = ∅ → (𝑎𝑧 ↔ ∅ ⊆ 𝑧))
32rexbidv 3187 . . . . . 6 (𝑎 = ∅ → (∃𝑧𝐴 𝑎𝑧 ↔ ∃𝑧𝐴 ∅ ⊆ 𝑧))
41, 3imbi12d 346 . . . . 5 (𝑎 = ∅ → ((𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧) ↔ (∅ ⊆ 𝐴 → ∃𝑧𝐴 ∅ ⊆ 𝑧)))
54imbi2d 342 . . . 4 (𝑎 = ∅ → (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧)) ↔ ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (∅ ⊆ 𝐴 → ∃𝑧𝐴 ∅ ⊆ 𝑧))))
6 sseq1 3962 . . . . . 6 (𝑎 = 𝑏 → (𝑎 𝐴𝑏 𝐴))
7 sseq1 3962 . . . . . . 7 (𝑎 = 𝑏 → (𝑎𝑧𝑏𝑧))
87rexbidv 3187 . . . . . 6 (𝑎 = 𝑏 → (∃𝑧𝐴 𝑎𝑧 ↔ ∃𝑧𝐴 𝑏𝑧))
96, 8imbi12d 346 . . . . 5 (𝑎 = 𝑏 → ((𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧) ↔ (𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧)))
109imbi2d 342 . . . 4 (𝑎 = 𝑏 → (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧)) ↔ ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧))))
11 sseq1 3962 . . . . . 6 (𝑎 = (𝑏 ∪ {𝑐}) → (𝑎 𝐴 ↔ (𝑏 ∪ {𝑐}) ⊆ 𝐴))
12 sseq1 3962 . . . . . . 7 (𝑎 = (𝑏 ∪ {𝑐}) → (𝑎𝑧 ↔ (𝑏 ∪ {𝑐}) ⊆ 𝑧))
1312rexbidv 3187 . . . . . 6 (𝑎 = (𝑏 ∪ {𝑐}) → (∃𝑧𝐴 𝑎𝑧 ↔ ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
1411, 13imbi12d 346 . . . . 5 (𝑎 = (𝑏 ∪ {𝑐}) → ((𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧) ↔ ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)))
1514imbi2d 342 . . . 4 (𝑎 = (𝑏 ∪ {𝑐}) → (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧)) ↔ ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))))
16 sseq1 3962 . . . . . 6 (𝑎 = 𝐵 → (𝑎 𝐴𝐵 𝐴))
17 sseq1 3962 . . . . . . 7 (𝑎 = 𝐵 → (𝑎𝑧𝐵𝑧))
1817rexbidv 3187 . . . . . 6 (𝑎 = 𝐵 → (∃𝑧𝐴 𝑎𝑧 ↔ ∃𝑧𝐴 𝐵𝑧))
1916, 18imbi12d 346 . . . . 5 (𝑎 = 𝐵 → ((𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧) ↔ (𝐵 𝐴 → ∃𝑧𝐴 𝐵𝑧)))
2019imbi2d 342 . . . 4 (𝑎 = 𝐵 → (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑎 𝐴 → ∃𝑧𝐴 𝑎𝑧)) ↔ ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝐵 𝐴 → ∃𝑧𝐴 𝐵𝑧))))
21 0ss 4355 . . . . . . . 8 ∅ ⊆ 𝑧
2221rgenw 3081 . . . . . . 7 𝑧𝐴 ∅ ⊆ 𝑧
23 r19.2z 4454 . . . . . . 7 ((𝐴 ≠ ∅ ∧ ∀𝑧𝐴 ∅ ⊆ 𝑧) → ∃𝑧𝐴 ∅ ⊆ 𝑧)
2422, 23mpan2 701 . . . . . 6 (𝐴 ≠ ∅ → ∃𝑧𝐴 ∅ ⊆ 𝑧)
2524adantr 484 . . . . 5 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ∃𝑧𝐴 ∅ ⊆ 𝑧)
2625a1d 25 . . . 4 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (∅ ⊆ 𝐴 → ∃𝑧𝐴 ∅ ⊆ 𝑧))
27 id 22 . . . . . . . . 9 ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → (𝑏 ∪ {𝑐}) ⊆ 𝐴)
2827unssad 4146 . . . . . . . 8 ((𝑏 ∪ {𝑐}) ⊆ 𝐴𝑏 𝐴)
2928imim1i 63 . . . . . . 7 ((𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 𝑏𝑧))
30 sseq2 3963 . . . . . . . . . . 11 (𝑧 = 𝑤 → (𝑏𝑧𝑏𝑤))
3130cbvrexvw 3242 . . . . . . . . . 10 (∃𝑧𝐴 𝑏𝑧 ↔ ∃𝑤𝐴 𝑏𝑤)
32 simpr 488 . . . . . . . . . . . . . 14 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → (𝑏 ∪ {𝑐}) ⊆ 𝐴)
3332unssbd 4147 . . . . . . . . . . . . 13 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → {𝑐} ⊆ 𝐴)
34 vex 3459 . . . . . . . . . . . . . 14 𝑐 ∈ V
3534snss 4744 . . . . . . . . . . . . 13 (𝑐 𝐴 ↔ {𝑐} ⊆ 𝐴)
3633, 35sylibr 236 . . . . . . . . . . . 12 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → 𝑐 𝐴)
37 eluni2 4870 . . . . . . . . . . . 12 (𝑐 𝐴 ↔ ∃𝑢𝐴 𝑐𝑢)
3836, 37sylib 220 . . . . . . . . . . 11 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → ∃𝑢𝐴 𝑐𝑢)
39 reeanv 3235 . . . . . . . . . . . 12 (∃𝑢𝐴𝑤𝐴 (𝑐𝑢𝑏𝑤) ↔ (∃𝑢𝐴 𝑐𝑢 ∧ ∃𝑤𝐴 𝑏𝑤))
40 simpllr 785 . . . . . . . . . . . . . . . 16 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → [] Or 𝐴)
41 simprlr 789 . . . . . . . . . . . . . . . 16 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → 𝑤𝐴)
42 simprll 788 . . . . . . . . . . . . . . . 16 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → 𝑢𝐴)
43 sorpssun 7713 . . . . . . . . . . . . . . . 16 (( [] Or 𝐴 ∧ (𝑤𝐴𝑢𝐴)) → (𝑤𝑢) ∈ 𝐴)
4440, 41, 42, 43syl12anc 847 . . . . . . . . . . . . . . 15 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → (𝑤𝑢) ∈ 𝐴)
45 simprrr 791 . . . . . . . . . . . . . . . 16 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → 𝑏𝑤)
46 simprrl 790 . . . . . . . . . . . . . . . . 17 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → 𝑐𝑢)
4746snssd 4746 . . . . . . . . . . . . . . . 16 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → {𝑐} ⊆ 𝑢)
48 unss12 4141 . . . . . . . . . . . . . . . 16 ((𝑏𝑤 ∧ {𝑐} ⊆ 𝑢) → (𝑏 ∪ {𝑐}) ⊆ (𝑤𝑢))
4945, 47, 48syl2anc 593 . . . . . . . . . . . . . . 15 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → (𝑏 ∪ {𝑐}) ⊆ (𝑤𝑢))
50 sseq2 3963 . . . . . . . . . . . . . . . 16 (𝑧 = (𝑤𝑢) → ((𝑏 ∪ {𝑐}) ⊆ 𝑧 ↔ (𝑏 ∪ {𝑐}) ⊆ (𝑤𝑢)))
5150rspcev 3582 . . . . . . . . . . . . . . 15 (((𝑤𝑢) ∈ 𝐴 ∧ (𝑏 ∪ {𝑐}) ⊆ (𝑤𝑢)) → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)
5244, 49, 51syl2anc 593 . . . . . . . . . . . . . 14 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ ((𝑢𝐴𝑤𝐴) ∧ (𝑐𝑢𝑏𝑤))) → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)
5352expr 460 . . . . . . . . . . . . 13 ((((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) ∧ (𝑢𝐴𝑤𝐴)) → ((𝑐𝑢𝑏𝑤) → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
5453rexlimdvva 3220 . . . . . . . . . . . 12 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → (∃𝑢𝐴𝑤𝐴 (𝑐𝑢𝑏𝑤) → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
5539, 54biimtrrid 245 . . . . . . . . . . 11 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → ((∃𝑢𝐴 𝑐𝑢 ∧ ∃𝑤𝐴 𝑏𝑤) → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
5638, 55mpand 705 . . . . . . . . . 10 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → (∃𝑤𝐴 𝑏𝑤 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
5731, 56biimtrid 244 . . . . . . . . 9 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝑏 ∪ {𝑐}) ⊆ 𝐴) → (∃𝑧𝐴 𝑏𝑧 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))
5857ex 416 . . . . . . . 8 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → (∃𝑧𝐴 𝑏𝑧 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)))
5958a2d 29 . . . . . . 7 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 𝑏𝑧) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)))
6029, 59syl5 34 . . . . . 6 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ((𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)))
6160a2i 14 . . . . 5 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧)) → ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧)))
6261a1i 11 . . . 4 (𝑏 ∈ Fin → (((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝑏 𝐴 → ∃𝑧𝐴 𝑏𝑧)) → ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → ((𝑏 ∪ {𝑐}) ⊆ 𝐴 → ∃𝑧𝐴 (𝑏 ∪ {𝑐}) ⊆ 𝑧))))
635, 10, 15, 20, 26, 62findcard2 9133 . . 3 (𝐵 ∈ Fin → ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝐵 𝐴 → ∃𝑧𝐴 𝐵𝑧)))
6463com12 32 . 2 ((𝐴 ≠ ∅ ∧ [] Or 𝐴) → (𝐵 ∈ Fin → (𝐵 𝐴 → ∃𝑧𝐴 𝐵𝑧)))
6564imp32 422 1 (((𝐴 ≠ ∅ ∧ [] Or 𝐴) ∧ (𝐵 ∈ Fin ∧ 𝐵 𝐴)) → ∃𝑧𝐴 𝐵𝑧)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 399   = wceq 1561  wcel 2143  wne 2958  wral 3077  wrex 3087  cun 3903  wss 3905  c0 4286  {csn 4583   cuni 4866   Or wor 5555   [] crpss 7705  Fincfn 8927
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1816  ax-4 1830  ax-5 1931  ax-6 1988  ax-7 2029  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-sep 5247  ax-nul 5257  ax-pr 5391  ax-un 7718
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1564  df-fal 1574  df-ex 1801  df-nf 1805  df-sb 2092  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3078  df-rex 3088  df-reu 3369  df-rab 3416  df-v 3457  df-sbc 3746  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-br 5102  df-opab 5164  df-tr 5209  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-rpss 7706  df-om 7847  df-en 8928  df-fin 8931
This theorem is referenced by:  alexsubALTlem2  24115
  Copyright terms: Public domain W3C validator