Proof of Theorem tfrlem7
| Step | Hyp | Ref
| Expression |
| 1 | | dffun4 3530 |
. 2
⊢ (Fun F
↔ (Rel F ⋀ ∀x∀u∀v((〈x,
u〉 ∈ F ⋀ 〈x, v〉
∈ F) → u = v))) |
| 2 | | tfrlem.1 |
. . 3
⊢ A =
{f∣∃x ∈ On (f
Fn x ⋀ ∀y ∈ x
(f ‘y) = (G
‘(f ↾ y)))} |
| 3 | | tfrlem.2 |
. . 3
⊢ F =
∪A |
| 4 | 2, 3 | tfrlem6 3918 |
. 2
⊢ Rel F |
| 5 | 3 | eleq2i 1535 |
. . . . . . . 8
⊢ (〈x, u〉
∈ F ↔ 〈x, u〉
∈ ∪A) |
| 6 | | eluni 2502 |
. . . . . . . 8
⊢ (〈x, u〉
∈ ∪A ↔
∃g(〈x, u〉
∈ g ⋀ g ∈ A)) |
| 7 | 5, 6 | bitr 173 |
. . . . . . 7
⊢ (〈x, u〉
∈ F ↔ ∃g(〈x,
u〉 ∈ g ⋀ g
∈ A)) |
| 8 | 3 | eleq2i 1535 |
. . . . . . . 8
⊢ (〈x, v〉
∈ F ↔ 〈x, v〉
∈ ∪A) |
| 9 | | eluni 2502 |
. . . . . . . 8
⊢ (〈x, v〉
∈ ∪A ↔
∃h(〈x, v〉
∈ h ⋀ h ∈ A)) |
| 10 | 8, 9 | bitr 173 |
. . . . . . 7
⊢ (〈x, v〉
∈ F ↔ ∃h(〈x,
v〉 ∈ h ⋀ h
∈ A)) |
| 11 | 7, 10 | anbi12i 482 |
. . . . . 6
⊢ ((〈x, u〉
∈ F ⋀ 〈x, v〉
∈ F) ↔ (∃g(〈x,
u〉 ∈ g ⋀ g
∈ A) ⋀ ∃h(〈x,
v〉 ∈ h ⋀ h
∈ A))) |
| 12 | | eeanv 1321 |
. . . . . 6
⊢ (∃g∃h((〈x,
u〉 ∈ g ⋀ g
∈ A) ⋀ (〈x, v〉
∈ h ⋀ h ∈ A))
↔ (∃g(〈x, u〉
∈ g ⋀ g ∈ A)
⋀ ∃h(〈x, v〉
∈ h ⋀ h ∈ A))) |
| 13 | 11, 12 | bitr4 176 |
. . . . 5
⊢ ((〈x, u〉
∈ F ⋀ 〈x, v〉
∈ F) ↔ ∃g∃h((〈x,
u〉 ∈ g ⋀ g
∈ A) ⋀ (〈x, v〉
∈ h ⋀ h ∈ A))) |
| 14 | | an4 506 |
. . . . . . . 8
⊢ (((〈x, u〉
∈ g ⋀ g ∈ A)
⋀ (〈x, v〉 ∈ h
⋀ h ∈ A)) ↔ ((〈x, u〉
∈ g ⋀ 〈x, v〉
∈ h) ⋀ (g ∈ A
⋀ h ∈ A))) |
| 15 | | ancom 435 |
. . . . . . . 8
⊢ (((〈x, u〉
∈ g ⋀ 〈x, v〉
∈ h) ⋀ (g ∈ A
⋀ h ∈ A)) ↔ ((g
∈ A ⋀ h ∈ A)
⋀ (〈x, u〉 ∈ g
⋀ 〈x, v〉 ∈ h))) |
| 16 | 14, 15 | bitr 173 |
. . . . . . 7
⊢ (((〈x, u〉
∈ g ⋀ g ∈ A)
⋀ (〈x, v〉 ∈ h
⋀ h ∈ A)) ↔ ((g
∈ A ⋀ h ∈ A)
⋀ (〈x, u〉 ∈ g
⋀ 〈x, v〉 ∈ h))) |
| 17 | 2, 3 | tfrlem5 3917 |
. . . . . . . 8
⊢ ((g
∈ A ⋀ h ∈ A)
→ ((〈x, u〉 ∈ g
⋀ 〈x, v〉 ∈ h) → u =
v)) |
| 18 | 17 | imp 350 |
. . . . . . 7
⊢ (((g
∈ A ⋀ h ∈ A)
⋀ (〈x, u〉 ∈ g
⋀ 〈x, v〉 ∈ h)) → u =
v) |
| 19 | 16, 18 | sylbi 199 |
. . . . . 6
⊢ (((〈x, u〉
∈ g ⋀ g ∈ A)
⋀ (〈x, v〉 ∈ h
⋀ h ∈ A)) → u =
v) |
| 20 | 19 | 19.23aivv 1294 |
. . . . 5
⊢ (∃g∃h((〈x,
u〉 ∈ g ⋀ g
∈ A) ⋀ (〈x, v〉
∈ h ⋀ h ∈ A))
→ u = v) |
| 21 | 13, 20 | sylbi 199 |
. . . 4
⊢ ((〈x, u〉
∈ F ⋀ 〈x, v〉
∈ F) → u = v) |
| 22 | 21 | ax-gen 961 |
. . 3
⊢ ∀v((〈x,
u〉 ∈ F ⋀ 〈x, v〉
∈ F) → u = v) |
| 23 | 22 | gen2 981 |
. 2
⊢ ∀x∀u∀v((〈x,
u〉 ∈ F ⋀ 〈x, v〉
∈ F) → u = v) |
| 24 | 1, 4, 23 | mpbir2an 729 |
1
⊢ Fun F |