Theorem trpredpred 32528

Description: Assuming it exists, the predecessor class is a subset of the transitive predecessors. (Contributed by Scott Fenton, 18-Feb-2011.)

Assertion

Ref	Expression
trpredpred	⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ⊆ TrPred(𝑅, 𝐴, 𝑋))

Proof of Theorem trpredpred

Dummy variables 𝑎 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fr0g 7868	. . . . . 6 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → ((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋))
2		frfnom 7867	. . . . . . 7 ⊢ (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) Fn ω
3		peano1 7410	. . . . . . 7 ⊢ ∅ ∈ ω
4		fnbrfvb 6542	. . . . . . 7 ⊢ (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) Fn ω ∧ ∅ ∈ ω) → (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
5	2, 3, 4	mp2an 679	. . . . . 6 ⊢ (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
6	1, 5	sylib 210	. . . . 5 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
7		0ex 5062	. . . . . 6 ⊢ ∅ ∈ V
8		breq1 4926	. . . . . 6 ⊢ (𝑧 = ∅ → (𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
9	7, 8	spcev 3519	. . . . 5 ⊢ (∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋) → ∃𝑧 𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
10	6, 9	syl 17	. . . 4 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → ∃𝑧 𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
11		elrng 5605	. . . 4 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → (Pred(𝑅, 𝐴, 𝑋) ∈ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) ↔ ∃𝑧 𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
12	10, 11	mpbird 249	. . 3 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ∈ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω))
13		elssuni 4735	. . 3 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) → Pred(𝑅, 𝐴, 𝑋) ⊆ ∪ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω))
14	12, 13	syl 17	. 2 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ⊆ ∪ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω))
15		df-trpred 32518	. 2 ⊢ TrPred(𝑅, 𝐴, 𝑋) = ∪ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)
16	14, 15	syl6sseqr 3904	1 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ⊆ TrPred(𝑅, 𝐴, 𝑋))

Syntax hints:   → wi 4   ↔ wb 198   = wceq 1507  ∃wex 1742   ∈ wcel 2048  Vcvv 3409   ⊆ wss 3825  ∅c0 4173  ∪ cuni 4706  ∪ ciun 4786   class class class wbr 4923   ↦ cmpt 5002  ran crn 5401   ↾ cres 5402  Predcpred 5979   Fn wfn 6177  ‘cfv 6182  ωcom 7390  reccrdg 7842  TrPredctrpred 32517

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1964  ax-8 2050  ax-9 2057  ax-10 2077  ax-11 2091  ax-12 2104  ax-13 2299  ax-ext 2745  ax-sep 5054  ax-nul 5061  ax-pow 5113  ax-pr 5180  ax-un 7273

This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-ex 1743  df-nf 1747  df-sb 2014  df-mo 2544  df-eu 2580  df-clab 2754  df-cleq 2765  df-clel 2840  df-nfc 2912  df-ne 2962  df-ral 3087  df-rex 3088  df-reu 3089  df-rab 3091  df-v 3411  df-sbc 3678  df-csb 3783  df-dif 3828  df-un 3830  df-in 3832  df-ss 3839  df-pss 3841  df-nul 4174  df-if 4345  df-pw 4418  df-sn 4436  df-pr 4438  df-tp 4440  df-op 4442  df-uni 4707  df-iun 4788  df-br 4924  df-opab 4986  df-mpt 5003  df-tr 5025  df-id 5305  df-eprel 5310  df-po 5319  df-so 5320  df-fr 5359  df-we 5361  df-xp 5406  df-rel 5407  df-cnv 5408  df-co 5409  df-dm 5410  df-rn 5411  df-res 5412  df-ima 5413  df-pred 5980  df-ord 6026  df-on 6027  df-lim 6028  df-suc 6029  df-iota 6146  df-fun 6184  df-fn 6185  df-f 6186  df-f1 6187  df-fo 6188  df-f1o 6189  df-fv 6190  df-om 7391  df-wrecs 7743  df-recs 7805  df-rdg 7843  df-trpred 32518

This theorem is referenced by:  dftrpred3g  32533  trpredpo  32535  frmin  32545  frr1  32605