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

Theorem frpoind 6353
Description: The principle of well-founded induction over a partial order. This theorem is a version of frind 9781 that does not require the axiom of infinity and can be used to prove wfi 6361 and tfi 7863. (Contributed by Scott Fenton, 11-Feb-2022.)
Assertion
Ref Expression
frpoind (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴 = 𝐵)
Distinct variable groups:   𝑦,𝐴   𝑦,𝐵   𝑦,𝑅

Proof of Theorem frpoind
StepHypRef Expression
1 ssdif0 4367 . . . . . . 7 (𝐴𝐵 ↔ (𝐴𝐵) = ∅)
21necon3bbii 2985 . . . . . 6 𝐴𝐵 ↔ (𝐴𝐵) ≠ ∅)
3 difss 4132 . . . . . . 7 (𝐴𝐵) ⊆ 𝐴
4 frpomin2 6352 . . . . . . . . 9 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)
5 eldif 3959 . . . . . . . . . . . . 13 (𝑦 ∈ (𝐴𝐵) ↔ (𝑦𝐴 ∧ ¬ 𝑦𝐵))
65anbi1i 622 . . . . . . . . . . . 12 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ ((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅))
7 anass 467 . . . . . . . . . . . 12 (((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)))
8 indif2 4273 . . . . . . . . . . . . . . . . 17 ((𝑅 “ {𝑦}) ∩ (𝐴𝐵)) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
9 df-pred 6310 . . . . . . . . . . . . . . . . . 18 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝐴𝐵) ∩ (𝑅 “ {𝑦}))
10 incom 4203 . . . . . . . . . . . . . . . . . 18 ((𝐴𝐵) ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
119, 10eqtri 2756 . . . . . . . . . . . . . . . . 17 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
12 df-pred 6310 . . . . . . . . . . . . . . . . . . 19 Pred(𝑅, 𝐴, 𝑦) = (𝐴 ∩ (𝑅 “ {𝑦}))
13 incom 4203 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1412, 13eqtri 2756 . . . . . . . . . . . . . . . . . 18 Pred(𝑅, 𝐴, 𝑦) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1514difeq1i 4118 . . . . . . . . . . . . . . . . 17 (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
168, 11, 153eqtr4i 2766 . . . . . . . . . . . . . . . 16 Pred(𝑅, (𝐴𝐵), 𝑦) = (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵)
1716eqeq1i 2733 . . . . . . . . . . . . . . 15 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
18 ssdif0 4367 . . . . . . . . . . . . . . 15 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
1917, 18bitr4i 277 . . . . . . . . . . . . . 14 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵)
2019anbi1ci 624 . . . . . . . . . . . . 13 ((¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
2120anbi2i 621 . . . . . . . . . . . 12 ((𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
226, 7, 213bitri 296 . . . . . . . . . . 11 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
2322rexbii2 3087 . . . . . . . . . 10 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
24 rexanali 3099 . . . . . . . . . 10 (∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵) ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2523, 24bitri 274 . . . . . . . . 9 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
264, 25sylib 217 . . . . . . . 8 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2726ex 411 . . . . . . 7 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
283, 27mpani 694 . . . . . 6 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → ((𝐴𝐵) ≠ ∅ → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
292, 28biimtrid 241 . . . . 5 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (¬ 𝐴𝐵 → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
3029con4d 115 . . . 4 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵) → 𝐴𝐵))
3130imp 405 . . 3 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)) → 𝐴𝐵)
3231adantrl 714 . 2 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴𝐵)
33 simprl 769 . 2 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐵𝐴)
3432, 33eqssd 3999 1 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴 = 𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 394  w3a 1084   = wceq 1533  wcel 2098  wne 2937  wral 3058  wrex 3067  cdif 3946  cin 3948  wss 3949  c0 4326  {csn 4632   Po wpo 5592   Fr wfr 5634   Se wse 5635  ccnv 5681  cima 5685  Predcpred 6309
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2699  ax-sep 5303  ax-nul 5310  ax-pr 5433
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2938  df-ral 3059  df-rex 3068  df-rab 3431  df-v 3475  df-dif 3952  df-un 3954  df-in 3956  df-ss 3966  df-nul 4327  df-if 4533  df-pw 4608  df-sn 4633  df-pr 4635  df-op 4639  df-br 5153  df-opab 5215  df-po 5594  df-fr 5637  df-se 5638  df-xp 5688  df-cnv 5690  df-dm 5692  df-rn 5693  df-res 5694  df-ima 5695  df-pred 6310
This theorem is referenced by:  frpoinsg  6354  wfi  6361
  Copyright terms: Public domain W3C validator