Proof of Theorem dffun7
| Step | Hyp | Ref
| Expression |
| 1 | | funrel 2681 |
. . 3
⊢ (Fun A
→ Rel A) |
| 2 | | ax-17 925 |
. . . . . 6
⊢ (Fun A
→ ∀yFun A) |
| 3 | | hbeu1 1015 |
. . . . . 6
⊢ (∃!y〈x,
y〉 ∈ A → ∀y∃!y〈x,
y〉 ∈ A) |
| 4 | | funeu2 2686 |
. . . . . . 7
⊢ ((Fun A ∧ 〈x,
y〉 ∈ A) → ∃!y〈x,
y〉 ∈ A) |
| 5 | 4 | exp 291 |
. . . . . 6
⊢ (Fun A
→ (〈x, y〉 ∈ A
→ ∃!y〈x, y〉
∈ A)) |
| 6 | 2, 3, 5 | 19.23ad 748 |
. . . . 5
⊢ (Fun A
→ (∃y〈x, y〉
∈ A → ∃!y〈x,
y〉 ∈ A)) |
| 7 | | visset 1350 |
. . . . . 6
⊢ x
∈ V |
| 8 | 7 | eldm2 2528 |
. . . . 5
⊢ (x
∈ dom A ↔ ∃y〈x,
y〉 ∈ A) |
| 9 | | df-br 2063 |
. . . . . 6
⊢ (xAy ↔ 〈x, y〉
∈ A) |
| 10 | 9 | bieu 1014 |
. . . . 5
⊢ (∃!y xAy ↔
∃!y〈x, y〉
∈ A) |
| 11 | 6, 8, 10 | 3imtr4g 426 |
. . . 4
⊢ (Fun A
→ (x ∈ dom A → ∃!y xAy)) |
| 12 | 11 | r19.21aiv 1259 |
. . 3
⊢ (Fun A
→ ∀x ∈ dom A∃!y
xAy) |
| 13 | 1, 12 | jca 236 |
. 2
⊢ (Fun A
→ (Rel A ∧ ∀x ∈ dom A∃!y
xAy)) |
| 14 | | eumo 1037 |
. . . . 5
⊢ (∃!y xAy →
∃*y xAy) |
| 15 | 14 | r19.20si 1254 |
. . . 4
⊢ (∀x ∈ dom A∃!y
xAy →
∀x ∈ dom A∃*y
xAy) |
| 16 | 15 | anim2i 270 |
. . 3
⊢ ((Rel A ∧ ∀x ∈ dom A∃!y
xAy) → (Rel
A ∧ ∀x ∈ dom A∃*y
xAy)) |
| 17 | | dffun6 2687 |
. . 3
⊢ (Fun A
↔ (Rel A ∧ ∀x ∈ dom A∃*y
xAy)) |
| 18 | 16, 17 | sylibr 175 |
. 2
⊢ ((Rel A ∧ ∀x ∈ dom A∃!y
xAy) → Fun
A) |
| 19 | 13, 18 | impbi 139 |
1
⊢ (Fun A
↔ (Rel A ∧ ∀x ∈ dom A∃!y
xAy)) |