Theorem trpredpred 9322

Description: Assuming it is a set, the predecessor class is a subset of the class of 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 8160	. . . . . 6 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → ((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋))
2		frfnom 8159	. . . . . . 7 ⊢ (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) Fn ω
3		peano1 7656	. . . . . . 7 ⊢ ∅ ∈ ω
4		fnbrfvb 6754	. . . . . . 7 ⊢ (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) Fn ω ∧ ∅ ∈ ω) → (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
5	2, 3, 4	mp2an 692	. . . . . 6 ⊢ (((rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)‘∅) = Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
6	1, 5	sylib 221	. . . . 5 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋))
7		0ex 5189	. . . . . 6 ⊢ ∅ ∈ V
8		breq1 5046	. . . . . 6 ⊢ (𝑧 = ∅ → (𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋) ↔ ∅(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
9	7, 8	spcev 3514	. . . . 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 5749	. . . 4 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → (Pred(𝑅, 𝐴, 𝑋) ∈ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω) ↔ ∃𝑧 𝑧(rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)Pred(𝑅, 𝐴, 𝑋)))
12	10, 11	mpbird 260	. . 3 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ∈ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω))
13		elssuni 4841	. . 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 9312	. 2 ⊢ TrPred(𝑅, 𝐴, 𝑋) = ∪ ran (rec((𝑎 ∈ V ↦ ∪ 𝑦 ∈ 𝑎 Pred(𝑅, 𝐴, 𝑦)), Pred(𝑅, 𝐴, 𝑋)) ↾ ω)
16	14, 15	sseqtrrdi 3942	1 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∈ 𝐵 → Pred(𝑅, 𝐴, 𝑋) ⊆ TrPred(𝑅, 𝐴, 𝑋))

Syntax hints:   → wi 4   ↔ wb 209   = wceq 1543  ∃wex 1787   ∈ wcel 2110  Vcvv 3401   ⊆ wss 3857  ∅c0 4227  ∪ cuni 4809  ∪ ciun 4894   class class class wbr 5043   ↦ cmpt 5124  ran crn 5541   ↾ cres 5542  Predcpred 6148   Fn wfn 6364  ‘cfv 6369  ωcom 7633  reccrdg 8134  TrPredctrpred 9311

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2706  ax-sep 5181  ax-nul 5188  ax-pr 5311  ax-un 7512

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2537  df-eu 2566  df-clab 2713  df-cleq 2726  df-clel 2812  df-nfc 2882  df-ne 2936  df-ral 3059  df-rex 3060  df-reu 3061  df-rab 3063  df-v 3403  df-sbc 3688  df-csb 3803  df-dif 3860  df-un 3862  df-in 3864  df-ss 3874  df-pss 3876  df-nul 4228  df-if 4430  df-pw 4505  df-sn 4532  df-pr 4534  df-tp 4536  df-op 4538  df-uni 4810  df-iun 4896  df-br 5044  df-opab 5106  df-mpt 5125  df-tr 5151  df-id 5444  df-eprel 5449  df-po 5457  df-so 5458  df-fr 5498  df-we 5500  df-xp 5546  df-rel 5547  df-cnv 5548  df-co 5549  df-dm 5550  df-rn 5551  df-res 5552  df-ima 5553  df-pred 6149  df-ord 6205  df-on 6206  df-lim 6207  df-suc 6208  df-iota 6327  df-fun 6371  df-fn 6372  df-f 6373  df-f1 6374  df-fo 6375  df-f1o 6376  df-fv 6377  df-om 7634  df-wrecs 8036  df-recs 8097  df-rdg 8135  df-trpred 9312

This theorem is referenced by:  dftrpred3g  9328  trpredpo  9330  frmin  9354  frr1  33515