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

Theorem findcard3 8760
Description: Schema for strong induction on the cardinality of a finite set. The inductive hypothesis is that the result is true on any proper subset. The result is then proven to be true for all finite sets. (Contributed by Mario Carneiro, 13-Dec-2013.)
Hypotheses
Ref Expression
findcard3.1 (𝑥 = 𝑦 → (𝜑𝜒))
findcard3.2 (𝑥 = 𝐴 → (𝜑𝜏))
findcard3.3 (𝑦 ∈ Fin → (∀𝑥(𝑥𝑦𝜑) → 𝜒))
Assertion
Ref Expression
findcard3 (𝐴 ∈ Fin → 𝜏)
Distinct variable groups:   𝑥,𝑦   𝜑,𝑦   𝑥,𝐴   𝜏,𝑥   𝜒,𝑥
Allowed substitution hints:   𝜑(𝑥)   𝜒(𝑦)   𝜏(𝑦)   𝐴(𝑦)

Proof of Theorem findcard3
Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isfi 8532 . . 3 (𝐴 ∈ Fin ↔ ∃𝑤 ∈ ω 𝐴𝑤)
2 nnon 7585 . . . . . 6 (𝑤 ∈ ω → 𝑤 ∈ On)
3 eleq1w 2895 . . . . . . . 8 (𝑤 = 𝑧 → (𝑤 ∈ ω ↔ 𝑧 ∈ ω))
4 breq2 5069 . . . . . . . . . 10 (𝑤 = 𝑧 → (𝑥𝑤𝑥𝑧))
54imbi1d 344 . . . . . . . . 9 (𝑤 = 𝑧 → ((𝑥𝑤𝜑) ↔ (𝑥𝑧𝜑)))
65albidv 1917 . . . . . . . 8 (𝑤 = 𝑧 → (∀𝑥(𝑥𝑤𝜑) ↔ ∀𝑥(𝑥𝑧𝜑)))
73, 6imbi12d 347 . . . . . . 7 (𝑤 = 𝑧 → ((𝑤 ∈ ω → ∀𝑥(𝑥𝑤𝜑)) ↔ (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑))))
8 rspe 3304 . . . . . . . . . . . . . 14 ((𝑤 ∈ ω ∧ 𝑦𝑤) → ∃𝑤 ∈ ω 𝑦𝑤)
9 isfi 8532 . . . . . . . . . . . . . 14 (𝑦 ∈ Fin ↔ ∃𝑤 ∈ ω 𝑦𝑤)
108, 9sylibr 236 . . . . . . . . . . . . 13 ((𝑤 ∈ ω ∧ 𝑦𝑤) → 𝑦 ∈ Fin)
11 19.21v 1936 . . . . . . . . . . . . . . . 16 (∀𝑥(𝑧 ∈ ω → (𝑥𝑧𝜑)) ↔ (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)))
1211ralbii 3165 . . . . . . . . . . . . . . 15 (∀𝑧𝑤𝑥(𝑧 ∈ ω → (𝑥𝑧𝜑)) ↔ ∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)))
13 ralcom4 3235 . . . . . . . . . . . . . . 15 (∀𝑧𝑤𝑥(𝑧 ∈ ω → (𝑥𝑧𝜑)) ↔ ∀𝑥𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)))
1412, 13bitr3i 279 . . . . . . . . . . . . . 14 (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) ↔ ∀𝑥𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)))
15 pssss 4071 . . . . . . . . . . . . . . . . . . . . 21 (𝑥𝑦𝑥𝑦)
16 ssfi 8737 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑦 ∈ Fin ∧ 𝑥𝑦) → 𝑥 ∈ Fin)
17 isfi 8532 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ Fin ↔ ∃𝑧 ∈ ω 𝑥𝑧)
1816, 17sylib 220 . . . . . . . . . . . . . . . . . . . . 21 ((𝑦 ∈ Fin ∧ 𝑥𝑦) → ∃𝑧 ∈ ω 𝑥𝑧)
1910, 15, 18syl2an 597 . . . . . . . . . . . . . . . . . . . 20 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → ∃𝑧 ∈ ω 𝑥𝑧)
20 ensym 8557 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑥𝑧𝑧𝑥)
2120ad2antll 727 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑧𝑥)
22 php3 8702 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑦 ∈ Fin ∧ 𝑥𝑦) → 𝑥𝑦)
2310, 22sylan 582 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → 𝑥𝑦)
24 simpllr 774 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑦𝑤)
25 sdomentr 8650 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑥𝑦𝑦𝑤) → 𝑥𝑤)
2623, 24, 25syl2an2r 683 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑥𝑤)
27 ensdomtr 8652 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑧𝑥𝑥𝑤) → 𝑧𝑤)
2821, 26, 27syl2anc 586 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑧𝑤)
29 nnon 7585 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧 ∈ ω → 𝑧 ∈ On)
3029ad2antrl 726 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑧 ∈ On)
312ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑤 ∈ On)
32 sdomel 8663 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑧 ∈ On ∧ 𝑤 ∈ On) → (𝑧𝑤𝑧𝑤))
3330, 31, 32syl2anc 586 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → (𝑧𝑤𝑧𝑤))
3428, 33mpd 15 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) ∧ (𝑧 ∈ ω ∧ 𝑥𝑧)) → 𝑧𝑤)
3534ex 415 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → ((𝑧 ∈ ω ∧ 𝑥𝑧) → 𝑧𝑤))
36 simpr 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑧 ∈ ω ∧ 𝑥𝑧) → 𝑥𝑧)
3735, 36jca2 516 . . . . . . . . . . . . . . . . . . . . 21 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → ((𝑧 ∈ ω ∧ 𝑥𝑧) → (𝑧𝑤𝑥𝑧)))
3837reximdv2 3271 . . . . . . . . . . . . . . . . . . . 20 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (∃𝑧 ∈ ω 𝑥𝑧 → ∃𝑧𝑤 𝑥𝑧))
3919, 38mpd 15 . . . . . . . . . . . . . . . . . . 19 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → ∃𝑧𝑤 𝑥𝑧)
40 r19.29 3254 . . . . . . . . . . . . . . . . . . . 20 ((∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ ∃𝑧𝑤 𝑥𝑧) → ∃𝑧𝑤 ((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧))
4140expcom 416 . . . . . . . . . . . . . . . . . . 19 (∃𝑧𝑤 𝑥𝑧 → (∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → ∃𝑧𝑤 ((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧)))
4239, 41syl 17 . . . . . . . . . . . . . . . . . 18 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → ∃𝑧𝑤 ((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧)))
43 ordom 7588 . . . . . . . . . . . . . . . . . . . . . . 23 Ord ω
44 ordelss 6206 . . . . . . . . . . . . . . . . . . . . . . 23 ((Ord ω ∧ 𝑤 ∈ ω) → 𝑤 ⊆ ω)
4543, 44mpan 688 . . . . . . . . . . . . . . . . . . . . . 22 (𝑤 ∈ ω → 𝑤 ⊆ ω)
4645ad2antrr 724 . . . . . . . . . . . . . . . . . . . . 21 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → 𝑤 ⊆ ω)
4746sseld 3965 . . . . . . . . . . . . . . . . . . . 20 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (𝑧𝑤𝑧 ∈ ω))
48 pm2.27 42 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 ∈ ω → ((𝑧 ∈ ω → (𝑥𝑧𝜑)) → (𝑥𝑧𝜑)))
4948impd 413 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ ω → (((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧) → 𝜑))
5047, 49syl6 35 . . . . . . . . . . . . . . . . . . 19 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (𝑧𝑤 → (((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧) → 𝜑)))
5150rexlimdv 3283 . . . . . . . . . . . . . . . . . 18 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (∃𝑧𝑤 ((𝑧 ∈ ω → (𝑥𝑧𝜑)) ∧ 𝑥𝑧) → 𝜑))
5242, 51syld 47 . . . . . . . . . . . . . . . . 17 (((𝑤 ∈ ω ∧ 𝑦𝑤) ∧ 𝑥𝑦) → (∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → 𝜑))
5352ex 415 . . . . . . . . . . . . . . . 16 ((𝑤 ∈ ω ∧ 𝑦𝑤) → (𝑥𝑦 → (∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → 𝜑)))
5453com23 86 . . . . . . . . . . . . . . 15 ((𝑤 ∈ ω ∧ 𝑦𝑤) → (∀𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → (𝑥𝑦𝜑)))
5554alimdv 1913 . . . . . . . . . . . . . 14 ((𝑤 ∈ ω ∧ 𝑦𝑤) → (∀𝑥𝑧𝑤 (𝑧 ∈ ω → (𝑥𝑧𝜑)) → ∀𝑥(𝑥𝑦𝜑)))
5614, 55syl5bi 244 . . . . . . . . . . . . 13 ((𝑤 ∈ ω ∧ 𝑦𝑤) → (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) → ∀𝑥(𝑥𝑦𝜑)))
57 findcard3.3 . . . . . . . . . . . . 13 (𝑦 ∈ Fin → (∀𝑥(𝑥𝑦𝜑) → 𝜒))
5810, 56, 57sylsyld 61 . . . . . . . . . . . 12 ((𝑤 ∈ ω ∧ 𝑦𝑤) → (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) → 𝜒))
5958impancom 454 . . . . . . . . . . 11 ((𝑤 ∈ ω ∧ ∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑))) → (𝑦𝑤𝜒))
6059alrimiv 1924 . . . . . . . . . 10 ((𝑤 ∈ ω ∧ ∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑))) → ∀𝑦(𝑦𝑤𝜒))
6160expcom 416 . . . . . . . . 9 (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) → (𝑤 ∈ ω → ∀𝑦(𝑦𝑤𝜒)))
62 breq1 5068 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝑥𝑤𝑦𝑤))
63 findcard3.1 . . . . . . . . . . 11 (𝑥 = 𝑦 → (𝜑𝜒))
6462, 63imbi12d 347 . . . . . . . . . 10 (𝑥 = 𝑦 → ((𝑥𝑤𝜑) ↔ (𝑦𝑤𝜒)))
6564cbvalvw 2039 . . . . . . . . 9 (∀𝑥(𝑥𝑤𝜑) ↔ ∀𝑦(𝑦𝑤𝜒))
6661, 65syl6ibr 254 . . . . . . . 8 (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) → (𝑤 ∈ ω → ∀𝑥(𝑥𝑤𝜑)))
6766a1i 11 . . . . . . 7 (𝑤 ∈ On → (∀𝑧𝑤 (𝑧 ∈ ω → ∀𝑥(𝑥𝑧𝜑)) → (𝑤 ∈ ω → ∀𝑥(𝑥𝑤𝜑))))
687, 67tfis2 7570 . . . . . 6 (𝑤 ∈ On → (𝑤 ∈ ω → ∀𝑥(𝑥𝑤𝜑)))
692, 68mpcom 38 . . . . 5 (𝑤 ∈ ω → ∀𝑥(𝑥𝑤𝜑))
7069rgen 3148 . . . 4 𝑤 ∈ ω ∀𝑥(𝑥𝑤𝜑)
71 r19.29 3254 . . . 4 ((∀𝑤 ∈ ω ∀𝑥(𝑥𝑤𝜑) ∧ ∃𝑤 ∈ ω 𝐴𝑤) → ∃𝑤 ∈ ω (∀𝑥(𝑥𝑤𝜑) ∧ 𝐴𝑤))
7270, 71mpan 688 . . 3 (∃𝑤 ∈ ω 𝐴𝑤 → ∃𝑤 ∈ ω (∀𝑥(𝑥𝑤𝜑) ∧ 𝐴𝑤))
731, 72sylbi 219 . 2 (𝐴 ∈ Fin → ∃𝑤 ∈ ω (∀𝑥(𝑥𝑤𝜑) ∧ 𝐴𝑤))
74 breq1 5068 . . . . . 6 (𝑥 = 𝐴 → (𝑥𝑤𝐴𝑤))
75 findcard3.2 . . . . . 6 (𝑥 = 𝐴 → (𝜑𝜏))
7674, 75imbi12d 347 . . . . 5 (𝑥 = 𝐴 → ((𝑥𝑤𝜑) ↔ (𝐴𝑤𝜏)))
7776spcgv 3594 . . . 4 (𝐴 ∈ Fin → (∀𝑥(𝑥𝑤𝜑) → (𝐴𝑤𝜏)))
7877impd 413 . . 3 (𝐴 ∈ Fin → ((∀𝑥(𝑥𝑤𝜑) ∧ 𝐴𝑤) → 𝜏))
7978rexlimdvw 3290 . 2 (𝐴 ∈ Fin → (∃𝑤 ∈ ω (∀𝑥(𝑥𝑤𝜑) ∧ 𝐴𝑤) → 𝜏))
8073, 79mpd 15 1 (𝐴 ∈ Fin → 𝜏)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398  wal 1531   = wceq 1533  wcel 2110  wral 3138  wrex 3139  wss 3935  wpss 3936   class class class wbr 5065  Ord word 6189  Oncon0 6190  ωcom 7579  cen 8505  csdm 8507  Fincfn 8508
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5202  ax-nul 5209  ax-pow 5265  ax-pr 5329  ax-un 7460
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3496  df-sbc 3772  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4567  df-pr 4569  df-tp 4571  df-op 4573  df-uni 4838  df-br 5066  df-opab 5128  df-tr 5172  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-we 5515  df-xp 5560  df-rel 5561  df-cnv 5562  df-co 5563  df-dm 5564  df-rn 5565  df-res 5566  df-ima 5567  df-ord 6193  df-on 6194  df-lim 6195  df-suc 6196  df-iota 6313  df-fun 6356  df-fn 6357  df-f 6358  df-f1 6359  df-fo 6360  df-f1o 6361  df-fv 6362  df-om 7580  df-er 8288  df-en 8509  df-dom 8510  df-sdom 8511  df-fin 8512
This theorem is referenced by:  marypha1lem  8896  pgpfac1  19201  pgpfac  19205  fbfinnfr  22448  wilthlem3  25646
  Copyright terms: Public domain W3C validator