Proof of Theorem tfrlem11
| Step | Hyp | Ref
| Expression |
| 1 | | ssun1 1621 |
. . . . . . . . 9
⊢ F
⊆ (F ∪ {〈dom F, (G
‘(F ↾ dom F))〉}) |
| 2 | | tfrlem.3 |
. . . . . . . . 9
⊢ C =
(F ∪ {〈dom F, (G
‘(F ↾ dom F))〉}) |
| 3 | 1, 2 | sseqtr4 1533 |
. . . . . . . 8
⊢ F
⊆ C |
| 4 | | funssfv 2841 |
. . . . . . . . . . 11
⊢ (((Fun C ∧ F
⊆ C) ∧ y ∈ dom F)
→ (C ‘y) = (F
‘y)) |
| 5 | 4 | adantrl 311 |
. . . . . . . . . 10
⊢ (((Fun C ∧ F
⊆ C) ∧ (dom F ∈ On ∧ y ∈ dom F))
→ (C ‘y) = (F
‘y)) |
| 6 | | fun2ssres 2699 |
. . . . . . . . . . . 12
⊢ (((Fun C ∧ F
⊆ C) ∧ y ⊆ dom F)
→ (C ↾ y) = (F ↾
y)) |
| 7 | 6 | fveq2d 2836 |
. . . . . . . . . . 11
⊢ (((Fun C ∧ F
⊆ C) ∧ y ⊆ dom F)
→ (G ‘(C ↾ y)) =
(G ‘(F ↾ y))) |
| 8 | | onelsst 2255 |
. . . . . . . . . . . 12
⊢ (dom F
∈ On → (y ∈ dom F → y
⊆ dom F)) |
| 9 | 8 | imp 277 |
. . . . . . . . . . 11
⊢ ((dom F ∈ On ∧ y ∈ dom F)
→ y ⊆ dom F) |
| 10 | 7, 9 | sylan2 346 |
. . . . . . . . . 10
⊢ (((Fun C ∧ F
⊆ C) ∧ (dom F ∈ On ∧ y ∈ dom F))
→ (G ‘(C ↾ y)) =
(G ‘(F ↾ y))) |
| 11 | 5, 10 | cleq12d 1115 |
. . . . . . . . 9
⊢ (((Fun C ∧ F
⊆ C) ∧ (dom F ∈ On ∧ y ∈ dom F))
→ ((C ‘y) = (G
‘(C ↾ y)) ↔ (F
‘y) = (G ‘(F
↾ y)))) |
| 12 | | tfrlem.1 |
. . . . . . . . . 10
⊢ A =
{f∣∃x ∈ On (f
Fn x ∧ ∀y ∈ x
(f ‘y) = (G
‘(f ↾ y)))} |
| 13 | | tfrlem.2 |
. . . . . . . . . 10
⊢ F =
∪A |
| 14 | 12, 13 | tfrlem9 2957 |
. . . . . . . . 9
⊢ (y
∈ dom F → (F ‘y) =
(G ‘(F ↾ y))) |
| 15 | 11, 14 | syl5bir 184 |
. . . . . . . 8
⊢ (((Fun C ∧ F
⊆ C) ∧ (dom F ∈ On ∧ y ∈ dom F))
→ (y ∈ dom F → (C
‘y) = (G ‘(C
↾ y)))) |
| 16 | 3, 15 | mpan12 530 |
. . . . . . 7
⊢ ((Fun C ∧ (dom F
∈ On ∧ y ∈ dom F)) → (y
∈ dom F → (C ‘y) =
(G ‘(C ↾ y)))) |
| 17 | 12, 13, 2 | tfrlem10 2958 |
. . . . . . . 8
⊢ (dom F
∈ On → C Fn suc dom F) |
| 18 | | fnfun 2721 |
. . . . . . . 8
⊢ (C Fn
suc dom F → Fun C) |
| 19 | 17, 18 | syl 12 |
. . . . . . 7
⊢ (dom F
∈ On → Fun C) |
| 20 | 16, 19 | sylan 343 |
. . . . . 6
⊢ ((dom F ∈ On ∧ (dom F ∈ On ∧ y ∈ dom F))
→ (y ∈ dom F → (C
‘y) = (G ‘(C
↾ y)))) |
| 21 | 20 | exp32 294 |
. . . . 5
⊢ (dom F
∈ On → (dom F ∈ On →
(y ∈ dom F → (y
∈ dom F → (C ‘y) =
(G ‘(C ↾ y)))))) |
| 22 | 21 | pm2.43i 58 |
. . . 4
⊢ (dom F
∈ On → (y ∈ dom F → (y
∈ dom F → (C ‘y) =
(G ‘(C ↾ y))))) |
| 23 | 22 | pm2.43d 59 |
. . 3
⊢ (dom F
∈ On → (y ∈ dom F → (C
‘y) = (G ‘(C
↾ y)))) |
| 24 | | opex 1893 |
. . . . . . . . 9
⊢ 〈y, (G
‘(C ↾ y))〉 ∈ V |
| 25 | 24 | snid 1830 |
. . . . . . . 8
⊢ 〈y, (G
‘(C ↾ y))〉 ∈ {〈y, (G
‘(C ↾ y))〉} |
| 26 | | opeq1 1876 |
. . . . . . . . . . . 12
⊢ (y =
dom F → 〈y, (G
‘(C ↾ y))〉 = 〈dom F, (G
‘(C ↾ y))〉) |
| 27 | 26 | adantl 305 |
. . . . . . . . . . 11
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈y, (G ‘(C
↾ y))〉 = 〈dom F, (G
‘(C ↾ y))〉) |
| 28 | 3, 6 | mpan12 530 |
. . . . . . . . . . . . . 14
⊢ ((Fun C ∧ y
⊆ dom F) → (C ↾ y) =
(F ↾ y)) |
| 29 | | eqimss 1548 |
. . . . . . . . . . . . . 14
⊢ (y =
dom F → y ⊆ dom F) |
| 30 | 28, 19, 29 | syl2an 349 |
. . . . . . . . . . . . 13
⊢ ((dom F ∈ On ∧ y = dom F)
→ (C ↾ y) = (F ↾
y)) |
| 31 | | reseq2 2576 |
. . . . . . . . . . . . . 14
⊢ (y =
dom F → (F ↾ y) =
(F ↾ dom F)) |
| 32 | 31 | adantl 305 |
. . . . . . . . . . . . 13
⊢ ((dom F ∈ On ∧ y = dom F)
→ (F ↾ y) = (F ↾
dom F)) |
| 33 | 30, 32 | eqtrd 1128 |
. . . . . . . . . . . 12
⊢ ((dom F ∈ On ∧ y = dom F)
→ (C ↾ y) = (F ↾
dom F)) |
| 34 | | fveq2 2832 |
. . . . . . . . . . . 12
⊢ ((C
↾ y) = (F ↾ dom F)
→ (G ‘(C ↾ y)) =
(G ‘(F ↾ dom F))) |
| 35 | | opeq2 1877 |
. . . . . . . . . . . 12
⊢ ((G
‘(C ↾ y)) = (G
‘(F ↾ dom F)) → 〈dom F, (G
‘(C ↾ y))〉 = 〈dom F, (G
‘(F ↾ dom F))〉) |
| 36 | 33, 34, 35 | 3syl 21 |
. . . . . . . . . . 11
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈dom F, (G ‘(C
↾ y))〉 = 〈dom F, (G
‘(F ↾ dom F))〉) |
| 37 | 27, 36 | eqtrd 1128 |
. . . . . . . . . 10
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈y, (G ‘(C
↾ y))〉 = 〈dom F, (G
‘(F ↾ dom F))〉) |
| 38 | 37 | sneqd 1818 |
. . . . . . . . 9
⊢ ((dom F ∈ On ∧ y = dom F)
→ {〈y, (G ‘(C
↾ y))〉} = {〈dom F, (G
‘(F ↾ dom F))〉}) |
| 39 | 38 | eleq2d 1156 |
. . . . . . . 8
⊢ ((dom F ∈ On ∧ y = dom F)
→ (〈y, (G ‘(C
↾ y))〉 ∈ {〈y, (G
‘(C ↾ y))〉} ↔ 〈y, (G
‘(C ↾ y))〉 ∈ {〈dom F, (G
‘(F ↾ dom F))〉})) |
| 40 | 25, 39 | mpbii 168 |
. . . . . . 7
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈y, (G ‘(C
↾ y))〉 ∈ {〈dom
F, (G
‘(F ↾ dom F))〉}) |
| 41 | | elun2 1626 |
. . . . . . 7
⊢ (〈y, (G
‘(C ↾ y))〉 ∈ {〈dom F, (G
‘(F ↾ dom F))〉} → 〈y, (G
‘(C ↾ y))〉 ∈ (F ∪ {〈dom F, (G
‘(F ↾ dom F))〉})) |
| 42 | 40, 41 | syl 12 |
. . . . . 6
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈y, (G ‘(C
↾ y))〉 ∈ (F ∪ {〈dom F, (G
‘(F ↾ dom F))〉})) |
| 43 | 2 | eleq2i 1153 |
. . . . . 6
⊢ (〈y, (G
‘(C ↾ y))〉 ∈ C ↔ 〈y, (G
‘(C ↾ y))〉 ∈ (F ∪ {〈dom F, (G
‘(F ↾ dom F))〉})) |
| 44 | 42, 43 | sylibr 175 |
. . . . 5
⊢ ((dom F ∈ On ∧ y = dom F)
→ 〈y, (G ‘(C
↾ y))〉 ∈ C) |
| 45 | | fvex 2838 |
. . . . . . 7
⊢ (G
‘(C ↾ y)) ∈ V |
| 46 | 45 | fnfvop 2856 |
. . . . . 6
⊢ ((C Fn
suc dom F ∧ y ∈ suc dom F) → ((C
‘y) = (G ‘(C
↾ y)) ↔ 〈y, (G
‘(C ↾ y))〉 ∈ C)) |
| 47 | | visset 1350 |
. . . . . . 7
⊢ y
∈ V |
| 48 | 47 | eqelsuc 2307 |
. . . . . 6
⊢ (y =
dom F → y ∈ suc dom F) |
| 49 | 46, 17, 48 | syl2an 349 |
. . . . 5
⊢ ((dom F ∈ On ∧ y = dom F)
→ ((C ‘y) = (G
‘(C ↾ y)) ↔ 〈y, (G
‘(C ↾ y))〉 ∈ C)) |
| 50 | 44, 49 | mpbird 171 |
. . . 4
⊢ ((dom F ∈ On ∧ y = dom F)
→ (C ‘y) = (G
‘(C ↾ y))) |
| 51 | 50 | exp 291 |
. . 3
⊢ (dom F
∈ On → (y = dom F → (C
‘y) = (G ‘(C
↾ y)))) |
| 52 | 23, 51 | jaod 329 |
. 2
⊢ (dom F
∈ On → ((y ∈ dom F ∨ y = dom
F) → (C ‘y) =
(G ‘(C ↾ y)))) |
| 53 | | elsuci 2289 |
. 2
⊢ (y
∈ suc dom F → (y ∈ dom F
∨ y = dom F)) |
| 54 | 52, 53 | syl5 22 |
1
⊢ (dom F
∈ On → (y ∈ suc dom F → (C
‘y) = (G ‘(C
↾ y)))) |