Proof of Theorem 2wlkdlem10
Step | Hyp | Ref
| Expression |
1 | | 2wlkd.p |
. . . 4
⊢ 𝑃 = 〈“𝐴𝐵𝐶”〉 |
2 | | 2wlkd.f |
. . . 4
⊢ 𝐹 = 〈“𝐽𝐾”〉 |
3 | | 2wlkd.s |
. . . 4
⊢ (𝜑 → (𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑉 ∧ 𝐶 ∈ 𝑉)) |
4 | | 2wlkd.n |
. . . 4
⊢ (𝜑 → (𝐴 ≠ 𝐵 ∧ 𝐵 ≠ 𝐶)) |
5 | | 2wlkd.e |
. . . 4
⊢ (𝜑 → ({𝐴, 𝐵} ⊆ (𝐼‘𝐽) ∧ {𝐵, 𝐶} ⊆ (𝐼‘𝐾))) |
6 | 1, 2, 3, 4, 5 | 2wlkdlem9 28200 |
. . 3
⊢ (𝜑 → ({𝐴, 𝐵} ⊆ (𝐼‘(𝐹‘0)) ∧ {𝐵, 𝐶} ⊆ (𝐼‘(𝐹‘1)))) |
7 | 1, 2, 3 | 2wlkdlem3 28193 |
. . . 4
⊢ (𝜑 → ((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶)) |
8 | | preq12 4668 |
. . . . . . 7
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵) → {(𝑃‘0), (𝑃‘1)} = {𝐴, 𝐵}) |
9 | 8 | 3adant3 1130 |
. . . . . 6
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → {(𝑃‘0), (𝑃‘1)} = {𝐴, 𝐵}) |
10 | 9 | sseq1d 3948 |
. . . . 5
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → ({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ↔ {𝐴, 𝐵} ⊆ (𝐼‘(𝐹‘0)))) |
11 | | preq12 4668 |
. . . . . . 7
⊢ (((𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → {(𝑃‘1), (𝑃‘2)} = {𝐵, 𝐶}) |
12 | 11 | 3adant1 1128 |
. . . . . 6
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → {(𝑃‘1), (𝑃‘2)} = {𝐵, 𝐶}) |
13 | 12 | sseq1d 3948 |
. . . . 5
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → ({(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1)) ↔ {𝐵, 𝐶} ⊆ (𝐼‘(𝐹‘1)))) |
14 | 10, 13 | anbi12d 630 |
. . . 4
⊢ (((𝑃‘0) = 𝐴 ∧ (𝑃‘1) = 𝐵 ∧ (𝑃‘2) = 𝐶) → (({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ∧ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1))) ↔ ({𝐴, 𝐵} ⊆ (𝐼‘(𝐹‘0)) ∧ {𝐵, 𝐶} ⊆ (𝐼‘(𝐹‘1))))) |
15 | 7, 14 | syl 17 |
. . 3
⊢ (𝜑 → (({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ∧ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1))) ↔ ({𝐴, 𝐵} ⊆ (𝐼‘(𝐹‘0)) ∧ {𝐵, 𝐶} ⊆ (𝐼‘(𝐹‘1))))) |
16 | 6, 15 | mpbird 256 |
. 2
⊢ (𝜑 → ({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ∧ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1)))) |
17 | 1, 2 | 2wlkdlem2 28192 |
. . . 4
⊢
(0..^(♯‘𝐹)) = {0, 1} |
18 | 17 | raleqi 3337 |
. . 3
⊢
(∀𝑘 ∈
(0..^(♯‘𝐹)){(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘)) ↔ ∀𝑘 ∈ {0, 1} {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘))) |
19 | | c0ex 10900 |
. . . 4
⊢ 0 ∈
V |
20 | | 1ex 10902 |
. . . 4
⊢ 1 ∈
V |
21 | | fveq2 6756 |
. . . . . 6
⊢ (𝑘 = 0 → (𝑃‘𝑘) = (𝑃‘0)) |
22 | | fv0p1e1 12026 |
. . . . . 6
⊢ (𝑘 = 0 → (𝑃‘(𝑘 + 1)) = (𝑃‘1)) |
23 | 21, 22 | preq12d 4674 |
. . . . 5
⊢ (𝑘 = 0 → {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} = {(𝑃‘0), (𝑃‘1)}) |
24 | | 2fveq3 6761 |
. . . . 5
⊢ (𝑘 = 0 → (𝐼‘(𝐹‘𝑘)) = (𝐼‘(𝐹‘0))) |
25 | 23, 24 | sseq12d 3950 |
. . . 4
⊢ (𝑘 = 0 → ({(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘)) ↔ {(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)))) |
26 | | fveq2 6756 |
. . . . . 6
⊢ (𝑘 = 1 → (𝑃‘𝑘) = (𝑃‘1)) |
27 | | oveq1 7262 |
. . . . . . . 8
⊢ (𝑘 = 1 → (𝑘 + 1) = (1 + 1)) |
28 | | 1p1e2 12028 |
. . . . . . . 8
⊢ (1 + 1) =
2 |
29 | 27, 28 | eqtrdi 2795 |
. . . . . . 7
⊢ (𝑘 = 1 → (𝑘 + 1) = 2) |
30 | 29 | fveq2d 6760 |
. . . . . 6
⊢ (𝑘 = 1 → (𝑃‘(𝑘 + 1)) = (𝑃‘2)) |
31 | 26, 30 | preq12d 4674 |
. . . . 5
⊢ (𝑘 = 1 → {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} = {(𝑃‘1), (𝑃‘2)}) |
32 | | 2fveq3 6761 |
. . . . 5
⊢ (𝑘 = 1 → (𝐼‘(𝐹‘𝑘)) = (𝐼‘(𝐹‘1))) |
33 | 31, 32 | sseq12d 3950 |
. . . 4
⊢ (𝑘 = 1 → ({(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘)) ↔ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1)))) |
34 | 19, 20, 25, 33 | ralpr 4633 |
. . 3
⊢
(∀𝑘 ∈
{0, 1} {(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘)) ↔ ({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ∧ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1)))) |
35 | 18, 34 | bitri 274 |
. 2
⊢
(∀𝑘 ∈
(0..^(♯‘𝐹)){(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘)) ↔ ({(𝑃‘0), (𝑃‘1)} ⊆ (𝐼‘(𝐹‘0)) ∧ {(𝑃‘1), (𝑃‘2)} ⊆ (𝐼‘(𝐹‘1)))) |
36 | 16, 35 | sylibr 233 |
1
⊢ (𝜑 → ∀𝑘 ∈ (0..^(♯‘𝐹)){(𝑃‘𝑘), (𝑃‘(𝑘 + 1))} ⊆ (𝐼‘(𝐹‘𝑘))) |