signstfveq0 - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > signstfveq0		Structured version Visualization version GIF version

Theorem signstfveq0 34868

Description: In case the last letter is zero, the zero skipping sign is the same as the previous letter. (Contributed by Thierry Arnoux, 11-Oct-2018.) (Proof shortened by AV, 4-Nov-2022.)

**Hypotheses**
Ref	Expression
signsv.p	⊢ ⨣ = (𝑎 ∈ {-1, 0, 1}, 𝑏 ∈ {-1, 0, 1} ↦ if(𝑏 = 0, 𝑎, 𝑏))
signsv.w	⊢ 𝑊 = {⟨(Base‘ndx), {-1, 0, 1}⟩, ⟨(+_g‘ndx), ⨣ ⟩}
signsv.t	⊢ 𝑇 = (𝑓 ∈ Word ℝ ↦ (𝑛 ∈ (0..^(♯‘𝑓)) ↦ (𝑊 Σ_g (𝑖 ∈ (0...𝑛) ↦ (sgn‘(𝑓‘𝑖))))))
signsv.v	⊢ 𝑉 = (𝑓 ∈ Word ℝ ↦ Σ𝑗 ∈ (1..^(♯‘𝑓))if(((𝑇‘𝑓)‘𝑗) ≠ ((𝑇‘𝑓)‘(𝑗 − 1)), 1, 0))
signstfveq0.1	⊢ 𝑁 = (♯‘𝐹)

**Assertion**
Ref	Expression
signstfveq0	⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘𝐹)‘(𝑁 − 1)) = ((𝑇‘𝐹)‘(𝑁 − 2)))

Distinct variable groups: 𝑎,𝑏, ⨣ 𝑓,𝑖,𝑛,𝐹 𝑓,𝑊,𝑖,𝑛 𝐹,𝑎,𝑏,𝑓,𝑖,𝑛 𝑁,𝑎 𝑓,𝑏,𝑖,𝑛,𝑁 𝑇,𝑎,𝑏 Allowed substitution hints: ⨣ (𝑓,𝑖,𝑗,𝑛) 𝑇(𝑓,𝑖,𝑗,𝑛) 𝐹(𝑗) 𝑁(𝑗) 𝑉(𝑓,𝑖,𝑗,𝑛,𝑎,𝑏) 𝑊(𝑗,𝑎,𝑏)

