Proof of Theorem elcgrabasi
| Step | Hyp | Ref
| Expression |
| 1 | | id 23 |
. . . . 5
⊢ (𝑥 = (𝐸‘0) → 𝑥 = (𝐸‘0)) |
| 2 | | eqidd 2763 |
. . . . 5
⊢ (𝑥 = (𝐸‘0) → 𝑦 = 𝑦) |
| 3 | | eqidd 2763 |
. . . . 5
⊢ (𝑥 = (𝐸‘0) → 𝑧 = 𝑧) |
| 4 | 1, 2, 3 | s3eqd 14935 |
. . . 4
⊢ (𝑥 = (𝐸‘0) → 〈“𝑥𝑦𝑧”〉 = 〈“(𝐸‘0)𝑦𝑧”〉) |
| 5 | 4 | eqeq2d 2773 |
. . 3
⊢ (𝑥 = (𝐸‘0) → (𝐸 = 〈“𝑥𝑦𝑧”〉 ↔ 𝐸 = 〈“(𝐸‘0)𝑦𝑧”〉)) |
| 6 | 1 | neeq1d 3016 |
. . . 4
⊢ (𝑥 = (𝐸‘0) → (𝑥 ≠ 𝑦 ↔ (𝐸‘0) ≠ 𝑦)) |
| 7 | 6 | anbi1d 643 |
. . 3
⊢ (𝑥 = (𝐸‘0) → ((𝑥 ≠ 𝑦 ∧ 𝑦 ≠ 𝑧) ↔ ((𝐸‘0) ≠ 𝑦 ∧ 𝑦 ≠ 𝑧))) |
| 8 | 5, 7 | anbi12d 644 |
. 2
⊢ (𝑥 = (𝐸‘0) → ((𝐸 = 〈“𝑥𝑦𝑧”〉 ∧ (𝑥 ≠ 𝑦 ∧ 𝑦 ≠ 𝑧)) ↔ (𝐸 = 〈“(𝐸‘0)𝑦𝑧”〉 ∧ ((𝐸‘0) ≠ 𝑦 ∧ 𝑦 ≠ 𝑧)))) |
| 9 | | s3eq2 14941 |
. . . 4
⊢ (𝑦 = (𝐸‘1) → 〈“(𝐸‘0)𝑦𝑧”〉 = 〈“(𝐸‘0)(𝐸‘1)𝑧”〉) |
| 10 | 9 | eqeq2d 2773 |
. . 3
⊢ (𝑦 = (𝐸‘1) → (𝐸 = 〈“(𝐸‘0)𝑦𝑧”〉 ↔ 𝐸 = 〈“(𝐸‘0)(𝐸‘1)𝑧”〉)) |
| 11 | | neeq2 3020 |
. . . 4
⊢ (𝑦 = (𝐸‘1) → ((𝐸‘0) ≠ 𝑦 ↔ (𝐸‘0) ≠ (𝐸‘1))) |
| 12 | | neeq1 3019 |
. . . 4
⊢ (𝑦 = (𝐸‘1) → (𝑦 ≠ 𝑧 ↔ (𝐸‘1) ≠ 𝑧)) |
| 13 | 11, 12 | anbi12d 644 |
. . 3
⊢ (𝑦 = (𝐸‘1) → (((𝐸‘0) ≠ 𝑦 ∧ 𝑦 ≠ 𝑧) ↔ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ 𝑧))) |
| 14 | 10, 13 | anbi12d 644 |
. 2
⊢ (𝑦 = (𝐸‘1) → ((𝐸 = 〈“(𝐸‘0)𝑦𝑧”〉 ∧ ((𝐸‘0) ≠ 𝑦 ∧ 𝑦 ≠ 𝑧)) ↔ (𝐸 = 〈“(𝐸‘0)(𝐸‘1)𝑧”〉 ∧ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ 𝑧)))) |
| 15 | | eqidd 2763 |
. . . . 5
⊢ (𝑧 = (𝐸‘2) → (𝐸‘0) = (𝐸‘0)) |
| 16 | | eqidd 2763 |
. . . . 5
⊢ (𝑧 = (𝐸‘2) → (𝐸‘1) = (𝐸‘1)) |
| 17 | | id 23 |
. . . . 5
⊢ (𝑧 = (𝐸‘2) → 𝑧 = (𝐸‘2)) |
| 18 | 15, 16, 17 | s3eqd 14935 |
. . . 4
⊢ (𝑧 = (𝐸‘2) → 〈“(𝐸‘0)(𝐸‘1)𝑧”〉 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉) |
| 19 | 18 | eqeq2d 2773 |
. . 3
⊢ (𝑧 = (𝐸‘2) → (𝐸 = 〈“(𝐸‘0)(𝐸‘1)𝑧”〉 ↔ 𝐸 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉)) |
| 20 | | biidd 265 |
. . . 4
⊢ (𝑧 = (𝐸‘2) → ((𝐸‘0) ≠ (𝐸‘1) ↔ (𝐸‘0) ≠ (𝐸‘1))) |
| 21 | 17 | neeq2d 3017 |
. . . 4
⊢ (𝑧 = (𝐸‘2) → ((𝐸‘1) ≠ 𝑧 ↔ (𝐸‘1) ≠ (𝐸‘2))) |
| 22 | 20, 21 | anbi12d 644 |
. . 3
⊢ (𝑧 = (𝐸‘2) → (((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ 𝑧) ↔ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ (𝐸‘2)))) |
| 23 | 19, 22 | anbi12d 644 |
. 2
⊢ (𝑧 = (𝐸‘2) → ((𝐸 = 〈“(𝐸‘0)(𝐸‘1)𝑧”〉 ∧ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ 𝑧)) ↔ (𝐸 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉 ∧ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ (𝐸‘2))))) |
| 24 | | fzo0to3tp 13808 |
. . . . 5
⊢ (0..^3) =
{0, 1, 2} |
| 25 | 24 | a1i 11 |
. . . 4
⊢ (𝜑 → (0..^3) = {0, 1,
2}) |
| 26 | | elcgrabasi.2 |
. . . . . . 7
⊢ 𝐴 = {𝑑 ∈ (𝑃 ↑m (0..^3)) ∣ ((𝑑‘0) ≠ (𝑑‘1) ∧ (𝑑‘1) ≠ (𝑑‘2))} |
| 27 | 26 | ssrab3 4033 |
. . . . . 6
⊢ 𝐴 ⊆ (𝑃 ↑m
(0..^3)) |
| 28 | | elcgrabasi.3 |
. . . . . 6
⊢ (𝜑 → 𝐸 ∈ 𝐴) |
| 29 | 27, 28 | sselid 3932 |
. . . . 5
⊢ (𝜑 → 𝐸 ∈ (𝑃 ↑m
(0..^3))) |
| 30 | 29 | elmaprd 8852 |
. . . 4
⊢ (𝜑 → 𝐸:(0..^3)⟶𝑃) |
| 31 | 25, 30 | feq2dd 6692 |
. . 3
⊢ (𝜑 → 𝐸:{0, 1, 2}⟶𝑃) |
| 32 | | c0ex 11225 |
. . . . 5
⊢ 0 ∈
V |
| 33 | 32 | tpid1 4732 |
. . . 4
⊢ 0 ∈
{0, 1, 2} |
| 34 | 33 | a1i 11 |
. . 3
⊢ (𝜑 → 0 ∈ {0, 1,
2}) |
| 35 | 31, 34 | ffvelcdmd 7081 |
. 2
⊢ (𝜑 → (𝐸‘0) ∈ 𝑃) |
| 36 | | 1eltp012 12336 |
. . . 4
⊢ 1 ∈
{0, 1, 2} |
| 37 | 36 | a1i 11 |
. . 3
⊢ (𝜑 → 1 ∈ {0, 1,
2}) |
| 38 | 31, 37 | ffvelcdmd 7081 |
. 2
⊢ (𝜑 → (𝐸‘1) ∈ 𝑃) |
| 39 | | 2ex 12343 |
. . . . 5
⊢ 2 ∈
V |
| 40 | 39 | tpid3 4737 |
. . . 4
⊢ 2 ∈
{0, 1, 2} |
| 41 | 40 | a1i 11 |
. . 3
⊢ (𝜑 → 2 ∈ {0, 1,
2}) |
| 42 | 31, 41 | ffvelcdmd 7081 |
. 2
⊢ (𝜑 → (𝐸‘2) ∈ 𝑃) |
| 43 | | iswrdi 14582 |
. . . . 5
⊢ (𝐸:(0..^3)⟶𝑃 → 𝐸 ∈ Word 𝑃) |
| 44 | 30, 43 | syl 18 |
. . . 4
⊢ (𝜑 → 𝐸 ∈ Word 𝑃) |
| 45 | 30 | ffnd 6707 |
. . . . . 6
⊢ (𝜑 → 𝐸 Fn (0..^3)) |
| 46 | | hashfn 14439 |
. . . . . 6
⊢ (𝐸 Fn (0..^3) →
(♯‘𝐸) =
(♯‘(0..^3))) |
| 47 | 45, 46 | syl 18 |
. . . . 5
⊢ (𝜑 → (♯‘𝐸) =
(♯‘(0..^3))) |
| 48 | | 3nn0 12547 |
. . . . . 6
⊢ 3 ∈
ℕ0 |
| 49 | | hashfzo0 14495 |
. . . . . 6
⊢ (3 ∈
ℕ0 → (♯‘(0..^3)) = 3) |
| 50 | 48, 49 | ax-mp 5 |
. . . . 5
⊢
(♯‘(0..^3)) = 3 |
| 51 | 47, 50 | eqtrdi 2813 |
. . . 4
⊢ (𝜑 → (♯‘𝐸) = 3) |
| 52 | | wrdlen3s3 15020 |
. . . 4
⊢ ((𝐸 ∈ Word 𝑃 ∧ (♯‘𝐸) = 3) → 𝐸 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉) |
| 53 | 44, 51, 52 | syl2anc 596 |
. . 3
⊢ (𝜑 → 𝐸 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉) |
| 54 | | fveq1 6881 |
. . . . . 6
⊢ (𝑑 = 𝐸 → (𝑑‘0) = (𝐸‘0)) |
| 55 | | fveq1 6881 |
. . . . . 6
⊢ (𝑑 = 𝐸 → (𝑑‘1) = (𝐸‘1)) |
| 56 | 54, 55 | neeq12d 3018 |
. . . . 5
⊢ (𝑑 = 𝐸 → ((𝑑‘0) ≠ (𝑑‘1) ↔ (𝐸‘0) ≠ (𝐸‘1))) |
| 57 | | fveq1 6881 |
. . . . . 6
⊢ (𝑑 = 𝐸 → (𝑑‘2) = (𝐸‘2)) |
| 58 | 55, 57 | neeq12d 3018 |
. . . . 5
⊢ (𝑑 = 𝐸 → ((𝑑‘1) ≠ (𝑑‘2) ↔ (𝐸‘1) ≠ (𝐸‘2))) |
| 59 | 56, 58 | anbi12d 644 |
. . . 4
⊢ (𝑑 = 𝐸 → (((𝑑‘0) ≠ (𝑑‘1) ∧ (𝑑‘1) ≠ (𝑑‘2)) ↔ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ (𝐸‘2)))) |
| 60 | 26 | eleq2i 2854 |
. . . . 5
⊢ (𝐸 ∈ 𝐴 ↔ 𝐸 ∈ {𝑑 ∈ (𝑃 ↑m (0..^3)) ∣ ((𝑑‘0) ≠ (𝑑‘1) ∧ (𝑑‘1) ≠ (𝑑‘2))}) |
| 61 | 28, 60 | sylib 221 |
. . . 4
⊢ (𝜑 → 𝐸 ∈ {𝑑 ∈ (𝑃 ↑m (0..^3)) ∣ ((𝑑‘0) ≠ (𝑑‘1) ∧ (𝑑‘1) ≠ (𝑑‘2))}) |
| 62 | 59, 61 | elrabrd 3651 |
. . 3
⊢ (𝜑 → ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ (𝐸‘2))) |
| 63 | 53, 62 | jca 521 |
. 2
⊢ (𝜑 → (𝐸 = 〈“(𝐸‘0)(𝐸‘1)(𝐸‘2)”〉 ∧ ((𝐸‘0) ≠ (𝐸‘1) ∧ (𝐸‘1) ≠ (𝐸‘2)))) |
| 64 | 8, 14, 23, 35, 38, 42, 63 | 3rspcedvdw 3597 |
1
⊢ (𝜑 → ∃𝑥 ∈ 𝑃 ∃𝑦 ∈ 𝑃 ∃𝑧 ∈ 𝑃 (𝐸 = 〈“𝑥𝑦𝑧”〉 ∧ (𝑥 ≠ 𝑦 ∧ 𝑦 ≠ 𝑧))) |