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

Theorem frpoind 6365
Description: The principle of well-founded induction over a partial order. This theorem is a version of frind 9788 that does not require the axiom of infinity and can be used to prove wfi 6373 and tfi 7874. (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 4372 . . . . . . 7 (𝐴𝐵 ↔ (𝐴𝐵) = ∅)
21necon3bbii 2986 . . . . . 6 𝐴𝐵 ↔ (𝐴𝐵) ≠ ∅)
3 difss 4146 . . . . . . 7 (𝐴𝐵) ⊆ 𝐴
4 frpomin2 6364 . . . . . . . . 9 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)
5 eldif 3973 . . . . . . . . . . . . 13 (𝑦 ∈ (𝐴𝐵) ↔ (𝑦𝐴 ∧ ¬ 𝑦𝐵))
65anbi1i 624 . . . . . . . . . . . 12 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ ((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅))
7 anass 468 . . . . . . . . . . . 12 (((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)))
8 indif2 4287 . . . . . . . . . . . . . . . . 17 ((𝑅 “ {𝑦}) ∩ (𝐴𝐵)) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
9 df-pred 6323 . . . . . . . . . . . . . . . . . 18 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝐴𝐵) ∩ (𝑅 “ {𝑦}))
10 incom 4217 . . . . . . . . . . . . . . . . . 18 ((𝐴𝐵) ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
119, 10eqtri 2763 . . . . . . . . . . . . . . . . 17 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
12 df-pred 6323 . . . . . . . . . . . . . . . . . . 19 Pred(𝑅, 𝐴, 𝑦) = (𝐴 ∩ (𝑅 “ {𝑦}))
13 incom 4217 . . . . . . . . . . . . . . . . . . 19 (𝐴 ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1412, 13eqtri 2763 . . . . . . . . . . . . . . . . . 18 Pred(𝑅, 𝐴, 𝑦) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1514difeq1i 4132 . . . . . . . . . . . . . . . . 17 (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
168, 11, 153eqtr4i 2773 . . . . . . . . . . . . . . . 16 Pred(𝑅, (𝐴𝐵), 𝑦) = (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵)
1716eqeq1i 2740 . . . . . . . . . . . . . . 15 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
18 ssdif0 4372 . . . . . . . . . . . . . . 15 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
1917, 18bitr4i 278 . . . . . . . . . . . . . 14 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵)
2019anbi1ci 626 . . . . . . . . . . . . 13 ((¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
2120anbi2i 623 . . . . . . . . . . . 12 ((𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
226, 7, 213bitri 297 . . . . . . . . . . 11 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
2322rexbii2 3088 . . . . . . . . . 10 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
24 rexanali 3100 . . . . . . . . . 10 (∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵) ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2523, 24bitri 275 . . . . . . . . 9 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
264, 25sylib 218 . . . . . . . 8 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2726ex 412 . . . . . . 7 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
283, 27mpani 696 . . . . . 6 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → ((𝐴𝐵) ≠ ∅ → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
292, 28biimtrid 242 . . . . 5 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (¬ 𝐴𝐵 → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
3029con4d 115 . . . 4 ((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) → (∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵) → 𝐴𝐵))
3130imp 406 . . 3 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)) → 𝐴𝐵)
3231adantrl 716 . 2 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴𝐵)
33 simprl 771 . 2 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐵𝐴)
3432, 33eqssd 4013 1 (((𝑅 Fr 𝐴𝑅 Po 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴 = 𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1537  wcel 2106  wne 2938  wral 3059  wrex 3068  cdif 3960  cin 3962  wss 3963  c0 4339  {csn 4631   Po wpo 5595   Fr wfr 5638   Se wse 5639  ccnv 5688  cima 5692  Predcpred 6322
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 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pr 5438
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-ral 3060  df-rex 3069  df-rab 3434  df-v 3480  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-br 5149  df-opab 5211  df-po 5597  df-fr 5641  df-se 5642  df-xp 5695  df-cnv 5697  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-pred 6323
This theorem is referenced by:  frpoinsg  6366  wfi  6373
  Copyright terms: Public domain W3C validator