**Proof of Theorem signstfveq0**
Step	Hyp	Ref	Expression
1		simpll 776	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝐹 ∈ (Word ℝ ∖ {∅}))
2	1	eldifad 3916	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝐹 ∈ Word ℝ)
3		pfxcl 14691	. . . . 5 ⊢ (𝐹 ∈ Word ℝ → (𝐹 prefix (𝑁 − 1)) ∈ Word ℝ)
4	2, 3	syl 17	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹 prefix (𝑁 − 1)) ∈ Word ℝ)
5		1nn0 12497	. . . . . . . . . . 11 ⊢ 1 ∈ ℕ₀
6	5	a1i 11	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ∈ ℕ₀)
7	6	nn0red 12543	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ∈ ℝ)
8		2re 12292	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
9	8	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 2 ∈ ℝ)
10		signstfveq0.1	. . . . . . . . . . . . 13 ⊢ 𝑁 = (♯‘𝐹)
11		lencl 14546	. . . . . . . . . . . . . 14 ⊢ (𝐹 ∈ Word ℝ → (♯‘𝐹) ∈ ℕ₀)
12	2, 11	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (♯‘𝐹) ∈ ℕ₀)
13	10, 12	eqeltrid 2866	. . . . . . . . . . . 12 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝑁 ∈ ℕ₀)
14	13	nn0red 12543	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝑁 ∈ ℝ)
15		1le2 12429	. . . . . . . . . . . 12 ⊢ 1 ≤ 2
16	15	a1i 11	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ≤ 2)
17		signsv.p	. . . . . . . . . . . . . 14 ⊢ ⨣ = (𝑎 ∈ {-1, 0, 1}, 𝑏 ∈ {-1, 0, 1} ↦ if(𝑏 = 0, 𝑎, 𝑏))
18		signsv.w	. . . . . . . . . . . . . 14 ⊢ 𝑊 = {⟨(Base‘ndx), {-1, 0, 1}⟩, ⟨(+_g‘ndx), ⨣ ⟩}
19		signsv.t	. . . . . . . . . . . . . 14 ⊢ 𝑇 = (𝑓 ∈ Word ℝ ↦ (𝑛 ∈ (0..^(♯‘𝑓)) ↦ (𝑊 Σ_g (𝑖 ∈ (0...𝑛) ↦ (sgn‘(𝑓‘𝑖))))))
20		signsv.v	. . . . . . . . . . . . . 14 ⊢ 𝑉 = (𝑓 ∈ Word ℝ ↦ Σ𝑗 ∈ (1..^(♯‘𝑓))if(((𝑇‘𝑓)‘𝑗) ≠ ((𝑇‘𝑓)‘(𝑗 − 1)), 1, 0))
21	17, 18, 19, 20, 10	signstfveq0a 34867	. . . . . . . . . . . . 13 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝑁 ∈ (ℤ_≥‘2))
22		eluz2 12845	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘2) ↔ (2 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 2 ≤ 𝑁))
23	21, 22	sylib 220	. . . . . . . . . . . 12 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (2 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 2 ≤ 𝑁))
24	23	simp3d 1157	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 2 ≤ 𝑁)
25	7, 9, 14, 16, 24	letrd 11340	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ≤ 𝑁)
26		fznn0 13624	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ₀ → (1 ∈ (0...𝑁) ↔ (1 ∈ ℕ₀ ∧ 1 ≤ 𝑁)))
27	13, 26	syl 17	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (1 ∈ (0...𝑁) ↔ (1 ∈ ℕ₀ ∧ 1 ≤ 𝑁)))
28	6, 25, 27	mpbir2and 723	. . . . . . . . 9 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ∈ (0...𝑁))
29		fznn0sub2 13640	. . . . . . . . 9 ⊢ (1 ∈ (0...𝑁) → (𝑁 − 1) ∈ (0...𝑁))
30	28, 29	syl 17	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 1) ∈ (0...𝑁))
31	10	oveq2i 7407	. . . . . . . 8 ⊢ (0...𝑁) = (0...(♯‘𝐹))
32	30, 31	eleqtrdi 2872	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 1) ∈ (0...(♯‘𝐹)))
33		pfxlen 14697	. . . . . . 7 ⊢ ((𝐹 ∈ Word ℝ ∧ (𝑁 − 1) ∈ (0...(♯‘𝐹))) → (♯‘(𝐹 prefix (𝑁 − 1))) = (𝑁 − 1))
34	2, 32, 33	syl2anc 593	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (♯‘(𝐹 prefix (𝑁 − 1))) = (𝑁 − 1))
35		uz2m1nn 12924	. . . . . . 7 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 1) ∈ ℕ)
36	21, 35	syl 17	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 1) ∈ ℕ)
37	34, 36	eqeltrd 2862	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (♯‘(𝐹 prefix (𝑁 − 1))) ∈ ℕ)
38		nnne0 12247	. . . . . 6 ⊢ ((♯‘(𝐹 prefix (𝑁 − 1))) ∈ ℕ → (♯‘(𝐹 prefix (𝑁 − 1))) ≠ 0)
39		fveq2 6867	. . . . . . . 8 ⊢ ((𝐹 prefix (𝑁 − 1)) = ∅ → (♯‘(𝐹 prefix (𝑁 − 1))) = (♯‘∅))
40		hash0 14380	. . . . . . . 8 ⊢ (♯‘∅) = 0
41	39, 40	eqtrdi 2813	. . . . . . 7 ⊢ ((𝐹 prefix (𝑁 − 1)) = ∅ → (♯‘(𝐹 prefix (𝑁 − 1))) = 0)
42	41	necon3i 2989	. . . . . 6 ⊢ ((♯‘(𝐹 prefix (𝑁 − 1))) ≠ 0 → (𝐹 prefix (𝑁 − 1)) ≠ ∅)
43	38, 42	syl 17	. . . . 5 ⊢ ((♯‘(𝐹 prefix (𝑁 − 1))) ∈ ℕ → (𝐹 prefix (𝑁 − 1)) ≠ ∅)
44	37, 43	syl 17	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹 prefix (𝑁 − 1)) ≠ ∅)
45		eldifsn 4746	. . . 4 ⊢ ((𝐹 prefix (𝑁 − 1)) ∈ (Word ℝ ∖ {∅}) ↔ ((𝐹 prefix (𝑁 − 1)) ∈ Word ℝ ∧ (𝐹 prefix (𝑁 − 1)) ≠ ∅))
46	4, 44, 45	sylanbrc 592	. . 3 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹 prefix (𝑁 − 1)) ∈ (Word ℝ ∖ {∅}))
47		simpr 488	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹‘(𝑁 − 1)) = 0)
48		0re 11183	. . . 4 ⊢ 0 ∈ ℝ
49	47, 48	eqeltrdi 2870	. . 3 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹‘(𝑁 − 1)) ∈ ℝ)
50	17, 18, 19, 20	signstfvn 34860	. . 3 ⊢ (((𝐹 prefix (𝑁 − 1)) ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘(𝑁 − 1)) ∈ ℝ) → ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(♯‘(𝐹 prefix (𝑁 − 1)))) = (((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) ⨣ (sgn‘(𝐹‘(𝑁 − 1)))))
51	46, 49, 50	syl2anc 593	. 2 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(♯‘(𝐹 prefix (𝑁 − 1)))) = (((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) ⨣ (sgn‘(𝐹‘(𝑁 − 1)))))
52	10	oveq1i 7406	. . . . . . . 8 ⊢ (𝑁 − 1) = ((♯‘𝐹) − 1)
53	52	oveq2i 7407	. . . . . . 7 ⊢ (𝐹 prefix (𝑁 − 1)) = (𝐹 prefix ((♯‘𝐹) − 1))
54	53	a1i 11	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹 prefix (𝑁 − 1)) = (𝐹 prefix ((♯‘𝐹) − 1)))
55		lsw 14577	. . . . . . . . . 10 ⊢ (𝐹 ∈ (Word ℝ ∖ {∅}) → (lastS‘𝐹) = (𝐹‘((♯‘𝐹) − 1)))
56	55	ad2antrr 736	. . . . . . . . 9 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (lastS‘𝐹) = (𝐹‘((♯‘𝐹) − 1)))
57	10	eqcomi 2771	. . . . . . . . . . 11 ⊢ (♯‘𝐹) = 𝑁
58	57	oveq1i 7406	. . . . . . . . . 10 ⊢ ((♯‘𝐹) − 1) = (𝑁 − 1)
59	58	fveq2i 6870	. . . . . . . . 9 ⊢ (𝐹‘((♯‘𝐹) − 1)) = (𝐹‘(𝑁 − 1))
60	56, 59	eqtrdi 2813	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (lastS‘𝐹) = (𝐹‘(𝑁 − 1)))
61	60	s1eqd 14615	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ⟨“(lastS‘𝐹)”⟩ = ⟨“(𝐹‘(𝑁 − 1))”⟩)
62	61	eqcomd 2768	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ⟨“(𝐹‘(𝑁 − 1))”⟩ = ⟨“(lastS‘𝐹)”⟩)
63	54, 62	oveq12d 7414	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩) = ((𝐹 prefix ((♯‘𝐹) − 1)) ++ ⟨“(lastS‘𝐹)”⟩))
64		eldifsn 4746	. . . . . . 7 ⊢ (𝐹 ∈ (Word ℝ ∖ {∅}) ↔ (𝐹 ∈ Word ℝ ∧ 𝐹 ≠ ∅))
65	1, 64	sylib 220	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝐹 ∈ Word ℝ ∧ 𝐹 ≠ ∅))
66		pfxlswccat 14726	. . . . . 6 ⊢ ((𝐹 ∈ Word ℝ ∧ 𝐹 ≠ ∅) → ((𝐹 prefix ((♯‘𝐹) − 1)) ++ ⟨“(lastS‘𝐹)”⟩) = 𝐹)
67	65, 66	syl 17	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝐹 prefix ((♯‘𝐹) − 1)) ++ ⟨“(lastS‘𝐹)”⟩) = 𝐹)
68	63, 67	eqtrd 2797	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩) = 𝐹)
69	68	fveq2d 6871	. . 3 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩)) = (𝑇‘𝐹))
70	69, 34	fveq12d 6874	. 2 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(♯‘(𝐹 prefix (𝑁 − 1)))) = ((𝑇‘𝐹)‘(𝑁 − 1)))
71	13	nn0cnd 12544	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝑁 ∈ ℂ)
72		1cnd 11175	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 1 ∈ ℂ)
73	71, 72, 72	subsub4d 11573	. . . . . . . . 9 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑁 − 1) − 1) = (𝑁 − (1 + 1)))
74		1p1e2 12341	. . . . . . . . . 10 ⊢ (1 + 1) = 2
75	74	oveq2i 7407	. . . . . . . . 9 ⊢ (𝑁 − (1 + 1)) = (𝑁 − 2)
76	73, 75	eqtrdi 2813	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑁 − 1) − 1) = (𝑁 − 2))
77		fzo0end 13764	. . . . . . . . 9 ⊢ ((𝑁 − 1) ∈ ℕ → ((𝑁 − 1) − 1) ∈ (0..^(𝑁 − 1)))
78	36, 77	syl 17	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑁 − 1) − 1) ∈ (0..^(𝑁 − 1)))
79	76, 78	eqeltrrd 2863	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) ∈ (0..^(𝑁 − 1)))
80	34	oveq2d 7412	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (0..^(♯‘(𝐹 prefix (𝑁 − 1)))) = (0..^(𝑁 − 1)))
81	79, 80	eleqtrrd 2865	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) ∈ (0..^(♯‘(𝐹 prefix (𝑁 − 1)))))
82	17, 18, 19, 20	signstfvp 34862	. . . . . 6 ⊢ (((𝐹 prefix (𝑁 − 1)) ∈ Word ℝ ∧ (𝐹‘(𝑁 − 1)) ∈ ℝ ∧ (𝑁 − 2) ∈ (0..^(♯‘(𝐹 prefix (𝑁 − 1))))) → ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(𝑁 − 2)) = ((𝑇‘(𝐹 prefix (𝑁 − 1)))‘(𝑁 − 2)))
83	4, 49, 81, 82	syl3anc 1390	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(𝑁 − 2)) = ((𝑇‘(𝐹 prefix (𝑁 − 1)))‘(𝑁 − 2)))
84	68	eqcomd 2768	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝐹 = ((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))
85	84	fveq2d 6871	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑇‘𝐹) = (𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩)))
86	85	fveq1d 6869	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘𝐹)‘(𝑁 − 2)) = ((𝑇‘((𝐹 prefix (𝑁 − 1)) ++ ⟨“(𝐹‘(𝑁 − 1))”⟩))‘(𝑁 − 2)))
87	34	oveq1d 7411	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((♯‘(𝐹 prefix (𝑁 − 1))) − 1) = ((𝑁 − 1) − 1))
88	87, 73	eqtrd 2797	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((♯‘(𝐹 prefix (𝑁 − 1))) − 1) = (𝑁 − (1 + 1)))
89	88, 75	eqtrdi 2813	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((♯‘(𝐹 prefix (𝑁 − 1))) − 1) = (𝑁 − 2))
90	89	fveq2d 6871	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) = ((𝑇‘(𝐹 prefix (𝑁 − 1)))‘(𝑁 − 2)))
91	83, 86, 90	3eqtr4rd 2808	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) = ((𝑇‘𝐹)‘(𝑁 − 2)))
92		fveq2 6867	. . . . . 6 ⊢ ((𝐹‘(𝑁 − 1)) = 0 → (sgn‘(𝐹‘(𝑁 − 1))) = (sgn‘0))
93		sgn0 15102	. . . . . 6 ⊢ (sgn‘0) = 0
94	92, 93	eqtrdi 2813	. . . . 5 ⊢ ((𝐹‘(𝑁 − 1)) = 0 → (sgn‘(𝐹‘(𝑁 − 1))) = 0)
95	94	adantl 485	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (sgn‘(𝐹‘(𝑁 − 1))) = 0)
96	91, 95	oveq12d 7414	. . 3 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) ⨣ (sgn‘(𝐹‘(𝑁 − 1)))) = (((𝑇‘𝐹)‘(𝑁 − 2)) ⨣ 0))
97		uznn0sub 12874	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → (𝑁 − 2) ∈ ℕ₀)
98	21, 97	syl 17	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) ∈ ℕ₀)
99		eluz2nn 12889	. . . . . . . 8 ⊢ (𝑁 ∈ (ℤ_≥‘2) → 𝑁 ∈ ℕ)
100	21, 99	syl 17	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 𝑁 ∈ ℕ)
101		2rp 12998	. . . . . . . . 9 ⊢ 2 ∈ ℝ⁺
102	101	a1i 11	. . . . . . . 8 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → 2 ∈ ℝ⁺)
103	14, 102	ltsubrpd 13069	. . . . . . 7 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) < 𝑁)
104		elfzo0 13706	. . . . . . 7 ⊢ ((𝑁 − 2) ∈ (0..^𝑁) ↔ ((𝑁 − 2) ∈ ℕ₀ ∧ 𝑁 ∈ ℕ ∧ (𝑁 − 2) < 𝑁))
105	98, 100, 103, 104	syl3anbrc 1357	. . . . . 6 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) ∈ (0..^𝑁))
106	10	oveq2i 7407	. . . . . 6 ⊢ (0..^𝑁) = (0..^(♯‘𝐹))
107	105, 106	eleqtrdi 2872	. . . . 5 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (𝑁 − 2) ∈ (0..^(♯‘𝐹)))
108	17, 18, 19, 20	signstcl 34856	. . . . 5 ⊢ ((𝐹 ∈ Word ℝ ∧ (𝑁 − 2) ∈ (0..^(♯‘𝐹))) → ((𝑇‘𝐹)‘(𝑁 − 2)) ∈ {-1, 0, 1})
109	2, 107, 108	syl2anc 593	. . . 4 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘𝐹)‘(𝑁 − 2)) ∈ {-1, 0, 1})
110	17, 18	signswrid 34849	. . . 4 ⊢ (((𝑇‘𝐹)‘(𝑁 − 2)) ∈ {-1, 0, 1} → (((𝑇‘𝐹)‘(𝑁 − 2)) ⨣ 0) = ((𝑇‘𝐹)‘(𝑁 − 2)))
111	109, 110	syl 17	. . 3 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (((𝑇‘𝐹)‘(𝑁 − 2)) ⨣ 0) = ((𝑇‘𝐹)‘(𝑁 − 2)))
112	96, 111	eqtrd 2797	. 2 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → (((𝑇‘(𝐹 prefix (𝑁 − 1)))‘((♯‘(𝐹 prefix (𝑁 − 1))) − 1)) ⨣ (sgn‘(𝐹‘(𝑁 − 1)))) = ((𝑇‘𝐹)‘(𝑁 − 2)))
113	51, 70, 112	3eqtr3d 2805	1 ⊢ (((𝐹 ∈ (Word ℝ ∖ {∅}) ∧ (𝐹‘0) ≠ 0) ∧ (𝐹‘(𝑁 − 1)) = 0) → ((𝑇‘𝐹)‘(𝑁 − 1)) = ((𝑇‘𝐹)‘(𝑁 − 2)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 399 ∧ w3a 1098 = wceq 1560 ∈ wcel 2142 ≠ wne 2957 ∖ cdif 3901 ∅c0 4285 ifcif 4480 {csn 4582 {cpr 4584 {ctp 4586 ⟨cop 4588 class class class wbr 5100 ↦ cmpt 5181 ‘cfv 6521 (class class class)co 7396 ∈ cmpo 7398 ℝcr 11072 0cc0 11073 1c1 11074 + caddc 11076 < clt 11216 ≤ cle 11217 − cmin 11414 -cneg 11415 ℕcn 12210 2c2 12272 ℕ₀cn0 12481 ℤcz 12568 ℤ_≥cuz 12839 ℝ⁺crp 12993 ...cfz 13512 ..^cfzo 13659 ♯chash 14343 Word cword 14526 lastSclsw 14575 ++ cconcat 14583 ⟨“cs1 14609 prefix cpfx 14684 sgncsgn 15099 Σcsu 15713 ndxcnx 17229 Basecbs 17245 +_gcplusg 17286 Σ_g cgsu 17469

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1815 ax-4 1829 ax-5 1930 ax-6 1987 ax-7 2028 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-rep 5227 ax-sep 5246 ax-nul 5256 ax-pow 5322 ax-pr 5390 ax-un 7718 ax-cnex 11129 ax-resscn 11130 ax-1cn 11131 ax-icn 11132 ax-addcl 11133 ax-addrcl 11134 ax-mulcl 11135 ax-mulrcl 11136 ax-mulcom 11137 ax-addass 11138 ax-mulass 11139 ax-distr 11140 ax-i2m1 11141 ax-1ne0 11142 ax-1rid 11143 ax-rnegex 11144 ax-rrecex 11145 ax-cnre 11146 ax-pre-lttri 11147 ax-pre-lttrn 11148 ax-pre-ltadd 11149 ax-pre-mulgt0 11150

This theorem depends on definitions: df-bi 209 df-an 400 df-or 859 df-3or 1099 df-3an 1100 df-tru 1563 df-fal 1573 df-ex 1800 df-nf 1804 df-sb 2091 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3456 df-sbc 3745 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-pss 3924 df-nul 4286 df-if 4481 df-pw 4557 df-sn 4583 df-pr 4585 df-tp 4587 df-op 4589 df-uni 4866 df-int 4906 df-iun 4951 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5542 df-eprel 5547 df-po 5555 df-so 5556 df-fr 5600 df-we 5602 df-xp 5653 df-rel 5654 df-cnv 5655 df-co 5656 df-dm 5657 df-rn 5658 df-res 5659 df-ima 5660 df-pred 6288 df-ord 6349 df-on 6350 df-lim 6351 df-suc 6352 df-iota 6477 df-fun 6523 df-fn 6524 df-f 6525 df-f1 6526 df-fo 6527 df-f1o 6528 df-fv 6529 df-riota 7353 df-ov 7399 df-oprab 7400 df-mpo 7401 df-om 7847 df-1st 7970 df-2nd 7971 df-frecs 8262 df-wrecs 8293 df-recs 8342 df-rdg 8381 df-1o 8437 df-er 8678 df-en 8928 df-dom 8929 df-sdom 8930 df-fin 8931 df-card 9897 df-pnf 11218 df-mnf 11219 df-xr 11220 df-ltxr 11221 df-le 11222 df-sub 11416 df-neg 11417 df-nn 12211 df-2 12280 df-n0 12482 df-xnn0 12555 df-z 12569 df-uz 12840 df-rp 12994 df-fz 13513 df-fzo 13660 df-seq 14015 df-hash 14344 df-word 14527 df-lsw 14576 df-concat 14584 df-s1 14610 df-substr 14655 df-pfx 14685 df-sgn 15100 df-struct 17183 df-slot 17218 df-ndx 17230 df-base 17246 df-plusg 17299 df-0g 17470 df-gsum 17471 df-mgm 18674 df-sgrp 18753 df-mnd 18769

This theorem is referenced by: (None)

W3C validator