Proof of Theorem rdgsucopabn
| Step | Hyp | Ref
| Expression |
| 1 | | rdgsuct 3940 |
. . . . 5
⊢ (B
∈ On → (rec({〈x, y〉∣y
= C}, A) ‘suc B)
= ({〈x, y〉∣y
= C} ‘(rec({〈x, y〉∣y
= C}, A) ‘B))) |
| 2 | | rdgsucopab.4 |
. . . . . 6
⊢ F =
rec({〈x, y〉∣y
= C}, A) |
| 3 | 2 | fveq1i 3720 |
. . . . 5
⊢ (F
‘suc B) = (rec({〈x, y〉∣y
= C}, A) ‘suc B) |
| 4 | 1, 3 | syl5eq 1517 |
. . . 4
⊢ (B
∈ On → (F ‘suc B) = ({〈x,
y〉∣y = C}
‘(rec({〈x, y〉∣y
= C}, A) ‘B))) |
| 5 | | hbopab1 2809 |
. . . . . . 7
⊢ (z
∈ {〈x, y〉∣y
= C} → ∀x z ∈
{〈x, y〉∣y
= C}) |
| 6 | | rdgsucopab.1 |
. . . . . . 7
⊢ (z
∈ A → ∀x z ∈
A) |
| 7 | 5, 6 | hbrdg 3931 |
. . . . . 6
⊢ (z
∈ rec({〈x, y〉∣y
= C}, A) → ∀x z ∈
rec({〈x, y〉∣y
= C}, A)) |
| 8 | | rdgsucopab.2 |
. . . . . 6
⊢ (z
∈ B → ∀x z ∈
B) |
| 9 | 7, 8 | hbfv 3724 |
. . . . 5
⊢ (z
∈ (rec({〈x, y〉∣y
= C}, A) ‘B)
→ ∀x z ∈ (rec({〈x, y〉∣y
= C}, A) ‘B)) |
| 10 | | rdgsucopab.3 |
. . . . 5
⊢ (z
∈ D → ∀x z ∈
D) |
| 11 | 2 | fveq1i 3720 |
. . . . . . 7
⊢ (F
‘B) = (rec({〈x, y〉∣y
= C}, A) ‘B) |
| 12 | 11 | eqeq2i 1483 |
. . . . . 6
⊢ (x =
(F ‘B) ↔ x =
(rec({〈x, y〉∣y
= C}, A) ‘B)) |
| 13 | | rdgsucopab.5 |
. . . . . 6
⊢ (x =
(F ‘B) → C =
D) |
| 14 | 12, 13 | sylbir 201 |
. . . . 5
⊢ (x =
(rec({〈x, y〉∣y
= C}, A) ‘B)
→ C = D) |
| 15 | 9, 10, 14 | fvopabnf 3783 |
. . . 4
⊢ (¬ D ∈ V → ({〈x, y〉∣y
= C} ‘(rec({〈x, y〉∣y
= C}, A) ‘B)) =
∅) |
| 16 | 4, 15 | sylan9eq 1525 |
. . 3
⊢ ((B
∈ On ⋀ ¬ D ∈ V)
→ (F ‘suc B) = ∅) |
| 17 | 16 | ex 373 |
. 2
⊢ (B
∈ On → (¬ D ∈ V
→ (F ‘suc B) = ∅)) |
| 18 | | sucelon 3064 |
. . . . . 6
⊢ (B
∈ On ↔ suc B ∈ On) |
| 19 | 2 | dmeqi 3308 |
. . . . . . . 8
⊢ dom F
= dom rec({〈x, y〉∣y
= C}, A) |
| 20 | | rdgfnon 3934 |
. . . . . . . . 9
⊢ rec({〈x, y〉∣y
= C}, A) Fn On |
| 21 | | fndm 3583 |
. . . . . . . . 9
⊢ (rec({〈x, y〉∣y
= C}, A) Fn On → dom rec({〈x, y〉∣y
= C}, A) = On) |
| 22 | 20, 21 | ax-mp 7 |
. . . . . . . 8
⊢ dom rec({〈x, y〉∣y
= C}, A) = On |
| 23 | 19, 22 | eqtr 1493 |
. . . . . . 7
⊢ dom F
= On |
| 24 | 23 | eleq2i 1536 |
. . . . . 6
⊢ (suc B
∈ dom F ↔ suc B ∈ On) |
| 25 | 18, 24 | bitr4 176 |
. . . . 5
⊢ (B
∈ On ↔ suc B ∈ dom F) |
| 26 | 25 | negbii 187 |
. . . 4
⊢ (¬ B ∈ On ↔ ¬ suc B ∈ dom F) |
| 27 | | ndmfv 3740 |
. . . 4
⊢ (¬ suc B ∈ dom F
→ (F ‘suc B) = ∅) |
| 28 | 26, 27 | sylbi 199 |
. . 3
⊢ (¬ B ∈ On → (F ‘suc B)
= ∅) |
| 29 | 28 | a1d 12 |
. 2
⊢ (¬ B ∈ On → (¬ D ∈ V → (F ‘suc B)
= ∅)) |
| 30 | 17, 29 | pm2.61i 126 |
1
⊢ (¬ D ∈ V → (F ‘suc B)
= ∅) |