Proof of Theorem aceq5lem1
| Step | Hyp | Ref
| Expression |
| 1 | | elin 2203 |
. . . 4
⊢ (v
∈ (({w} × w) ∩ y)
↔ (v ∈ ({w} × w)
⋀ v ∈ y)) |
| 2 | | elxp 3197 |
. . . . . 6
⊢ (v
∈ ({w} × w) ↔ ∃t∃g(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w))) |
| 3 | | excom 1044 |
. . . . . 6
⊢ (∃t∃g(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ↔ ∃g∃t(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w))) |
| 4 | 2, 3 | bitr 173 |
. . . . 5
⊢ (v
∈ ({w} × w) ↔ ∃g∃t(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w))) |
| 5 | 4 | anbi1i 481 |
. . . 4
⊢ ((v
∈ ({w} × w) ⋀ v
∈ y) ↔ (∃g∃t(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y)) |
| 6 | | 19.41vv 1304 |
. . . . 5
⊢ (∃g∃t((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ (∃g∃t(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y)) |
| 7 | | an23 485 |
. . . . . . . . 9
⊢ (((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ ((v = 〈t,
g〉 ⋀ v ∈ y)
⋀ (t ∈ {w} ⋀ g
∈ w))) |
| 8 | | eleq1 1531 |
. . . . . . . . . . 11
⊢ (v =
〈t, g〉 → (v ∈ y
↔ 〈t, g〉 ∈ y)) |
| 9 | 8 | pm5.32i 644 |
. . . . . . . . . 10
⊢ ((v =
〈t, g〉 ⋀ v ∈ y)
↔ (v = 〈t, g〉
⋀ 〈t, g〉 ∈ y)) |
| 10 | | elsn 2417 |
. . . . . . . . . . 11
⊢ (t
∈ {w} ↔ t = w) |
| 11 | 10 | anbi1i 481 |
. . . . . . . . . 10
⊢ ((t
∈ {w} ⋀ g ∈ w)
↔ (t = w ⋀ g
∈ w)) |
| 12 | 9, 11 | anbi12i 482 |
. . . . . . . . 9
⊢ (((v =
〈t, g〉 ⋀ v ∈ y)
⋀ (t ∈ {w} ⋀ g
∈ w)) ↔ ((v = 〈t,
g〉 ⋀ 〈t, g〉
∈ y) ⋀ (t = w ⋀
g ∈ w))) |
| 13 | | an4 506 |
. . . . . . . . . 10
⊢ (((v =
〈t, g〉 ⋀ 〈t, g〉
∈ y) ⋀ (t = w ⋀
g ∈ w)) ↔ ((v =
〈t, g〉 ⋀ t = w) ⋀
(〈t, g〉 ∈ y
⋀ g ∈ w))) |
| 14 | | ancom 435 |
. . . . . . . . . . 11
⊢ ((v =
〈t, g〉 ⋀ t = w) ↔
(t = w
⋀ v = 〈t, g〉)) |
| 15 | | ancom 435 |
. . . . . . . . . . 11
⊢ ((〈t, g〉
∈ y ⋀ g ∈ w)
↔ (g ∈ w ⋀ 〈t, g〉
∈ y)) |
| 16 | 14, 15 | anbi12i 482 |
. . . . . . . . . 10
⊢ (((v =
〈t, g〉 ⋀ t = w) ⋀
(〈t, g〉 ∈ y
⋀ g ∈ w)) ↔ ((t =
w ⋀ v = 〈t,
g〉) ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y))) |
| 17 | | anass 439 |
. . . . . . . . . 10
⊢ (((t =
w ⋀ v = 〈t,
g〉) ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y)) ↔ (t =
w ⋀ (v = 〈t,
g〉 ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y)))) |
| 18 | 13, 16, 17 | 3bitr 177 |
. . . . . . . . 9
⊢ (((v =
〈t, g〉 ⋀ 〈t, g〉
∈ y) ⋀ (t = w ⋀
g ∈ w)) ↔ (t =
w ⋀ (v = 〈t,
g〉 ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y)))) |
| 19 | 7, 12, 18 | 3bitr 177 |
. . . . . . . 8
⊢ (((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ (t = w ⋀
(v = 〈t, g〉
⋀ (g ∈ w ⋀ 〈t, g〉
∈ y)))) |
| 20 | 19 | exbii 1049 |
. . . . . . 7
⊢ (∃t((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ ∃t(t = w ⋀ (v =
〈t, g〉 ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y)))) |
| 21 | | visset 1809 |
. . . . . . . 8
⊢ w
∈ V |
| 22 | | opeq1 2483 |
. . . . . . . . . 10
⊢ (t =
w → 〈t, g〉 =
〈w, g〉) |
| 23 | 22 | eqeq2d 1483 |
. . . . . . . . 9
⊢ (t =
w → (v = 〈t,
g〉 ↔ v = 〈w,
g〉)) |
| 24 | 22 | eleq1d 1537 |
. . . . . . . . . 10
⊢ (t =
w → (〈t, g〉
∈ y ↔ 〈w, g〉
∈ y)) |
| 25 | 24 | anbi2d 615 |
. . . . . . . . 9
⊢ (t =
w → ((g ∈ w
⋀ 〈t, g〉 ∈ y) ↔ (g
∈ w ⋀ 〈w, g〉
∈ y))) |
| 26 | 23, 25 | anbi12d 627 |
. . . . . . . 8
⊢ (t =
w → ((v = 〈t,
g〉 ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y)) ↔ (v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y)))) |
| 27 | 21, 26 | ceqsexv 1831 |
. . . . . . 7
⊢ (∃t(t = w ⋀ (v =
〈t, g〉 ⋀ (g ∈ w
⋀ 〈t, g〉 ∈ y))) ↔ (v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 28 | 20, 27 | bitr 173 |
. . . . . 6
⊢ (∃t((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ (v = 〈w,
g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 29 | 28 | exbii 1049 |
. . . . 5
⊢ (∃g∃t((v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ ∃g(v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 30 | 6, 29 | bitr3 175 |
. . . 4
⊢ ((∃g∃t(v =
〈t, g〉 ⋀ (t ∈ {w}
⋀ g ∈ w)) ⋀ v
∈ y) ↔ ∃g(v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 31 | 1, 5, 30 | 3bitr 177 |
. . 3
⊢ (v
∈ (({w} × w) ∩ y)
↔ ∃g(v = 〈w,
g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 32 | 31 | eubii 1385 |
. 2
⊢ (∃!v v ∈
(({w} × w) ∩ y)
↔ ∃!v∃g(v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y))) |
| 33 | | euop2 2801 |
. 2
⊢ (∃!v∃g(v =
〈w, g〉 ⋀ (g ∈ w
⋀ 〈w, g〉 ∈ y)) ↔ ∃!g(g ∈
w ⋀ 〈w, g〉
∈ y)) |
| 34 | 32, 33 | bitr 173 |
1
⊢ (∃!v v ∈
(({w} × w) ∩ y)
↔ ∃!g(g ∈ w
⋀ 〈w, g〉 ∈ y)) |