| Step | Hyp | Ref
| Expression |
| 1 | | eqid 2196 |
. . . 4
⊢
recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) = recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) |
| 2 | | eqid 2196 |
. . . . 5
⊢ (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) = (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) |
| 3 | 2 | frectfr 6467 |
. . . 4
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → ∀𝑦(Fun (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) ∧ ((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})‘𝑦) ∈ V)) |
| 4 | 1, 3 | tfri1d 6402 |
. . 3
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) Fn On) |
| 5 | | fnresin1 5375 |
. . 3
⊢
(recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) Fn On → (recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω)) |
| 6 | 4, 5 | syl 14 |
. 2
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → (recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω)) |
| 7 | | omsson 4650 |
. . . . . 6
⊢ ω
⊆ On |
| 8 | | sseqin2 3383 |
. . . . . 6
⊢ (ω
⊆ On ↔ (On ∩ ω) = ω) |
| 9 | 7, 8 | mpbi 145 |
. . . . 5
⊢ (On ∩
ω) = ω |
| 10 | 9 | reseq2i 4944 |
. . . 4
⊢
(recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
(recs((𝑔 ∈ V ↦
{𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ ω) |
| 11 | | df-frec 6458 |
. . . 4
⊢
frec(𝐹, 𝐴) = (recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ ω) |
| 12 | 10, 11 | eqtr4i 2220 |
. . 3
⊢
(recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
frec(𝐹, 𝐴) |
| 13 | | fneq12 5352 |
. . 3
⊢
(((recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
frec(𝐹, 𝐴) ∧ (On ∩ ω) = ω) →
((recs((𝑔 ∈ V ↦
{𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω) ↔ frec(𝐹, 𝐴) Fn ω)) |
| 14 | 12, 9, 13 | mp2an 426 |
. 2
⊢
((recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω) ↔ frec(𝐹, 𝐴) Fn ω) |
| 15 | 6, 14 | sylib 122 |
1
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → frec(𝐹, 𝐴) Fn ω) |