| Step | Hyp | Ref
| Expression |
| 1 | | efgval.w |
. . . . . 6
⊢ 𝑊 = ( I ‘Word (𝐼 ×
2𝑜)) |
| 2 | | efgval.r |
. . . . . 6
⊢ ∼ = (
~FG ‘𝐼) |
| 3 | | efgval2.m |
. . . . . 6
⊢ 𝑀 = (𝑦 ∈ 𝐼, 𝑧 ∈ 2𝑜 ↦
〈𝑦,
(1𝑜 ∖ 𝑧)〉) |
| 4 | | efgval2.t |
. . . . . 6
⊢ 𝑇 = (𝑣 ∈ 𝑊 ↦ (𝑛 ∈ (0...(#‘𝑣)), 𝑤 ∈ (𝐼 × 2𝑜) ↦
(𝑣 splice 〈𝑛, 𝑛, 〈“𝑤(𝑀‘𝑤)”〉〉))) |
| 5 | | efgred.d |
. . . . . 6
⊢ 𝐷 = (𝑊 ∖ ∪
𝑥 ∈ 𝑊 ran (𝑇‘𝑥)) |
| 6 | | efgred.s |
. . . . . 6
⊢ 𝑆 = (𝑚 ∈ {𝑡 ∈ (Word 𝑊 ∖ {∅}) ∣ ((𝑡‘0) ∈ 𝐷 ∧ ∀𝑘 ∈ (1..^(#‘𝑡))(𝑡‘𝑘) ∈ ran (𝑇‘(𝑡‘(𝑘 − 1))))} ↦ (𝑚‘((#‘𝑚) − 1))) |
| 7 | 1, 2, 3, 4, 5, 6 | efgsdm 18143 |
. . . . 5
⊢ (𝐹 ∈ dom 𝑆 ↔ (𝐹 ∈ (Word 𝑊 ∖ {∅}) ∧ (𝐹‘0) ∈ 𝐷 ∧ ∀𝑎 ∈ (1..^(#‘𝐹))(𝐹‘𝑎) ∈ ran (𝑇‘(𝐹‘(𝑎 − 1))))) |
| 8 | 7 | simp1bi 1076 |
. . . 4
⊢ (𝐹 ∈ dom 𝑆 → 𝐹 ∈ (Word 𝑊 ∖ {∅})) |
| 9 | | eldifsn 4317 |
. . . . 5
⊢ (𝐹 ∈ (Word 𝑊 ∖ {∅}) ↔ (𝐹 ∈ Word 𝑊 ∧ 𝐹 ≠ ∅)) |
| 10 | | lennncl 13325 |
. . . . 5
⊢ ((𝐹 ∈ Word 𝑊 ∧ 𝐹 ≠ ∅) → (#‘𝐹) ∈
ℕ) |
| 11 | 9, 10 | sylbi 207 |
. . . 4
⊢ (𝐹 ∈ (Word 𝑊 ∖ {∅}) → (#‘𝐹) ∈
ℕ) |
| 12 | | fzo0end 12560 |
. . . 4
⊢
((#‘𝐹) ∈
ℕ → ((#‘𝐹)
− 1) ∈ (0..^(#‘𝐹))) |
| 13 | 8, 11, 12 | 3syl 18 |
. . 3
⊢ (𝐹 ∈ dom 𝑆 → ((#‘𝐹) − 1) ∈ (0..^(#‘𝐹))) |
| 14 | | nnm1nn0 11334 |
. . . . 5
⊢
((#‘𝐹) ∈
ℕ → ((#‘𝐹)
− 1) ∈ ℕ0) |
| 15 | 8, 11, 14 | 3syl 18 |
. . . 4
⊢ (𝐹 ∈ dom 𝑆 → ((#‘𝐹) − 1) ∈
ℕ0) |
| 16 | | eleq1 2689 |
. . . . . . 7
⊢ (𝑎 = 0 → (𝑎 ∈ (0..^(#‘𝐹)) ↔ 0 ∈ (0..^(#‘𝐹)))) |
| 17 | | fveq2 6191 |
. . . . . . . 8
⊢ (𝑎 = 0 → (𝐹‘𝑎) = (𝐹‘0)) |
| 18 | 17 | breq2d 4665 |
. . . . . . 7
⊢ (𝑎 = 0 → ((𝐹‘0) ∼ (𝐹‘𝑎) ↔ (𝐹‘0) ∼ (𝐹‘0))) |
| 19 | 16, 18 | imbi12d 334 |
. . . . . 6
⊢ (𝑎 = 0 → ((𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎)) ↔ (0 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘0)))) |
| 20 | 19 | imbi2d 330 |
. . . . 5
⊢ (𝑎 = 0 → ((𝐹 ∈ dom 𝑆 → (𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎))) ↔ (𝐹 ∈ dom 𝑆 → (0 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘0))))) |
| 21 | | eleq1 2689 |
. . . . . . 7
⊢ (𝑎 = 𝑖 → (𝑎 ∈ (0..^(#‘𝐹)) ↔ 𝑖 ∈ (0..^(#‘𝐹)))) |
| 22 | | fveq2 6191 |
. . . . . . . 8
⊢ (𝑎 = 𝑖 → (𝐹‘𝑎) = (𝐹‘𝑖)) |
| 23 | 22 | breq2d 4665 |
. . . . . . 7
⊢ (𝑎 = 𝑖 → ((𝐹‘0) ∼ (𝐹‘𝑎) ↔ (𝐹‘0) ∼ (𝐹‘𝑖))) |
| 24 | 21, 23 | imbi12d 334 |
. . . . . 6
⊢ (𝑎 = 𝑖 → ((𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎)) ↔ (𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)))) |
| 25 | 24 | imbi2d 330 |
. . . . 5
⊢ (𝑎 = 𝑖 → ((𝐹 ∈ dom 𝑆 → (𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎))) ↔ (𝐹 ∈ dom 𝑆 → (𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖))))) |
| 26 | | eleq1 2689 |
. . . . . . 7
⊢ (𝑎 = (𝑖 + 1) → (𝑎 ∈ (0..^(#‘𝐹)) ↔ (𝑖 + 1) ∈ (0..^(#‘𝐹)))) |
| 27 | | fveq2 6191 |
. . . . . . . 8
⊢ (𝑎 = (𝑖 + 1) → (𝐹‘𝑎) = (𝐹‘(𝑖 + 1))) |
| 28 | 27 | breq2d 4665 |
. . . . . . 7
⊢ (𝑎 = (𝑖 + 1) → ((𝐹‘0) ∼ (𝐹‘𝑎) ↔ (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))) |
| 29 | 26, 28 | imbi12d 334 |
. . . . . 6
⊢ (𝑎 = (𝑖 + 1) → ((𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎)) ↔ ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1))))) |
| 30 | 29 | imbi2d 330 |
. . . . 5
⊢ (𝑎 = (𝑖 + 1) → ((𝐹 ∈ dom 𝑆 → (𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎))) ↔ (𝐹 ∈ dom 𝑆 → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))))) |
| 31 | | eleq1 2689 |
. . . . . . 7
⊢ (𝑎 = ((#‘𝐹) − 1) → (𝑎 ∈ (0..^(#‘𝐹)) ↔ ((#‘𝐹) − 1) ∈ (0..^(#‘𝐹)))) |
| 32 | | fveq2 6191 |
. . . . . . . 8
⊢ (𝑎 = ((#‘𝐹) − 1) → (𝐹‘𝑎) = (𝐹‘((#‘𝐹) − 1))) |
| 33 | 32 | breq2d 4665 |
. . . . . . 7
⊢ (𝑎 = ((#‘𝐹) − 1) → ((𝐹‘0) ∼ (𝐹‘𝑎) ↔ (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1)))) |
| 34 | 31, 33 | imbi12d 334 |
. . . . . 6
⊢ (𝑎 = ((#‘𝐹) − 1) → ((𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎)) ↔ (((#‘𝐹) − 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1))))) |
| 35 | 34 | imbi2d 330 |
. . . . 5
⊢ (𝑎 = ((#‘𝐹) − 1) → ((𝐹 ∈ dom 𝑆 → (𝑎 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑎))) ↔ (𝐹 ∈ dom 𝑆 → (((#‘𝐹) − 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1)))))) |
| 36 | 1, 2 | efger 18131 |
. . . . . . . 8
⊢ ∼ Er
𝑊 |
| 37 | 36 | a1i 11 |
. . . . . . 7
⊢ ((𝐹 ∈ dom 𝑆 ∧ 0 ∈ (0..^(#‘𝐹))) → ∼ Er 𝑊) |
| 38 | | eldifi 3732 |
. . . . . . . . 9
⊢ (𝐹 ∈ (Word 𝑊 ∖ {∅}) → 𝐹 ∈ Word 𝑊) |
| 39 | | wrdf 13310 |
. . . . . . . . 9
⊢ (𝐹 ∈ Word 𝑊 → 𝐹:(0..^(#‘𝐹))⟶𝑊) |
| 40 | 8, 38, 39 | 3syl 18 |
. . . . . . . 8
⊢ (𝐹 ∈ dom 𝑆 → 𝐹:(0..^(#‘𝐹))⟶𝑊) |
| 41 | 40 | ffvelrnda 6359 |
. . . . . . 7
⊢ ((𝐹 ∈ dom 𝑆 ∧ 0 ∈ (0..^(#‘𝐹))) → (𝐹‘0) ∈ 𝑊) |
| 42 | 37, 41 | erref 7762 |
. . . . . 6
⊢ ((𝐹 ∈ dom 𝑆 ∧ 0 ∈ (0..^(#‘𝐹))) → (𝐹‘0) ∼ (𝐹‘0)) |
| 43 | 42 | ex 450 |
. . . . 5
⊢ (𝐹 ∈ dom 𝑆 → (0 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘0))) |
| 44 | | elnn0uz 11725 |
. . . . . . . . . . . 12
⊢ (𝑖 ∈ ℕ0
↔ 𝑖 ∈
(ℤ≥‘0)) |
| 45 | | peano2fzor 12575 |
. . . . . . . . . . . 12
⊢ ((𝑖 ∈
(ℤ≥‘0) ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → 𝑖 ∈ (0..^(#‘𝐹))) |
| 46 | 44, 45 | sylanb 489 |
. . . . . . . . . . 11
⊢ ((𝑖 ∈ ℕ0
∧ (𝑖 + 1) ∈
(0..^(#‘𝐹))) →
𝑖 ∈
(0..^(#‘𝐹))) |
| 47 | 46 | 3adant1 1079 |
. . . . . . . . . 10
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → 𝑖 ∈ (0..^(#‘𝐹))) |
| 48 | 47 | 3expia 1267 |
. . . . . . . . 9
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → 𝑖 ∈ (0..^(#‘𝐹)))) |
| 49 | 48 | imim1d 82 |
. . . . . . . 8
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0) → ((𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)))) |
| 50 | 40 | 3ad2ant1 1082 |
. . . . . . . . . . . . 13
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → 𝐹:(0..^(#‘𝐹))⟶𝑊) |
| 51 | 50, 47 | ffvelrnd 6360 |
. . . . . . . . . . . 12
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝐹‘𝑖) ∈ 𝑊) |
| 52 | | nn0p1nn 11332 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑖 ∈ ℕ0
→ (𝑖 + 1) ∈
ℕ) |
| 53 | 52 | 3ad2ant2 1083 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝑖 + 1) ∈ ℕ) |
| 54 | | nnuz 11723 |
. . . . . . . . . . . . . . . 16
⊢ ℕ =
(ℤ≥‘1) |
| 55 | 53, 54 | syl6eleq 2711 |
. . . . . . . . . . . . . . 15
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝑖 + 1) ∈
(ℤ≥‘1)) |
| 56 | | elfzolt2b 12481 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝑖 + 1) ∈ ((𝑖 + 1)..^(#‘𝐹))) |
| 57 | 56 | 3ad2ant3 1084 |
. . . . . . . . . . . . . . 15
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝑖 + 1) ∈ ((𝑖 + 1)..^(#‘𝐹))) |
| 58 | | elfzo3 12486 |
. . . . . . . . . . . . . . 15
⊢ ((𝑖 + 1) ∈ (1..^(#‘𝐹)) ↔ ((𝑖 + 1) ∈ (ℤ≥‘1)
∧ (𝑖 + 1) ∈
((𝑖 + 1)..^(#‘𝐹)))) |
| 59 | 55, 57, 58 | sylanbrc 698 |
. . . . . . . . . . . . . 14
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝑖 + 1) ∈ (1..^(#‘𝐹))) |
| 60 | 7 | simp3bi 1078 |
. . . . . . . . . . . . . . 15
⊢ (𝐹 ∈ dom 𝑆 → ∀𝑎 ∈ (1..^(#‘𝐹))(𝐹‘𝑎) ∈ ran (𝑇‘(𝐹‘(𝑎 − 1)))) |
| 61 | 60 | 3ad2ant1 1082 |
. . . . . . . . . . . . . 14
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → ∀𝑎 ∈ (1..^(#‘𝐹))(𝐹‘𝑎) ∈ ran (𝑇‘(𝐹‘(𝑎 − 1)))) |
| 62 | | oveq1 6657 |
. . . . . . . . . . . . . . . . . . 19
⊢ (𝑎 = (𝑖 + 1) → (𝑎 − 1) = ((𝑖 + 1) − 1)) |
| 63 | 62 | fveq2d 6195 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑎 = (𝑖 + 1) → (𝐹‘(𝑎 − 1)) = (𝐹‘((𝑖 + 1) − 1))) |
| 64 | 63 | fveq2d 6195 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑎 = (𝑖 + 1) → (𝑇‘(𝐹‘(𝑎 − 1))) = (𝑇‘(𝐹‘((𝑖 + 1) − 1)))) |
| 65 | 64 | rneqd 5353 |
. . . . . . . . . . . . . . . 16
⊢ (𝑎 = (𝑖 + 1) → ran (𝑇‘(𝐹‘(𝑎 − 1))) = ran (𝑇‘(𝐹‘((𝑖 + 1) − 1)))) |
| 66 | 27, 65 | eleq12d 2695 |
. . . . . . . . . . . . . . 15
⊢ (𝑎 = (𝑖 + 1) → ((𝐹‘𝑎) ∈ ran (𝑇‘(𝐹‘(𝑎 − 1))) ↔ (𝐹‘(𝑖 + 1)) ∈ ran (𝑇‘(𝐹‘((𝑖 + 1) − 1))))) |
| 67 | 66 | rspcv 3305 |
. . . . . . . . . . . . . 14
⊢ ((𝑖 + 1) ∈ (1..^(#‘𝐹)) → (∀𝑎 ∈ (1..^(#‘𝐹))(𝐹‘𝑎) ∈ ran (𝑇‘(𝐹‘(𝑎 − 1))) → (𝐹‘(𝑖 + 1)) ∈ ran (𝑇‘(𝐹‘((𝑖 + 1) − 1))))) |
| 68 | 59, 61, 67 | sylc 65 |
. . . . . . . . . . . . 13
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝐹‘(𝑖 + 1)) ∈ ran (𝑇‘(𝐹‘((𝑖 + 1) − 1)))) |
| 69 | | nn0cn 11302 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑖 ∈ ℕ0
→ 𝑖 ∈
ℂ) |
| 70 | 69 | 3ad2ant2 1083 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → 𝑖 ∈ ℂ) |
| 71 | | ax-1cn 9994 |
. . . . . . . . . . . . . . . . 17
⊢ 1 ∈
ℂ |
| 72 | | pncan 10287 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑖 ∈ ℂ ∧ 1 ∈
ℂ) → ((𝑖 + 1)
− 1) = 𝑖) |
| 73 | 70, 71, 72 | sylancl 694 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → ((𝑖 + 1) − 1) = 𝑖) |
| 74 | 73 | fveq2d 6195 |
. . . . . . . . . . . . . . 15
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝐹‘((𝑖 + 1) − 1)) = (𝐹‘𝑖)) |
| 75 | 74 | fveq2d 6195 |
. . . . . . . . . . . . . 14
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝑇‘(𝐹‘((𝑖 + 1) − 1))) = (𝑇‘(𝐹‘𝑖))) |
| 76 | 75 | rneqd 5353 |
. . . . . . . . . . . . 13
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → ran (𝑇‘(𝐹‘((𝑖 + 1) − 1))) = ran (𝑇‘(𝐹‘𝑖))) |
| 77 | 68, 76 | eleqtrd 2703 |
. . . . . . . . . . . 12
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝐹‘(𝑖 + 1)) ∈ ran (𝑇‘(𝐹‘𝑖))) |
| 78 | 1, 2, 3, 4 | efgi2 18138 |
. . . . . . . . . . . 12
⊢ (((𝐹‘𝑖) ∈ 𝑊 ∧ (𝐹‘(𝑖 + 1)) ∈ ran (𝑇‘(𝐹‘𝑖))) → (𝐹‘𝑖) ∼ (𝐹‘(𝑖 + 1))) |
| 79 | 51, 77, 78 | syl2anc 693 |
. . . . . . . . . . 11
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (𝐹‘𝑖) ∼ (𝐹‘(𝑖 + 1))) |
| 80 | 36 | a1i 11 |
. . . . . . . . . . . 12
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → ∼ Er 𝑊) |
| 81 | 80 | ertr 7757 |
. . . . . . . . . . 11
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → (((𝐹‘0) ∼ (𝐹‘𝑖) ∧ (𝐹‘𝑖) ∼ (𝐹‘(𝑖 + 1))) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))) |
| 82 | 79, 81 | mpan2d 710 |
. . . . . . . . . 10
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0 ∧ (𝑖 + 1) ∈ (0..^(#‘𝐹))) → ((𝐹‘0) ∼ (𝐹‘𝑖) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))) |
| 83 | 82 | 3expia 1267 |
. . . . . . . . 9
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → ((𝐹‘0) ∼ (𝐹‘𝑖) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1))))) |
| 84 | 83 | a2d 29 |
. . . . . . . 8
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0) → (((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1))))) |
| 85 | 49, 84 | syld 47 |
. . . . . . 7
⊢ ((𝐹 ∈ dom 𝑆 ∧ 𝑖 ∈ ℕ0) → ((𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1))))) |
| 86 | 85 | expcom 451 |
. . . . . 6
⊢ (𝑖 ∈ ℕ0
→ (𝐹 ∈ dom 𝑆 → ((𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖)) → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))))) |
| 87 | 86 | a2d 29 |
. . . . 5
⊢ (𝑖 ∈ ℕ0
→ ((𝐹 ∈ dom 𝑆 → (𝑖 ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘𝑖))) → (𝐹 ∈ dom 𝑆 → ((𝑖 + 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘(𝑖 + 1)))))) |
| 88 | 20, 25, 30, 35, 43, 87 | nn0ind 11472 |
. . . 4
⊢
(((#‘𝐹)
− 1) ∈ ℕ0 → (𝐹 ∈ dom 𝑆 → (((#‘𝐹) − 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1))))) |
| 89 | 15, 88 | mpcom 38 |
. . 3
⊢ (𝐹 ∈ dom 𝑆 → (((#‘𝐹) − 1) ∈ (0..^(#‘𝐹)) → (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1)))) |
| 90 | 13, 89 | mpd 15 |
. 2
⊢ (𝐹 ∈ dom 𝑆 → (𝐹‘0) ∼ (𝐹‘((#‘𝐹) − 1))) |
| 91 | 1, 2, 3, 4, 5, 6 | efgsval 18144 |
. 2
⊢ (𝐹 ∈ dom 𝑆 → (𝑆‘𝐹) = (𝐹‘((#‘𝐹) − 1))) |
| 92 | 90, 91 | breqtrrd 4681 |
1
⊢ (𝐹 ∈ dom 𝑆 → (𝐹‘0) ∼ (𝑆‘𝐹)) |