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

Theorem findsg 7319
Description: Principle of Finite Induction (inference schema), using implicit substitutions. The first four hypotheses establish the substitutions we need. The last two are the basis and the induction step. The basis of this version is an arbitrary natural number 𝐵 instead of zero. (Contributed by NM, 16-Sep-1995.)
Hypotheses
Ref Expression
findsg.1 (𝑥 = 𝐵 → (𝜑𝜓))
findsg.2 (𝑥 = 𝑦 → (𝜑𝜒))
findsg.3 (𝑥 = suc 𝑦 → (𝜑𝜃))
findsg.4 (𝑥 = 𝐴 → (𝜑𝜏))
findsg.5 (𝐵 ∈ ω → 𝜓)
findsg.6 (((𝑦 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑦) → (𝜒𝜃))
Assertion
Ref Expression
findsg (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝐴) → 𝜏)
Distinct variable groups:   𝑥,𝐴   𝑥,𝑦,𝐵   𝜓,𝑥   𝜒,𝑥   𝜃,𝑥   𝜏,𝑥   𝜑,𝑦
Allowed substitution hints:   𝜑(𝑥)   𝜓(𝑦)   𝜒(𝑦)   𝜃(𝑦)   𝜏(𝑦)   𝐴(𝑦)

Proof of Theorem findsg
StepHypRef Expression
1 sseq2 3824 . . . . . . 7 (𝑥 = ∅ → (𝐵𝑥𝐵 ⊆ ∅))
21adantl 469 . . . . . 6 ((𝐵 = ∅ ∧ 𝑥 = ∅) → (𝐵𝑥𝐵 ⊆ ∅))
3 eqeq2 2817 . . . . . . . 8 (𝐵 = ∅ → (𝑥 = 𝐵𝑥 = ∅))
4 findsg.1 . . . . . . . 8 (𝑥 = 𝐵 → (𝜑𝜓))
53, 4syl6bir 245 . . . . . . 7 (𝐵 = ∅ → (𝑥 = ∅ → (𝜑𝜓)))
65imp 395 . . . . . 6 ((𝐵 = ∅ ∧ 𝑥 = ∅) → (𝜑𝜓))
72, 6imbi12d 335 . . . . 5 ((𝐵 = ∅ ∧ 𝑥 = ∅) → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
81imbi1d 332 . . . . . 6 (𝑥 = ∅ → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜑)))
9 ss0 4172 . . . . . . . . 9 (𝐵 ⊆ ∅ → 𝐵 = ∅)
109con3i 151 . . . . . . . 8 𝐵 = ∅ → ¬ 𝐵 ⊆ ∅)
1110pm2.21d 119 . . . . . . 7 𝐵 = ∅ → (𝐵 ⊆ ∅ → (𝜑𝜓)))
1211pm5.74d 264 . . . . . 6 𝐵 = ∅ → ((𝐵 ⊆ ∅ → 𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
138, 12sylan9bbr 502 . . . . 5 ((¬ 𝐵 = ∅ ∧ 𝑥 = ∅) → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
147, 13pm2.61ian 837 . . . 4 (𝑥 = ∅ → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
1514imbi2d 331 . . 3 (𝑥 = ∅ → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵 ⊆ ∅ → 𝜓))))
16 sseq2 3824 . . . . 5 (𝑥 = 𝑦 → (𝐵𝑥𝐵𝑦))
17 findsg.2 . . . . 5 (𝑥 = 𝑦 → (𝜑𝜒))
1816, 17imbi12d 335 . . . 4 (𝑥 = 𝑦 → ((𝐵𝑥𝜑) ↔ (𝐵𝑦𝜒)))
1918imbi2d 331 . . 3 (𝑥 = 𝑦 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵𝑦𝜒))))
20 sseq2 3824 . . . . 5 (𝑥 = suc 𝑦 → (𝐵𝑥𝐵 ⊆ suc 𝑦))
21 findsg.3 . . . . 5 (𝑥 = suc 𝑦 → (𝜑𝜃))
2220, 21imbi12d 335 . . . 4 (𝑥 = suc 𝑦 → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ suc 𝑦𝜃)))
2322imbi2d 331 . . 3 (𝑥 = suc 𝑦 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵 ⊆ suc 𝑦𝜃))))
24 sseq2 3824 . . . . 5 (𝑥 = 𝐴 → (𝐵𝑥𝐵𝐴))
25 findsg.4 . . . . 5 (𝑥 = 𝐴 → (𝜑𝜏))
2624, 25imbi12d 335 . . . 4 (𝑥 = 𝐴 → ((𝐵𝑥𝜑) ↔ (𝐵𝐴𝜏)))
2726imbi2d 331 . . 3 (𝑥 = 𝐴 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵𝐴𝜏))))
28 findsg.5 . . . 4 (𝐵 ∈ ω → 𝜓)
2928a1d 25 . . 3 (𝐵 ∈ ω → (𝐵 ⊆ ∅ → 𝜓))
30 vex 3394 . . . . . . . . . . . . . 14 𝑦 ∈ V
3130sucex 7237 . . . . . . . . . . . . 13 suc 𝑦 ∈ V
3231eqvinc 3524 . . . . . . . . . . . 12 (suc 𝑦 = 𝐵 ↔ ∃𝑥(𝑥 = suc 𝑦𝑥 = 𝐵))
3328, 4syl5ibr 237 . . . . . . . . . . . . . 14 (𝑥 = 𝐵 → (𝐵 ∈ ω → 𝜑))
3421biimpd 220 . . . . . . . . . . . . . 14 (𝑥 = suc 𝑦 → (𝜑𝜃))
3533, 34sylan9r 500 . . . . . . . . . . . . 13 ((𝑥 = suc 𝑦𝑥 = 𝐵) → (𝐵 ∈ ω → 𝜃))
3635exlimiv 2021 . . . . . . . . . . . 12 (∃𝑥(𝑥 = suc 𝑦𝑥 = 𝐵) → (𝐵 ∈ ω → 𝜃))
3732, 36sylbi 208 . . . . . . . . . . 11 (suc 𝑦 = 𝐵 → (𝐵 ∈ ω → 𝜃))
3837eqcoms 2814 . . . . . . . . . 10 (𝐵 = suc 𝑦 → (𝐵 ∈ ω → 𝜃))
3938imim2i 16 . . . . . . . . 9 ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → (𝐵 ⊆ suc 𝑦 → (𝐵 ∈ ω → 𝜃)))
4039a1d 25 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦 → (𝐵 ∈ ω → 𝜃))))
4140com4r 94 . . . . . . 7 (𝐵 ∈ ω → ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
4241adantl 469 . . . . . 6 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
43 df-ne 2979 . . . . . . . . 9 (𝐵 ≠ suc 𝑦 ↔ ¬ 𝐵 = suc 𝑦)
4443anbi2i 611 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) ↔ (𝐵 ⊆ suc 𝑦 ∧ ¬ 𝐵 = suc 𝑦))
45 annim 392 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦 ∧ ¬ 𝐵 = suc 𝑦) ↔ ¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦))
4644, 45bitri 266 . . . . . . 7 ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) ↔ ¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦))
47 nnon 7297 . . . . . . . . 9 (𝐵 ∈ ω → 𝐵 ∈ On)
48 nnon 7297 . . . . . . . . 9 (𝑦 ∈ ω → 𝑦 ∈ On)
49 onsssuc 6024 . . . . . . . . . 10 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵𝑦𝐵 ∈ suc 𝑦))
50 suceloni 7239 . . . . . . . . . . 11 (𝑦 ∈ On → suc 𝑦 ∈ On)
51 onelpss 5976 . . . . . . . . . . 11 ((𝐵 ∈ On ∧ suc 𝑦 ∈ On) → (𝐵 ∈ suc 𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5250, 51sylan2 582 . . . . . . . . . 10 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵 ∈ suc 𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5349, 52bitrd 270 . . . . . . . . 9 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5447, 48, 53syl2anr 586 . . . . . . . 8 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
55 findsg.6 . . . . . . . . . . . 12 (((𝑦 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑦) → (𝜒𝜃))
5655ex 399 . . . . . . . . . . 11 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → (𝜒𝜃)))
57 ax-1 6 . . . . . . . . . . 11 (𝜃 → (𝐵 ⊆ suc 𝑦𝜃))
5856, 57syl8 76 . . . . . . . . . 10 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → (𝜒 → (𝐵 ⊆ suc 𝑦𝜃))))
5958a2d 29 . . . . . . . . 9 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵𝑦𝜒) → (𝐵𝑦 → (𝐵 ⊆ suc 𝑦𝜃))))
6059com23 86 . . . . . . . 8 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6154, 60sylbird 251 . . . . . . 7 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6246, 61syl5bir 234 . . . . . 6 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6342, 62pm2.61d 171 . . . . 5 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃)))
6463ex 399 . . . 4 (𝑦 ∈ ω → (𝐵 ∈ ω → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6564a2d 29 . . 3 (𝑦 ∈ ω → ((𝐵 ∈ ω → (𝐵𝑦𝜒)) → (𝐵 ∈ ω → (𝐵 ⊆ suc 𝑦𝜃))))
6615, 19, 23, 27, 29, 65finds 7318 . 2 (𝐴 ∈ ω → (𝐵 ∈ ω → (𝐵𝐴𝜏)))
6766imp31 406 1 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝐴) → 𝜏)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 197  wa 384   = wceq 1637  wex 1859  wcel 2156  wne 2978  wss 3769  c0 4116  Oncon0 5936  suc csuc 5938  ωcom 7291
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2068  ax-7 2104  ax-8 2158  ax-9 2165  ax-10 2185  ax-11 2201  ax-12 2214  ax-13 2420  ax-ext 2784  ax-sep 4975  ax-nul 4983  ax-pr 5096  ax-un 7175
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3or 1101  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2061  df-eu 2634  df-mo 2635  df-clab 2793  df-cleq 2799  df-clel 2802  df-nfc 2937  df-ne 2979  df-ral 3101  df-rex 3102  df-rab 3105  df-v 3393  df-sbc 3634  df-dif 3772  df-un 3774  df-in 3776  df-ss 3783  df-pss 3785  df-nul 4117  df-if 4280  df-pw 4353  df-sn 4371  df-pr 4373  df-tp 4375  df-op 4377  df-uni 4631  df-br 4845  df-opab 4907  df-tr 4947  df-eprel 5224  df-po 5232  df-so 5233  df-fr 5270  df-we 5272  df-ord 5939  df-on 5940  df-lim 5941  df-suc 5942  df-om 7292
This theorem is referenced by:  nnaordi  7931  inf3lem5  8772  ackbij2lem4  9345  sornom  9380  fin23lem15  9437  fin23lem36  9451  isf32lem1  9456  isf32lem2  9457  wunex2  9841  indpi  10010
  Copyright terms: Public domain W3C validator