Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  frind Structured version   Visualization version   GIF version

Theorem frind 32969
Description: The principle of founded induction. Theorem 4.4 of Don Monk's notes (see frmin 32968). This principle states that if 𝐵 is a subclass of a founded class 𝐴 with the property that every element of 𝐵 whose initial segment is included in 𝐴 is itself equal to 𝐴. Compare wfi 6179 and tfi 7556, which are special cases of this theorem that do not require the axiom of infinity to prove. (Contributed by Scott Fenton, 6-Feb-2011.) (Revised by Mario Carneiro, 26-Jun-2015.)
Assertion
Ref Expression
frind (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴 = 𝐵)
Distinct variable groups:   𝑦,𝐴   𝑦,𝐵   𝑦,𝑅

Proof of Theorem frind
StepHypRef Expression
1 ssdif0 4327 . . . . . . 7 (𝐴𝐵 ↔ (𝐴𝐵) = ∅)
21necon3bbii 3068 . . . . . 6 𝐴𝐵 ↔ (𝐴𝐵) ≠ ∅)
3 difss 4112 . . . . . . 7 (𝐴𝐵) ⊆ 𝐴
4 frmin 32968 . . . . . . . . 9 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)
5 eldif 3950 . . . . . . . . . . . . 13 (𝑦 ∈ (𝐴𝐵) ↔ (𝑦𝐴 ∧ ¬ 𝑦𝐵))
65anbi1i 623 . . . . . . . . . . . 12 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ ((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅))
7 anass 469 . . . . . . . . . . . 12 (((𝑦𝐴 ∧ ¬ 𝑦𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)))
8 ancom 461 . . . . . . . . . . . . . 14 ((¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ∧ ¬ 𝑦𝐵))
9 indif2 4251 . . . . . . . . . . . . . . . . . 18 ((𝑅 “ {𝑦}) ∩ (𝐴𝐵)) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
10 df-pred 6146 . . . . . . . . . . . . . . . . . . 19 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝐴𝐵) ∩ (𝑅 “ {𝑦}))
11 incom 4182 . . . . . . . . . . . . . . . . . . 19 ((𝐴𝐵) ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
1210, 11eqtri 2849 . . . . . . . . . . . . . . . . . 18 Pred(𝑅, (𝐴𝐵), 𝑦) = ((𝑅 “ {𝑦}) ∩ (𝐴𝐵))
13 df-pred 6146 . . . . . . . . . . . . . . . . . . . 20 Pred(𝑅, 𝐴, 𝑦) = (𝐴 ∩ (𝑅 “ {𝑦}))
14 incom 4182 . . . . . . . . . . . . . . . . . . . 20 (𝐴 ∩ (𝑅 “ {𝑦})) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1513, 14eqtri 2849 . . . . . . . . . . . . . . . . . . 19 Pred(𝑅, 𝐴, 𝑦) = ((𝑅 “ {𝑦}) ∩ 𝐴)
1615difeq1i 4099 . . . . . . . . . . . . . . . . . 18 (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = (((𝑅 “ {𝑦}) ∩ 𝐴) ∖ 𝐵)
179, 12, 163eqtr4i 2859 . . . . . . . . . . . . . . . . 17 Pred(𝑅, (𝐴𝐵), 𝑦) = (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵)
1817eqeq1i 2831 . . . . . . . . . . . . . . . 16 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
19 ssdif0 4327 . . . . . . . . . . . . . . . 16 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ↔ (Pred(𝑅, 𝐴, 𝑦) ∖ 𝐵) = ∅)
2018, 19bitr4i 279 . . . . . . . . . . . . . . 15 (Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵)
2120anbi1i 623 . . . . . . . . . . . . . 14 ((Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ∧ ¬ 𝑦𝐵) ↔ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
228, 21bitri 276 . . . . . . . . . . . . 13 ((¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
2322anbi2i 622 . . . . . . . . . . . 12 ((𝑦𝐴 ∧ (¬ 𝑦𝐵 ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅)) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
246, 7, 233bitri 298 . . . . . . . . . . 11 ((𝑦 ∈ (𝐴𝐵) ∧ Pred(𝑅, (𝐴𝐵), 𝑦) = ∅) ↔ (𝑦𝐴 ∧ (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵)))
2524rexbii2 3250 . . . . . . . . . 10 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵))
26 rexanali 3270 . . . . . . . . . 10 (∃𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵 ∧ ¬ 𝑦𝐵) ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2725, 26bitri 276 . . . . . . . . 9 (∃𝑦 ∈ (𝐴𝐵)Pred(𝑅, (𝐴𝐵), 𝑦) = ∅ ↔ ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
284, 27sylib 219 . . . . . . . 8 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ ((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅)) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))
2928ex 413 . . . . . . 7 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (((𝐴𝐵) ⊆ 𝐴 ∧ (𝐴𝐵) ≠ ∅) → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
303, 29mpani 692 . . . . . 6 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → ((𝐴𝐵) ≠ ∅ → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
312, 30syl5bi 243 . . . . 5 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (¬ 𝐴𝐵 → ¬ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)))
3231con4d 115 . . . 4 ((𝑅 Fr 𝐴𝑅 Se 𝐴) → (∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵) → 𝐴𝐵))
3332imp 407 . . 3 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵)) → 𝐴𝐵)
3433adantrl 712 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴𝐵)
35 simprl 767 . 2 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐵𝐴)
3634, 35eqssd 3988 1 (((𝑅 Fr 𝐴𝑅 Se 𝐴) ∧ (𝐵𝐴 ∧ ∀𝑦𝐴 (Pred(𝑅, 𝐴, 𝑦) ⊆ 𝐵𝑦𝐵))) → 𝐴 = 𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396   = wceq 1530  wcel 2107  wne 3021  wral 3143  wrex 3144  cdif 3937  cin 3939  wss 3940  c0 4295  {csn 4564   Fr wfr 5510   Se wse 5511  ccnv 5553  cima 5557  Predcpred 6145
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 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2798  ax-rep 5187  ax-sep 5200  ax-nul 5207  ax-pow 5263  ax-pr 5326  ax-un 7451  ax-inf2 9093
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2620  df-eu 2652  df-clab 2805  df-cleq 2819  df-clel 2898  df-nfc 2968  df-ne 3022  df-ral 3148  df-rex 3149  df-reu 3150  df-rab 3152  df-v 3502  df-sbc 3777  df-csb 3888  df-dif 3943  df-un 3945  df-in 3947  df-ss 3956  df-pss 3958  df-nul 4296  df-if 4471  df-pw 4544  df-sn 4565  df-pr 4567  df-tp 4569  df-op 4571  df-uni 4838  df-iun 4919  df-br 5064  df-opab 5126  df-mpt 5144  df-tr 5170  df-id 5459  df-eprel 5464  df-po 5473  df-so 5474  df-fr 5513  df-se 5514  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-pred 6146  df-ord 6192  df-on 6193  df-lim 6194  df-suc 6195  df-iota 6312  df-fun 6354  df-fn 6355  df-f 6356  df-f1 6357  df-fo 6358  df-f1o 6359  df-fv 6360  df-om 7569  df-wrecs 7938  df-recs 7999  df-rdg 8037  df-trpred 32941
This theorem is referenced by:  frindi  32970  frinsg  32971
  Copyright terms: Public domain W3C validator