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

Theorem findsg 7260
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 3769 . . . . . . 7 (𝑥 = ∅ → (𝐵𝑥𝐵 ⊆ ∅))
21adantl 473 . . . . . 6 ((𝐵 = ∅ ∧ 𝑥 = ∅) → (𝐵𝑥𝐵 ⊆ ∅))
3 eqeq2 2772 . . . . . . . 8 (𝐵 = ∅ → (𝑥 = 𝐵𝑥 = ∅))
4 findsg.1 . . . . . . . 8 (𝑥 = 𝐵 → (𝜑𝜓))
53, 4syl6bir 244 . . . . . . 7 (𝐵 = ∅ → (𝑥 = ∅ → (𝜑𝜓)))
65imp 444 . . . . . 6 ((𝐵 = ∅ ∧ 𝑥 = ∅) → (𝜑𝜓))
72, 6imbi12d 333 . . . . 5 ((𝐵 = ∅ ∧ 𝑥 = ∅) → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
81imbi1d 330 . . . . . 6 (𝑥 = ∅ → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜑)))
9 ss0 4118 . . . . . . . . 9 (𝐵 ⊆ ∅ → 𝐵 = ∅)
109con3i 150 . . . . . . . 8 𝐵 = ∅ → ¬ 𝐵 ⊆ ∅)
1110pm2.21d 118 . . . . . . 7 𝐵 = ∅ → (𝐵 ⊆ ∅ → (𝜑𝜓)))
1211pm5.74d 262 . . . . . 6 𝐵 = ∅ → ((𝐵 ⊆ ∅ → 𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
138, 12sylan9bbr 739 . . . . 5 ((¬ 𝐵 = ∅ ∧ 𝑥 = ∅) → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
147, 13pm2.61ian 866 . . . 4 (𝑥 = ∅ → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ ∅ → 𝜓)))
1514imbi2d 329 . . 3 (𝑥 = ∅ → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵 ⊆ ∅ → 𝜓))))
16 sseq2 3769 . . . . 5 (𝑥 = 𝑦 → (𝐵𝑥𝐵𝑦))
17 findsg.2 . . . . 5 (𝑥 = 𝑦 → (𝜑𝜒))
1816, 17imbi12d 333 . . . 4 (𝑥 = 𝑦 → ((𝐵𝑥𝜑) ↔ (𝐵𝑦𝜒)))
1918imbi2d 329 . . 3 (𝑥 = 𝑦 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵𝑦𝜒))))
20 sseq2 3769 . . . . 5 (𝑥 = suc 𝑦 → (𝐵𝑥𝐵 ⊆ suc 𝑦))
21 findsg.3 . . . . 5 (𝑥 = suc 𝑦 → (𝜑𝜃))
2220, 21imbi12d 333 . . . 4 (𝑥 = suc 𝑦 → ((𝐵𝑥𝜑) ↔ (𝐵 ⊆ suc 𝑦𝜃)))
2322imbi2d 329 . . 3 (𝑥 = suc 𝑦 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵 ⊆ suc 𝑦𝜃))))
24 sseq2 3769 . . . . 5 (𝑥 = 𝐴 → (𝐵𝑥𝐵𝐴))
25 findsg.4 . . . . 5 (𝑥 = 𝐴 → (𝜑𝜏))
2624, 25imbi12d 333 . . . 4 (𝑥 = 𝐴 → ((𝐵𝑥𝜑) ↔ (𝐵𝐴𝜏)))
2726imbi2d 329 . . 3 (𝑥 = 𝐴 → ((𝐵 ∈ ω → (𝐵𝑥𝜑)) ↔ (𝐵 ∈ ω → (𝐵𝐴𝜏))))
28 findsg.5 . . . 4 (𝐵 ∈ ω → 𝜓)
2928a1d 25 . . 3 (𝐵 ∈ ω → (𝐵 ⊆ ∅ → 𝜓))
30 vex 3344 . . . . . . . . . . . . . 14 𝑦 ∈ V
3130sucex 7178 . . . . . . . . . . . . 13 suc 𝑦 ∈ V
3231eqvinc 3470 . . . . . . . . . . . 12 (suc 𝑦 = 𝐵 ↔ ∃𝑥(𝑥 = suc 𝑦𝑥 = 𝐵))
3328, 4syl5ibr 236 . . . . . . . . . . . . . 14 (𝑥 = 𝐵 → (𝐵 ∈ ω → 𝜑))
3421biimpd 219 . . . . . . . . . . . . . 14 (𝑥 = suc 𝑦 → (𝜑𝜃))
3533, 34sylan9r 693 . . . . . . . . . . . . 13 ((𝑥 = suc 𝑦𝑥 = 𝐵) → (𝐵 ∈ ω → 𝜃))
3635exlimiv 2008 . . . . . . . . . . . 12 (∃𝑥(𝑥 = suc 𝑦𝑥 = 𝐵) → (𝐵 ∈ ω → 𝜃))
3732, 36sylbi 207 . . . . . . . . . . 11 (suc 𝑦 = 𝐵 → (𝐵 ∈ ω → 𝜃))
3837eqcoms 2769 . . . . . . . . . 10 (𝐵 = suc 𝑦 → (𝐵 ∈ ω → 𝜃))
3938imim2i 16 . . . . . . . . 9 ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → (𝐵 ⊆ suc 𝑦 → (𝐵 ∈ ω → 𝜃)))
4039a1d 25 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦 → (𝐵 ∈ ω → 𝜃))))
4140com4r 94 . . . . . . 7 (𝐵 ∈ ω → ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
4241adantl 473 . . . . . 6 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
43 df-ne 2934 . . . . . . . . 9 (𝐵 ≠ suc 𝑦 ↔ ¬ 𝐵 = suc 𝑦)
4443anbi2i 732 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) ↔ (𝐵 ⊆ suc 𝑦 ∧ ¬ 𝐵 = suc 𝑦))
45 annim 440 . . . . . . . 8 ((𝐵 ⊆ suc 𝑦 ∧ ¬ 𝐵 = suc 𝑦) ↔ ¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦))
4644, 45bitri 264 . . . . . . 7 ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) ↔ ¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦))
47 nnon 7238 . . . . . . . . 9 (𝐵 ∈ ω → 𝐵 ∈ On)
48 nnon 7238 . . . . . . . . 9 (𝑦 ∈ ω → 𝑦 ∈ On)
49 onsssuc 5975 . . . . . . . . . 10 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵𝑦𝐵 ∈ suc 𝑦))
50 suceloni 7180 . . . . . . . . . . 11 (𝑦 ∈ On → suc 𝑦 ∈ On)
51 onelpss 5926 . . . . . . . . . . 11 ((𝐵 ∈ On ∧ suc 𝑦 ∈ On) → (𝐵 ∈ suc 𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5250, 51sylan2 492 . . . . . . . . . 10 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵 ∈ suc 𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5349, 52bitrd 268 . . . . . . . . 9 ((𝐵 ∈ On ∧ 𝑦 ∈ On) → (𝐵𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
5447, 48, 53syl2anr 496 . . . . . . . 8 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 ↔ (𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦)))
55 findsg.6 . . . . . . . . . . . 12 (((𝑦 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑦) → (𝜒𝜃))
5655ex 449 . . . . . . . . . . 11 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → (𝜒𝜃)))
57 ax-1 6 . . . . . . . . . . 11 (𝜃 → (𝐵 ⊆ suc 𝑦𝜃))
5856, 57syl8 76 . . . . . . . . . 10 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → (𝜒 → (𝐵 ⊆ suc 𝑦𝜃))))
5958a2d 29 . . . . . . . . 9 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵𝑦𝜒) → (𝐵𝑦 → (𝐵 ⊆ suc 𝑦𝜃))))
6059com23 86 . . . . . . . 8 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝑦 → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6154, 60sylbird 250 . . . . . . 7 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵 ⊆ suc 𝑦𝐵 ≠ suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6246, 61syl5bir 233 . . . . . 6 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → (¬ (𝐵 ⊆ suc 𝑦𝐵 = suc 𝑦) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6342, 62pm2.61d 170 . . . . 5 ((𝑦 ∈ ω ∧ 𝐵 ∈ ω) → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃)))
6463ex 449 . . . 4 (𝑦 ∈ ω → (𝐵 ∈ ω → ((𝐵𝑦𝜒) → (𝐵 ⊆ suc 𝑦𝜃))))
6564a2d 29 . . 3 (𝑦 ∈ ω → ((𝐵 ∈ ω → (𝐵𝑦𝜒)) → (𝐵 ∈ ω → (𝐵 ⊆ suc 𝑦𝜃))))
6615, 19, 23, 27, 29, 65finds 7259 . 2 (𝐴 ∈ ω → (𝐵 ∈ ω → (𝐵𝐴𝜏)))
6766imp31 447 1 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝐴) → 𝜏)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 383   = wceq 1632  wex 1853  wcel 2140  wne 2933  wss 3716  c0 4059  Oncon0 5885  suc csuc 5887  ωcom 7232
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1871  ax-4 1886  ax-5 1989  ax-6 2055  ax-7 2091  ax-8 2142  ax-9 2149  ax-10 2169  ax-11 2184  ax-12 2197  ax-13 2392  ax-ext 2741  ax-sep 4934  ax-nul 4942  ax-pr 5056  ax-un 7116
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-tru 1635  df-ex 1854  df-nf 1859  df-sb 2048  df-eu 2612  df-mo 2613  df-clab 2748  df-cleq 2754  df-clel 2757  df-nfc 2892  df-ne 2934  df-ral 3056  df-rex 3057  df-rab 3060  df-v 3343  df-sbc 3578  df-dif 3719  df-un 3721  df-in 3723  df-ss 3730  df-pss 3732  df-nul 4060  df-if 4232  df-pw 4305  df-sn 4323  df-pr 4325  df-tp 4327  df-op 4329  df-uni 4590  df-br 4806  df-opab 4866  df-tr 4906  df-eprel 5180  df-po 5188  df-so 5189  df-fr 5226  df-we 5228  df-ord 5888  df-on 5889  df-lim 5890  df-suc 5891  df-om 7233
This theorem is referenced by:  nnaordi  7870  inf3lem5  8705  ackbij2lem4  9277  sornom  9312  fin23lem15  9369  fin23lem36  9383  isf32lem1  9388  isf32lem2  9389  wunex2  9773  indpi  9942
  Copyright terms: Public domain W3C validator