Theorem rdgsucopab 4004

Description: The value of the recursive definition generator at a successor (special case where the characteristic function is an ordered pair abstraction).

Hypotheses

Ref	Expression
rdgsucopab.1	⊢ (z ∈ A → ∀x z ∈ A)
rdgsucopab.2	⊢ (z ∈ B → ∀x z ∈ B)
rdgsucopab.3	⊢ (z ∈ D → ∀x z ∈ D)
rdgsucopab.4	⊢ F = rec({⟨x, y⟩∣y = C}, A)
rdgsucopab.5	⊢ (x = (F ‘B) → C = D)

Assertion

Ref	Expression
rdgsucopab	⊢ ((B ∈ On ⋀ D ∈ R) → (F ‘suc B) = D)

Distinct variable groups:   z,D   y,z,C   z,A   z,B   x,y,z

Proof of Theorem rdgsucopab

Step	Hyp	Ref	Expression
1		rdgsuc 4003	. . 3 ⊢ (B ∈ On → (rec({⟨x, y⟩∣y = C}, A) ‘suc B) = ({⟨x, y⟩∣y = C} ‘(rec({⟨x, y⟩∣y = C}, A) ‘B)))
2		rdgsucopab.4	. . . 4 ⊢ F = rec({⟨x, y⟩∣y = C}, A)
3	2	fveq1i 3782	. . 3 ⊢ (F ‘suc B) = (rec({⟨x, y⟩∣y = C}, A) ‘suc B)
4	1, 3	syl5eq 1566	. 2 ⊢ (B ∈ On → (F ‘suc B) = ({⟨x, y⟩∣y = C} ‘(rec({⟨x, y⟩∣y = C}, A) ‘B)))
5		fvex 3789	. . 3 ⊢ (rec({⟨x, y⟩∣y = C}, A) ‘B) ∈ V
6		hbopab1 2869	. . . . . 6 ⊢ (z ∈ {⟨x, y⟩∣y = C} → ∀x z ∈ {⟨x, y⟩∣y = C})
7		rdgsucopab.1	. . . . . 6 ⊢ (z ∈ A → ∀x z ∈ A)
8	6, 7	hbrdg 3994	. . . . 5 ⊢ (z ∈ rec({⟨x, y⟩∣y = C}, A) → ∀x z ∈ rec({⟨x, y⟩∣y = C}, A))
9		rdgsucopab.2	. . . . 5 ⊢ (z ∈ B → ∀x z ∈ B)
10	8, 9	hbfv 3786	. . . 4 ⊢ (z ∈ (rec({⟨x, y⟩∣y = C}, A) ‘B) → ∀x z ∈ (rec({⟨x, y⟩∣y = C}, A) ‘B))
11		rdgsucopab.3	. . . 4 ⊢ (z ∈ D → ∀x z ∈ D)
12	2	fveq1i 3782	. . . . . 6 ⊢ (F ‘B) = (rec({⟨x, y⟩∣y = C}, A) ‘B)
13	12	eqeq2i 1532	. . . . 5 ⊢ (x = (F ‘B) ↔ x = (rec({⟨x, y⟩∣y = C}, A) ‘B))
14		rdgsucopab.5	. . . . 5 ⊢ (x = (F ‘B) → C = D)
15	13, 14	sylbir 208	. . . 4 ⊢ (x = (rec({⟨x, y⟩∣y = C}, A) ‘B) → C = D)
16	10, 11, 15	fvopabgf 3844	. . 3 ⊢ (((rec({⟨x, y⟩∣y = C}, A) ‘B) ∈ V ⋀ D ∈ R) → ({⟨x, y⟩∣y = C} ‘(rec({⟨x, y⟩∣y = C}, A) ‘B)) = D)
17	5, 16	mpan 707	. 2 ⊢ (D ∈ R → ({⟨x, y⟩∣y = C} ‘(rec({⟨x, y⟩∣y = C}, A) ‘B)) = D)
18	4, 17	sylan9eq 1574	1 ⊢ ((B ∈ On ⋀ D ∈ R) → (F ‘suc B) = D)

Syntax hints:   → wi 3   ⋀ wa 230  ∀wal 995   = wceq 997   ∈ wcel 999  Vcvv 1858  {copab 2721  Oncon0 3005  suc csuc 3007   ‘cfv 3239  reccrdg 3989

This theorem is referenced by:  abianfplem 4019  r1suc 4714  alephon 4930  alephsuc 4931

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 1003  ax-gen 1004  ax-8 1005  ax-9 1006  ax-10 1007  ax-11 1008  ax-12 1009  ax-13 1010  ax-14 1011  ax-17 1012  ax-4 1014  ax-5o 1016  ax-6o 1019  ax-9o 1164  ax-10o 1182  ax-16 1252  ax-11o 1260  ax-ext 1504  ax-rep 2748  ax-sep 2758  ax-nul 2765  ax-pow 2798  ax-pr 2835  ax-un 2922

This theorem depends on definitions:  df-bi 154  df-or 231  df-an 232  df-3or 788  df-3an 789  df-ex 1022  df-sb 1214  df-eu 1424  df-mo 1425  df-clab 1510  df-cleq 1515  df-clel 1518  df-ne 1634  df-ral 1696  df-rex 1697  df-rab 1699  df-v 1859  df-sbc 1989  df-dif 2100  df-un 2101  df-in 2102  df-ss 2104  df-nul 2332  df-if 2414  df-pw 2454  df-sn 2464  df-pr 2465  df-tp 2467  df-op 2468  df-uni 2558  df-iun 2622  df-br 2675  df-opab 2722  df-tr 2736  df-eprel 2888  df-id 2891  df-po 2896  df-so 2906  df-fr 2974  df-we 2991  df-ord 3008  df-on 3009  df-lim 3010  df-suc 3011  df-xp 3241  df-rel 3242  df-cnv 3243  df-co 3244  df-dm 3245  df-rn 3246  df-res 3247  df-ima 3248  df-fun 3249  df-fn 3250  df-fv 3255  df-rdg 3990

Copyright terms: Public domain