Proof of Theorem dffun2
| Step | Hyp | Ref
| Expression |
| 1 | | df-fun 2432 |
. 2
⊢ (Fun A
↔ (Rel A ∧ (A ∘ ◡A)
⊆ I)) |
| 2 | | df-id 2125 |
. . . . . 6
⊢ I = {〈y, z〉∣y
= z} |
| 3 | 2 | sseq2i 1525 |
. . . . 5
⊢ ((A
∘ ◡A) ⊆ I ↔ (A ∘ ◡A)
⊆ {〈y, z〉∣y
= z}) |
| 4 | | df-co 2427 |
. . . . . 6
⊢ (A
∘ ◡A) = {〈y,
z〉∣∃x(y◡Ax ∧
xAz)} |
| 5 | 4 | sseq1i 1524 |
. . . . 5
⊢ ((A
∘ ◡A) ⊆ {〈y, z〉∣y
= z} ↔ {〈y, z〉∣∃x(y◡Ax ∧
xAz)} ⊆
{〈y, z〉∣y
= z}) |
| 6 | | ssopab2 2119 |
. . . . 5
⊢ ({〈y, z〉∣∃x(y◡Ax ∧
xAz)} ⊆
{〈y, z〉∣y
= z} ↔ ∀y∀z(∃x(y◡Ax ∧
xAz) →
y = z)) |
| 7 | 3, 5, 6 | 3bitr 155 |
. . . 4
⊢ ((A
∘ ◡A) ⊆ I ↔ ∀y∀z(∃x(y◡Ax ∧
xAz) →
y = z)) |
| 8 | | visset 1350 |
. . . . . . . . . . . 12
⊢ y
∈ V |
| 9 | | visset 1350 |
. . . . . . . . . . . 12
⊢ x
∈ V |
| 10 | 8, 9 | brcnv 2519 |
. . . . . . . . . . 11
⊢ (y◡Ax ↔
xAy) |
| 11 | 10 | anbi1i 368 |
. . . . . . . . . 10
⊢ ((y◡Ax ∧
xAz) ↔
(xAy ∧
xAz)) |
| 12 | 11 | biex 733 |
. . . . . . . . 9
⊢ (∃x(y◡Ax ∧
xAz) ↔
∃x(xAy ∧ xAz)) |
| 13 | 12 | imbi1i 161 |
. . . . . . . 8
⊢ ((∃x(y◡Ax ∧
xAz) →
y = z)
↔ (∃x(xAy ∧ xAz) → y =
z)) |
| 14 | | 19.23v 950 |
. . . . . . . 8
⊢ (∀x((xAy ∧
xAz) →
y = z)
↔ (∃x(xAy ∧ xAz) → y =
z)) |
| 15 | 13, 14 | bitr4 154 |
. . . . . . 7
⊢ ((∃x(y◡Ax ∧
xAz) →
y = z)
↔ ∀x((xAy ∧ xAz) → y =
z)) |
| 16 | 15 | bial 695 |
. . . . . 6
⊢ (∀z(∃x(y◡Ax ∧
xAz) →
y = z)
↔ ∀z∀x((xAy ∧
xAz) →
y = z)) |
| 17 | | alcom 715 |
. . . . . 6
⊢ (∀z∀x((xAy ∧
xAz) →
y = z)
↔ ∀x∀z((xAy ∧
xAz) →
y = z)) |
| 18 | 16, 17 | bitr 151 |
. . . . 5
⊢ (∀z(∃x(y◡Ax ∧
xAz) →
y = z)
↔ ∀x∀z((xAy ∧
xAz) →
y = z)) |
| 19 | 18 | bial 695 |
. . . 4
⊢ (∀y∀z(∃x(y◡Ax ∧
xAz) →
y = z)
↔ ∀y∀x∀z((xAy ∧
xAz) →
y = z)) |
| 20 | | alcom 715 |
. . . 4
⊢ (∀y∀x∀z((xAy ∧
xAz) →
y = z)
↔ ∀x∀y∀z((xAy ∧
xAz) →
y = z)) |
| 21 | 7, 19, 20 | 3bitr 155 |
. . 3
⊢ ((A
∘ ◡A) ⊆ I ↔ ∀x∀y∀z((xAy ∧
xAz) →
y = z)) |
| 22 | 21 | anbi2i 367 |
. 2
⊢ ((Rel A ∧ (A
∘ ◡A) ⊆ I) ↔ (Rel A ∧ ∀x∀y∀z((xAy ∧
xAz) →
y = z))) |
| 23 | 1, 22 | bitr 151 |
1
⊢ (Fun A
↔ (Rel A ∧ ∀x∀y∀z((xAy ∧
xAz) →
y = z))) |