Step | Hyp | Ref
| Expression |
1 | | eqid 2170 |
. . . 4
⊢
recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) = recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) |
2 | | eqid 2170 |
. . . . 5
⊢ (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) = (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) |
3 | 2 | frectfr 6377 |
. . . 4
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → ∀𝑦(Fun (𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))}) ∧ ((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})‘𝑦) ∈ V)) |
4 | 1, 3 | tfri1d 6312 |
. . 3
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) Fn On) |
5 | | fnresin1 5310 |
. . 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 4595 |
. . . . . 6
⊢ ω
⊆ On |
8 | | sseqin2 3346 |
. . . . . 6
⊢ (ω
⊆ On ↔ (On ∩ ω) = ω) |
9 | 7, 8 | mpbi 144 |
. . . . 5
⊢ (On ∩
ω) = ω |
10 | 9 | reseq2i 4886 |
. . . 4
⊢
(recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
(recs((𝑔 ∈ V ↦
{𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ ω) |
11 | | df-frec 6368 |
. . . 4
⊢
frec(𝐹, 𝐴) = (recs((𝑔 ∈ V ↦ {𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ ω) |
12 | 10, 11 | eqtr4i 2194 |
. . 3
⊢
(recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
frec(𝐹, 𝐴) |
13 | | fneq12 5289 |
. . 3
⊢
(((recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) =
frec(𝐹, 𝐴) ∧ (On ∩ ω) = ω) →
((recs((𝑔 ∈ V ↦
{𝑥 ∣ (∃𝑚 ∈ ω (dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω) ↔ frec(𝐹, 𝐴) Fn ω)) |
14 | 12, 9, 13 | mp2an 424 |
. 2
⊢
((recs((𝑔 ∈ V
↦ {𝑥 ∣
(∃𝑚 ∈ ω
(dom 𝑔 = suc 𝑚 ∧ 𝑥 ∈ (𝐹‘(𝑔‘𝑚))) ∨ (dom 𝑔 = ∅ ∧ 𝑥 ∈ 𝐴))})) ↾ (On ∩ ω)) Fn (On
∩ ω) ↔ frec(𝐹, 𝐴) Fn ω) |
15 | 6, 14 | sylib 121 |
1
⊢
((∀𝑧(𝐹‘𝑧) ∈ V ∧ 𝐴 ∈ 𝑉) → frec(𝐹, 𝐴) Fn ω) |