Proof of Theorem crctcshwlkn0lem4
| Step | Hyp | Ref
| Expression |
| 1 | | crctcshwlkn0lem.p |
. . . . 5
⊢ (𝜑 → ∀𝑖 ∈ (0..^𝑁)if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖)))) |
| 2 | | crctcshwlkn0lem.s |
. . . . . . 7
⊢ (𝜑 → 𝑆 ∈ (1..^𝑁)) |
| 3 | | elfzoelz 13699 |
. . . . . . . . . . 11
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → 𝑗 ∈ ℤ) |
| 4 | 3 | zcnd 12723 |
. . . . . . . . . 10
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → 𝑗 ∈ ℂ) |
| 5 | 4 | adantl 481 |
. . . . . . . . 9
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑗 ∈ ℂ) |
| 6 | | elfzoelz 13699 |
. . . . . . . . . . 11
⊢ (𝑆 ∈ (1..^𝑁) → 𝑆 ∈ ℤ) |
| 7 | 6 | zcnd 12723 |
. . . . . . . . . 10
⊢ (𝑆 ∈ (1..^𝑁) → 𝑆 ∈ ℂ) |
| 8 | 7 | adantr 480 |
. . . . . . . . 9
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑆 ∈ ℂ) |
| 9 | | 1cnd 11256 |
. . . . . . . . 9
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 1 ∈
ℂ) |
| 10 | 5, 8, 9 | add32d 11489 |
. . . . . . . 8
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) |
| 11 | | elfzo1 13752 |
. . . . . . . . . . . . 13
⊢ (𝑆 ∈ (1..^𝑁) ↔ (𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁)) |
| 12 | | elfzonn0 13747 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → 𝑗 ∈ ℕ0) |
| 13 | | nnnn0 12533 |
. . . . . . . . . . . . . . 15
⊢ (𝑆 ∈ ℕ → 𝑆 ∈
ℕ0) |
| 14 | | nn0addcl 12561 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑗 ∈ ℕ0
∧ 𝑆 ∈
ℕ0) → (𝑗 + 𝑆) ∈
ℕ0) |
| 15 | 14 | ex 412 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ ℕ0
→ (𝑆 ∈
ℕ0 → (𝑗 + 𝑆) ∈
ℕ0)) |
| 16 | 12, 13, 15 | syl2imc 41 |
. . . . . . . . . . . . . 14
⊢ (𝑆 ∈ ℕ → (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (𝑗 + 𝑆) ∈
ℕ0)) |
| 17 | 16 | 3ad2ant1 1134 |
. . . . . . . . . . . . 13
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (𝑗 + 𝑆) ∈
ℕ0)) |
| 18 | 11, 17 | sylbi 217 |
. . . . . . . . . . . 12
⊢ (𝑆 ∈ (1..^𝑁) → (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (𝑗 + 𝑆) ∈
ℕ0)) |
| 19 | 18 | imp 406 |
. . . . . . . . . . 11
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ∈
ℕ0) |
| 20 | | fzo0ss1 13729 |
. . . . . . . . . . . . . 14
⊢
(1..^𝑁) ⊆
(0..^𝑁) |
| 21 | 20 | sseli 3979 |
. . . . . . . . . . . . 13
⊢ (𝑆 ∈ (1..^𝑁) → 𝑆 ∈ (0..^𝑁)) |
| 22 | | elfzo0 13740 |
. . . . . . . . . . . . . 14
⊢ (𝑆 ∈ (0..^𝑁) ↔ (𝑆 ∈ ℕ0 ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁)) |
| 23 | 22 | simp2bi 1147 |
. . . . . . . . . . . . 13
⊢ (𝑆 ∈ (0..^𝑁) → 𝑁 ∈ ℕ) |
| 24 | 21, 23 | syl 17 |
. . . . . . . . . . . 12
⊢ (𝑆 ∈ (1..^𝑁) → 𝑁 ∈ ℕ) |
| 25 | 24 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑁 ∈ ℕ) |
| 26 | | elfzo0 13740 |
. . . . . . . . . . . . 13
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) ↔ (𝑗 ∈ ℕ0 ∧ (𝑁 − 𝑆) ∈ ℕ ∧ 𝑗 < (𝑁 − 𝑆))) |
| 27 | | nn0re 12535 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑗 ∈ ℕ0
→ 𝑗 ∈
ℝ) |
| 28 | | nnre 12273 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ (𝑆 ∈ ℕ → 𝑆 ∈
ℝ) |
| 29 | | nnre 12273 |
. . . . . . . . . . . . . . . . . . . . . . . 24
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℝ) |
| 30 | 28, 29 | anim12i 613 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑆 ∈ ℝ ∧ 𝑁 ∈
ℝ)) |
| 31 | 30 | 3adant3 1133 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ)) |
| 32 | 11, 31 | sylbi 217 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑆 ∈ (1..^𝑁) → (𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ)) |
| 33 | 27, 32 | anim12i 613 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑗 ∈ ℕ0
∧ 𝑆 ∈ (1..^𝑁)) → (𝑗 ∈ ℝ ∧ (𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ))) |
| 34 | | 3anass 1095 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑗 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ) ↔ (𝑗 ∈ ℝ ∧ (𝑆 ∈ ℝ ∧ 𝑁 ∈
ℝ))) |
| 35 | 33, 34 | sylibr 234 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑗 ∈ ℕ0
∧ 𝑆 ∈ (1..^𝑁)) → (𝑗 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ)) |
| 36 | | ltaddsub 11737 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑗 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑗 + 𝑆) < 𝑁 ↔ 𝑗 < (𝑁 − 𝑆))) |
| 37 | 36 | bicomd 223 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑗 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑗 < (𝑁 − 𝑆) ↔ (𝑗 + 𝑆) < 𝑁)) |
| 38 | 35, 37 | syl 17 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑗 ∈ ℕ0
∧ 𝑆 ∈ (1..^𝑁)) → (𝑗 < (𝑁 − 𝑆) ↔ (𝑗 + 𝑆) < 𝑁)) |
| 39 | 38 | biimpd 229 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑗 ∈ ℕ0
∧ 𝑆 ∈ (1..^𝑁)) → (𝑗 < (𝑁 − 𝑆) → (𝑗 + 𝑆) < 𝑁)) |
| 40 | 39 | ex 412 |
. . . . . . . . . . . . . . . 16
⊢ (𝑗 ∈ ℕ0
→ (𝑆 ∈ (1..^𝑁) → (𝑗 < (𝑁 − 𝑆) → (𝑗 + 𝑆) < 𝑁))) |
| 41 | 40 | com23 86 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ ℕ0
→ (𝑗 < (𝑁 − 𝑆) → (𝑆 ∈ (1..^𝑁) → (𝑗 + 𝑆) < 𝑁))) |
| 42 | 41 | a1d 25 |
. . . . . . . . . . . . . 14
⊢ (𝑗 ∈ ℕ0
→ ((𝑁 − 𝑆) ∈ ℕ → (𝑗 < (𝑁 − 𝑆) → (𝑆 ∈ (1..^𝑁) → (𝑗 + 𝑆) < 𝑁)))) |
| 43 | 42 | 3imp 1111 |
. . . . . . . . . . . . 13
⊢ ((𝑗 ∈ ℕ0
∧ (𝑁 − 𝑆) ∈ ℕ ∧ 𝑗 < (𝑁 − 𝑆)) → (𝑆 ∈ (1..^𝑁) → (𝑗 + 𝑆) < 𝑁)) |
| 44 | 26, 43 | sylbi 217 |
. . . . . . . . . . . 12
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (𝑆 ∈ (1..^𝑁) → (𝑗 + 𝑆) < 𝑁)) |
| 45 | 44 | impcom 407 |
. . . . . . . . . . 11
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) < 𝑁) |
| 46 | | elfzo0 13740 |
. . . . . . . . . . 11
⊢ ((𝑗 + 𝑆) ∈ (0..^𝑁) ↔ ((𝑗 + 𝑆) ∈ ℕ0 ∧ 𝑁 ∈ ℕ ∧ (𝑗 + 𝑆) < 𝑁)) |
| 47 | 19, 25, 45, 46 | syl3anbrc 1344 |
. . . . . . . . . 10
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ∈ (0..^𝑁)) |
| 48 | 47 | adantr 480 |
. . . . . . . . 9
⊢ (((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) → (𝑗 + 𝑆) ∈ (0..^𝑁)) |
| 49 | | fveq2 6906 |
. . . . . . . . . . . 12
⊢ (𝑖 = (𝑗 + 𝑆) → (𝑃‘𝑖) = (𝑃‘(𝑗 + 𝑆))) |
| 50 | 49 | adantl 481 |
. . . . . . . . . . 11
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → (𝑃‘𝑖) = (𝑃‘(𝑗 + 𝑆))) |
| 51 | | fvoveq1 7454 |
. . . . . . . . . . . 12
⊢ (𝑖 = (𝑗 + 𝑆) → (𝑃‘(𝑖 + 1)) = (𝑃‘((𝑗 + 𝑆) + 1))) |
| 52 | | simpr 484 |
. . . . . . . . . . . . 13
⊢ (((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) → ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) |
| 53 | 52 | fveq2d 6910 |
. . . . . . . . . . . 12
⊢ (((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) → (𝑃‘((𝑗 + 𝑆) + 1)) = (𝑃‘((𝑗 + 1) + 𝑆))) |
| 54 | 51, 53 | sylan9eqr 2799 |
. . . . . . . . . . 11
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → (𝑃‘(𝑖 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆))) |
| 55 | 50, 54 | eqeq12d 2753 |
. . . . . . . . . 10
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → ((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)) ↔ (𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)))) |
| 56 | | 2fveq3 6911 |
. . . . . . . . . . . 12
⊢ (𝑖 = (𝑗 + 𝑆) → (𝐼‘(𝐹‘𝑖)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) |
| 57 | 49 | sneqd 4638 |
. . . . . . . . . . . 12
⊢ (𝑖 = (𝑗 + 𝑆) → {(𝑃‘𝑖)} = {(𝑃‘(𝑗 + 𝑆))}) |
| 58 | 56, 57 | eqeq12d 2753 |
. . . . . . . . . . 11
⊢ (𝑖 = (𝑗 + 𝑆) → ((𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)} ↔ (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))})) |
| 59 | 58 | adantl 481 |
. . . . . . . . . 10
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → ((𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)} ↔ (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))})) |
| 60 | 50, 54 | preq12d 4741 |
. . . . . . . . . . 11
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} = {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))}) |
| 61 | 56 | adantl 481 |
. . . . . . . . . . 11
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → (𝐼‘(𝐹‘𝑖)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) |
| 62 | 60, 61 | sseq12d 4017 |
. . . . . . . . . 10
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → ({(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖)) ↔ {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆))))) |
| 63 | 55, 59, 62 | ifpbi123d 1079 |
. . . . . . . . 9
⊢ ((((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) ∧ 𝑖 = (𝑗 + 𝑆)) → (if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖))) ↔ if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 64 | 48, 63 | rspcdv 3614 |
. . . . . . . 8
⊢ (((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) ∧ ((𝑗 + 𝑆) + 1) = ((𝑗 + 1) + 𝑆)) → (∀𝑖 ∈ (0..^𝑁)if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖))) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 65 | 10, 64 | mpdan 687 |
. . . . . . 7
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (∀𝑖 ∈ (0..^𝑁)if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖))) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 66 | 2, 65 | sylan 580 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (∀𝑖 ∈ (0..^𝑁)if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖))) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 67 | 66 | ex 412 |
. . . . 5
⊢ (𝜑 → (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (∀𝑖 ∈ (0..^𝑁)if-((𝑃‘𝑖) = (𝑃‘(𝑖 + 1)), (𝐼‘(𝐹‘𝑖)) = {(𝑃‘𝑖)}, {(𝑃‘𝑖), (𝑃‘(𝑖 + 1))} ⊆ (𝐼‘(𝐹‘𝑖))) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆))))))) |
| 68 | 1, 67 | mpid 44 |
. . . 4
⊢ (𝜑 → (𝑗 ∈ (0..^(𝑁 − 𝑆)) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 69 | 68 | imp 406 |
. . 3
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆))))) |
| 70 | | elfzofz 13715 |
. . . . 5
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → 𝑗 ∈ (0...(𝑁 − 𝑆))) |
| 71 | | crctcshwlkn0lem.q |
. . . . . 6
⊢ 𝑄 = (𝑥 ∈ (0...𝑁) ↦ if(𝑥 ≤ (𝑁 − 𝑆), (𝑃‘(𝑥 + 𝑆)), (𝑃‘((𝑥 + 𝑆) − 𝑁)))) |
| 72 | 2, 71 | crctcshwlkn0lem2 29831 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ (0...(𝑁 − 𝑆))) → (𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆))) |
| 73 | 70, 72 | sylan2 593 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆))) |
| 74 | | fzofzp1 13803 |
. . . . 5
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → (𝑗 + 1) ∈ (0...(𝑁 − 𝑆))) |
| 75 | 2, 71 | crctcshwlkn0lem2 29831 |
. . . . 5
⊢ ((𝜑 ∧ (𝑗 + 1) ∈ (0...(𝑁 − 𝑆))) → (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆))) |
| 76 | 74, 75 | sylan2 593 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆))) |
| 77 | | crctcshwlkn0lem.h |
. . . . . . 7
⊢ 𝐻 = (𝐹 cyclShift 𝑆) |
| 78 | 77 | fveq1i 6907 |
. . . . . 6
⊢ (𝐻‘𝑗) = ((𝐹 cyclShift 𝑆)‘𝑗) |
| 79 | | crctcshwlkn0lem.f |
. . . . . . . . 9
⊢ (𝜑 → 𝐹 ∈ Word 𝐴) |
| 80 | 79 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝐹 ∈ Word 𝐴) |
| 81 | 2, 6 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → 𝑆 ∈ ℤ) |
| 82 | 81 | adantr 480 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑆 ∈ ℤ) |
| 83 | | nnz 12634 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℤ) |
| 84 | 83 | adantl 481 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑁 ∈
ℤ) |
| 85 | | nnz 12634 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑆 ∈ ℕ → 𝑆 ∈
ℤ) |
| 86 | 85 | adantr 480 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑆 ∈
ℤ) |
| 87 | 84, 86 | zsubcld 12727 |
. . . . . . . . . . . . . . 15
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑁 − 𝑆) ∈ ℤ) |
| 88 | 13 | nn0ge0d 12590 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑆 ∈ ℕ → 0 ≤
𝑆) |
| 89 | 88 | adantr 480 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 0 ≤
𝑆) |
| 90 | | subge02 11779 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑁 ∈ ℝ ∧ 𝑆 ∈ ℝ) → (0 ≤
𝑆 ↔ (𝑁 − 𝑆) ≤ 𝑁)) |
| 91 | 29, 28, 90 | syl2anr 597 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (0 ≤
𝑆 ↔ (𝑁 − 𝑆) ≤ 𝑁)) |
| 92 | 89, 91 | mpbid 232 |
. . . . . . . . . . . . . . 15
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑁 − 𝑆) ≤ 𝑁) |
| 93 | 87, 84, 92 | 3jca 1129 |
. . . . . . . . . . . . . 14
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑁 − 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑁 − 𝑆) ≤ 𝑁)) |
| 94 | 93 | 3adant3 1133 |
. . . . . . . . . . . . 13
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → ((𝑁 − 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑁 − 𝑆) ≤ 𝑁)) |
| 95 | 11, 94 | sylbi 217 |
. . . . . . . . . . . 12
⊢ (𝑆 ∈ (1..^𝑁) → ((𝑁 − 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑁 − 𝑆) ≤ 𝑁)) |
| 96 | | eluz2 12884 |
. . . . . . . . . . . 12
⊢ (𝑁 ∈
(ℤ≥‘(𝑁 − 𝑆)) ↔ ((𝑁 − 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑁 − 𝑆) ≤ 𝑁)) |
| 97 | 95, 96 | sylibr 234 |
. . . . . . . . . . 11
⊢ (𝑆 ∈ (1..^𝑁) → 𝑁 ∈ (ℤ≥‘(𝑁 − 𝑆))) |
| 98 | | fzoss2 13727 |
. . . . . . . . . . 11
⊢ (𝑁 ∈
(ℤ≥‘(𝑁 − 𝑆)) → (0..^(𝑁 − 𝑆)) ⊆ (0..^𝑁)) |
| 99 | 2, 97, 98 | 3syl 18 |
. . . . . . . . . 10
⊢ (𝜑 → (0..^(𝑁 − 𝑆)) ⊆ (0..^𝑁)) |
| 100 | 99 | sselda 3983 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑗 ∈ (0..^𝑁)) |
| 101 | | crctcshwlkn0lem.n |
. . . . . . . . . 10
⊢ 𝑁 = (♯‘𝐹) |
| 102 | 101 | oveq2i 7442 |
. . . . . . . . 9
⊢
(0..^𝑁) =
(0..^(♯‘𝐹)) |
| 103 | 100, 102 | eleqtrdi 2851 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → 𝑗 ∈ (0..^(♯‘𝐹))) |
| 104 | | cshwidxmod 14841 |
. . . . . . . 8
⊢ ((𝐹 ∈ Word 𝐴 ∧ 𝑆 ∈ ℤ ∧ 𝑗 ∈ (0..^(♯‘𝐹))) → ((𝐹 cyclShift 𝑆)‘𝑗) = (𝐹‘((𝑗 + 𝑆) mod (♯‘𝐹)))) |
| 105 | 80, 82, 103, 104 | syl3anc 1373 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝐹 cyclShift 𝑆)‘𝑗) = (𝐹‘((𝑗 + 𝑆) mod (♯‘𝐹)))) |
| 106 | 101 | eqcomi 2746 |
. . . . . . . . . 10
⊢
(♯‘𝐹) =
𝑁 |
| 107 | 106 | oveq2i 7442 |
. . . . . . . . 9
⊢ ((𝑗 + 𝑆) mod (♯‘𝐹)) = ((𝑗 + 𝑆) mod 𝑁) |
| 108 | 17 | imp 406 |
. . . . . . . . . . . . . 14
⊢ (((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ∈
ℕ0) |
| 109 | | nnm1nn0 12567 |
. . . . . . . . . . . . . . . 16
⊢ (𝑁 ∈ ℕ → (𝑁 − 1) ∈
ℕ0) |
| 110 | 109 | 3ad2ant2 1135 |
. . . . . . . . . . . . . . 15
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑁 − 1) ∈
ℕ0) |
| 111 | 110 | adantr 480 |
. . . . . . . . . . . . . 14
⊢ (((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑁 − 1) ∈
ℕ0) |
| 112 | 27, 31 | anim12i 613 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 ∈ ℝ ∧ (𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ))) |
| 113 | 112, 34 | sylibr 234 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 ∈ ℝ ∧ 𝑆 ∈ ℝ ∧ 𝑁 ∈ ℝ)) |
| 114 | 113, 37 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 < (𝑁 − 𝑆) ↔ (𝑗 + 𝑆) < 𝑁)) |
| 115 | 13 | 3ad2ant1 1134 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → 𝑆 ∈
ℕ0) |
| 116 | 115, 14 | sylan2 593 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 + 𝑆) ∈
ℕ0) |
| 117 | 116 | nn0zd 12639 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 + 𝑆) ∈ ℤ) |
| 118 | 83 | 3ad2ant2 1135 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → 𝑁 ∈ ℤ) |
| 119 | 118 | adantl 481 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → 𝑁 ∈ ℤ) |
| 120 | | zltlem1 12670 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝑗 + 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑗 + 𝑆) < 𝑁 ↔ (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 121 | 117, 119,
120 | syl2anc 584 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → ((𝑗 + 𝑆) < 𝑁 ↔ (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 122 | 121 | biimpd 229 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → ((𝑗 + 𝑆) < 𝑁 → (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 123 | 114, 122 | sylbid 240 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑗 ∈ ℕ0
∧ (𝑆 ∈ ℕ
∧ 𝑁 ∈ ℕ
∧ 𝑆 < 𝑁)) → (𝑗 < (𝑁 − 𝑆) → (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 124 | 123 | impancom 451 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑗 ∈ ℕ0
∧ 𝑗 < (𝑁 − 𝑆)) → ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 125 | 124 | 3adant2 1132 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑗 ∈ ℕ0
∧ (𝑁 − 𝑆) ∈ ℕ ∧ 𝑗 < (𝑁 − 𝑆)) → ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 126 | 26, 125 | sylbi 217 |
. . . . . . . . . . . . . . 15
⊢ (𝑗 ∈ (0..^(𝑁 − 𝑆)) → ((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) → (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 127 | 126 | impcom 407 |
. . . . . . . . . . . . . 14
⊢ (((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ≤ (𝑁 − 1)) |
| 128 | 108, 111,
127 | 3jca 1129 |
. . . . . . . . . . . . 13
⊢ (((𝑆 ∈ ℕ ∧ 𝑁 ∈ ℕ ∧ 𝑆 < 𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) ∈ ℕ0 ∧ (𝑁 − 1) ∈
ℕ0 ∧ (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 129 | 11, 128 | sylanb 581 |
. . . . . . . . . . . 12
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) ∈ ℕ0 ∧ (𝑁 − 1) ∈
ℕ0 ∧ (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 130 | | elfz2nn0 13658 |
. . . . . . . . . . . 12
⊢ ((𝑗 + 𝑆) ∈ (0...(𝑁 − 1)) ↔ ((𝑗 + 𝑆) ∈ ℕ0 ∧ (𝑁 − 1) ∈
ℕ0 ∧ (𝑗 + 𝑆) ≤ (𝑁 − 1))) |
| 131 | 129, 130 | sylibr 234 |
. . . . . . . . . . 11
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ∈ (0...(𝑁 − 1))) |
| 132 | | zaddcl 12657 |
. . . . . . . . . . . . 13
⊢ ((𝑗 ∈ ℤ ∧ 𝑆 ∈ ℤ) → (𝑗 + 𝑆) ∈ ℤ) |
| 133 | 3, 6, 132 | syl2anr 597 |
. . . . . . . . . . . 12
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝑗 + 𝑆) ∈ ℤ) |
| 134 | | zmodid2 13939 |
. . . . . . . . . . . 12
⊢ (((𝑗 + 𝑆) ∈ ℤ ∧ 𝑁 ∈ ℕ) → (((𝑗 + 𝑆) mod 𝑁) = (𝑗 + 𝑆) ↔ (𝑗 + 𝑆) ∈ (0...(𝑁 − 1)))) |
| 135 | 133, 25, 134 | syl2anc 584 |
. . . . . . . . . . 11
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (((𝑗 + 𝑆) mod 𝑁) = (𝑗 + 𝑆) ↔ (𝑗 + 𝑆) ∈ (0...(𝑁 − 1)))) |
| 136 | 131, 135 | mpbird 257 |
. . . . . . . . . 10
⊢ ((𝑆 ∈ (1..^𝑁) ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) mod 𝑁) = (𝑗 + 𝑆)) |
| 137 | 2, 136 | sylan 580 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) mod 𝑁) = (𝑗 + 𝑆)) |
| 138 | 107, 137 | eqtrid 2789 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝑗 + 𝑆) mod (♯‘𝐹)) = (𝑗 + 𝑆)) |
| 139 | 138 | fveq2d 6910 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝐹‘((𝑗 + 𝑆) mod (♯‘𝐹))) = (𝐹‘(𝑗 + 𝑆))) |
| 140 | 105, 139 | eqtrd 2777 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → ((𝐹 cyclShift 𝑆)‘𝑗) = (𝐹‘(𝑗 + 𝑆))) |
| 141 | 78, 140 | eqtrid 2789 |
. . . . 5
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝐻‘𝑗) = (𝐹‘(𝑗 + 𝑆))) |
| 142 | 141 | fveq2d 6910 |
. . . 4
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) |
| 143 | | simp1 1137 |
. . . . . 6
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → (𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆))) |
| 144 | | simp2 1138 |
. . . . . 6
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆))) |
| 145 | 143, 144 | eqeq12d 2753 |
. . . . 5
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → ((𝑄‘𝑗) = (𝑄‘(𝑗 + 1)) ↔ (𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)))) |
| 146 | | simp3 1139 |
. . . . . 6
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) |
| 147 | 143 | sneqd 4638 |
. . . . . 6
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → {(𝑄‘𝑗)} = {(𝑃‘(𝑗 + 𝑆))}) |
| 148 | 146, 147 | eqeq12d 2753 |
. . . . 5
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → ((𝐼‘(𝐻‘𝑗)) = {(𝑄‘𝑗)} ↔ (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))})) |
| 149 | 143, 144 | preq12d 4741 |
. . . . . 6
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → {(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} = {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))}) |
| 150 | 149, 146 | sseq12d 4017 |
. . . . 5
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → ({(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} ⊆ (𝐼‘(𝐻‘𝑗)) ↔ {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆))))) |
| 151 | 145, 148,
150 | ifpbi123d 1079 |
. . . 4
⊢ (((𝑄‘𝑗) = (𝑃‘(𝑗 + 𝑆)) ∧ (𝑄‘(𝑗 + 1)) = (𝑃‘((𝑗 + 1) + 𝑆)) ∧ (𝐼‘(𝐻‘𝑗)) = (𝐼‘(𝐹‘(𝑗 + 𝑆)))) → (if-((𝑄‘𝑗) = (𝑄‘(𝑗 + 1)), (𝐼‘(𝐻‘𝑗)) = {(𝑄‘𝑗)}, {(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} ⊆ (𝐼‘(𝐻‘𝑗))) ↔ if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 152 | 73, 76, 142, 151 | syl3anc 1373 |
. . 3
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → (if-((𝑄‘𝑗) = (𝑄‘(𝑗 + 1)), (𝐼‘(𝐻‘𝑗)) = {(𝑄‘𝑗)}, {(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} ⊆ (𝐼‘(𝐻‘𝑗))) ↔ if-((𝑃‘(𝑗 + 𝑆)) = (𝑃‘((𝑗 + 1) + 𝑆)), (𝐼‘(𝐹‘(𝑗 + 𝑆))) = {(𝑃‘(𝑗 + 𝑆))}, {(𝑃‘(𝑗 + 𝑆)), (𝑃‘((𝑗 + 1) + 𝑆))} ⊆ (𝐼‘(𝐹‘(𝑗 + 𝑆)))))) |
| 153 | 69, 152 | mpbird 257 |
. 2
⊢ ((𝜑 ∧ 𝑗 ∈ (0..^(𝑁 − 𝑆))) → if-((𝑄‘𝑗) = (𝑄‘(𝑗 + 1)), (𝐼‘(𝐻‘𝑗)) = {(𝑄‘𝑗)}, {(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} ⊆ (𝐼‘(𝐻‘𝑗)))) |
| 154 | 153 | ralrimiva 3146 |
1
⊢ (𝜑 → ∀𝑗 ∈ (0..^(𝑁 − 𝑆))if-((𝑄‘𝑗) = (𝑄‘(𝑗 + 1)), (𝐼‘(𝐻‘𝑗)) = {(𝑄‘𝑗)}, {(𝑄‘𝑗), (𝑄‘(𝑗 + 1))} ⊆ (𝐼‘(𝐻‘𝑗)))) |