Theorem sseqp1 34652

Description: Value of the strong sequence builder function at a successor. (Contributed by Thierry Arnoux, 24-Apr-2019.)

Hypotheses

Ref	Expression
sseqval.1	⊢ (𝜑 → 𝑆 ∈ V)
sseqval.2	⊢ (𝜑 → 𝑀 ∈ Word 𝑆)
sseqval.3	⊢ 𝑊 = (Word 𝑆 ∩ (◡♯ “ (ℤ≥‘(♯‘𝑀))))
sseqval.4	⊢ (𝜑 → 𝐹:𝑊⟶𝑆)
sseqfv2.4	⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘(♯‘𝑀)))

Assertion

Ref	Expression
sseqp1	⊢ (𝜑 → ((𝑀seqstr𝐹)‘𝑁) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))))

Proof of Theorem sseqp1

Dummy variables 𝑥 𝑦 𝑎 𝑏 𝑖 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sseqval.1	. . 3 ⊢ (𝜑 → 𝑆 ∈ V)
2		sseqval.2	. . 3 ⊢ (𝜑 → 𝑀 ∈ Word 𝑆)
3		sseqval.3	. . 3 ⊢ 𝑊 = (Word 𝑆 ∩ (◡♯ “ (ℤ≥‘(♯‘𝑀))))
4		sseqval.4	. . 3 ⊢ (𝜑 → 𝐹:𝑊⟶𝑆)
5		sseqfv2.4	. . 3 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘(♯‘𝑀)))
6	1, 2, 3, 4, 5	sseqfv2 34651	. 2 ⊢ (𝜑 → ((𝑀seqstr𝐹)‘𝑁) = (lastS‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁)))
7		fveq2 6861	. . . . . . 7 ⊢ (𝑖 = (♯‘𝑀) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)))
8		oveq2 7398	. . . . . . . . 9 ⊢ (𝑖 = (♯‘𝑀) → (0..^𝑖) = (0..^(♯‘𝑀)))
9	8	reseq2d 5961	. . . . . . . 8 ⊢ (𝑖 = (♯‘𝑀) → ((𝑀seqstr𝐹) ↾ (0..^𝑖)) = ((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))
10	9	fveq2d 6865	. . . . . . . . 9 ⊢ (𝑖 = (♯‘𝑀) → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖))) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀)))))
11	10	s1eqd 14608	. . . . . . . 8 ⊢ (𝑖 = (♯‘𝑀) → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩ = ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩)
12	9, 11	oveq12d 7408	. . . . . . 7 ⊢ (𝑖 = (♯‘𝑀) → (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩))
13	7, 12	eqeq12d 2777	. . . . . 6 ⊢ (𝑖 = (♯‘𝑀) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) ↔ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩)))
14	13	imbi2d 342	. . . . 5 ⊢ (𝑖 = (♯‘𝑀) → ((𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩)) ↔ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩))))
15		fveq2 6861	. . . . . . 7 ⊢ (𝑖 = 𝑛 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))
16		oveq2 7398	. . . . . . . . 9 ⊢ (𝑖 = 𝑛 → (0..^𝑖) = (0..^𝑛))
17	16	reseq2d 5961	. . . . . . . 8 ⊢ (𝑖 = 𝑛 → ((𝑀seqstr𝐹) ↾ (0..^𝑖)) = ((𝑀seqstr𝐹) ↾ (0..^𝑛)))
18	17	fveq2d 6865	. . . . . . . . 9 ⊢ (𝑖 = 𝑛 → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖))) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))))
19	18	s1eqd 14608	. . . . . . . 8 ⊢ (𝑖 = 𝑛 → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩ = ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)
20	17, 19	oveq12d 7408	. . . . . . 7 ⊢ (𝑖 = 𝑛 → (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩))
21	15, 20	eqeq12d 2777	. . . . . 6 ⊢ (𝑖 = 𝑛 → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) ↔ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)))
22	21	imbi2d 342	. . . . 5 ⊢ (𝑖 = 𝑛 → ((𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩)) ↔ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩))))
23		fveq2 6861	. . . . . . 7 ⊢ (𝑖 = (𝑛 + 1) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)))
24		oveq2 7398	. . . . . . . . 9 ⊢ (𝑖 = (𝑛 + 1) → (0..^𝑖) = (0..^(𝑛 + 1)))
25	24	reseq2d 5961	. . . . . . . 8 ⊢ (𝑖 = (𝑛 + 1) → ((𝑀seqstr𝐹) ↾ (0..^𝑖)) = ((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))
26	25	fveq2d 6865	. . . . . . . . 9 ⊢ (𝑖 = (𝑛 + 1) → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖))) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1)))))
27	26	s1eqd 14608	. . . . . . . 8 ⊢ (𝑖 = (𝑛 + 1) → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩ = ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩)
28	25, 27	oveq12d 7408	. . . . . . 7 ⊢ (𝑖 = (𝑛 + 1) → (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))
29	23, 28	eqeq12d 2777	. . . . . 6 ⊢ (𝑖 = (𝑛 + 1) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) ↔ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩)))
30	29	imbi2d 342	. . . . 5 ⊢ (𝑖 = (𝑛 + 1) → ((𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩)) ↔ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))))
31		fveq2 6861	. . . . . . 7 ⊢ (𝑖 = 𝑁 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁))
32		oveq2 7398	. . . . . . . . 9 ⊢ (𝑖 = 𝑁 → (0..^𝑖) = (0..^𝑁))
33	32	reseq2d 5961	. . . . . . . 8 ⊢ (𝑖 = 𝑁 → ((𝑀seqstr𝐹) ↾ (0..^𝑖)) = ((𝑀seqstr𝐹) ↾ (0..^𝑁)))
34	33	fveq2d 6865	. . . . . . . . 9 ⊢ (𝑖 = 𝑁 → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖))) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))))
35	34	s1eqd 14608	. . . . . . . 8 ⊢ (𝑖 = 𝑁 → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩ = ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)
36	33, 35	oveq12d 7408	. . . . . . 7 ⊢ (𝑖 = 𝑁 → (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩))
37	31, 36	eqeq12d 2777	. . . . . 6 ⊢ (𝑖 = 𝑁 → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩) ↔ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁) = (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)))
38	37	imbi2d 342	. . . . 5 ⊢ (𝑖 = 𝑁 → ((𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑖) = (((𝑀seqstr𝐹) ↾ (0..^𝑖)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑖)))”⟩)) ↔ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁) = (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩))))
39		ovex 7423	. . . . . . . 8 ⊢ (𝑀 ++ ⟨“(𝐹‘𝑀)”⟩) ∈ V
40		lencl 14539	. . . . . . . . 9 ⊢ (𝑀 ∈ Word 𝑆 → (♯‘𝑀) ∈ ℕ0)
41	2, 40	syl 17	. . . . . . . 8 ⊢ (𝜑 → (♯‘𝑀) ∈ ℕ0)
42		fvconst2g 7180	. . . . . . . 8 ⊢ (((𝑀 ++ ⟨“(𝐹‘𝑀)”⟩) ∈ V ∧ (♯‘𝑀) ∈ ℕ0) → ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(♯‘𝑀)) = (𝑀 ++ ⟨“(𝐹‘𝑀)”⟩))
43	39, 41, 42	sylancr 596	. . . . . . 7 ⊢ (𝜑 → ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(♯‘𝑀)) = (𝑀 ++ ⟨“(𝐹‘𝑀)”⟩))
44	40	nn0zd 12586	. . . . . . . 8 ⊢ (𝑀 ∈ Word 𝑆 → (♯‘𝑀) ∈ ℤ)
45		seq1 14020	. . . . . . . 8 ⊢ ((♯‘𝑀) ∈ ℤ → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(♯‘𝑀)))
46	2, 44, 45	3syl 18	. . . . . . 7 ⊢ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(♯‘𝑀)))
47	1, 2, 3, 4	sseqfres 34650	. . . . . . . 8 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) = 𝑀)
48	47	fveq2d 6865	. . . . . . . . 9 ⊢ (𝜑 → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀)))) = (𝐹‘𝑀))
49	48	s1eqd 14608	. . . . . . . 8 ⊢ (𝜑 → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩ = ⟨“(𝐹‘𝑀)”⟩)
50	47, 49	oveq12d 7408	. . . . . . 7 ⊢ (𝜑 → (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩) = (𝑀 ++ ⟨“(𝐹‘𝑀)”⟩))
51	43, 46, 50	3eqtr4d 2806	. . . . . 6 ⊢ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩))
52	51	a1i 11	. . . . 5 ⊢ ((♯‘𝑀) ∈ ℤ → (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(♯‘𝑀)) = (((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(♯‘𝑀))))”⟩)))
53		seqp1 14022	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ (ℤ≥‘(♯‘𝑀)) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)(𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩))((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1))))
54	53	adantl 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)(𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩))((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1))))
55		id 22	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → 𝑥 = 𝑎)
56		fveq2 6861	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝐹‘𝑥) = (𝐹‘𝑎))
57	56	s1eqd 14608	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → ⟨“(𝐹‘𝑥)”⟩ = ⟨“(𝐹‘𝑎)”⟩)
58	55, 57	oveq12d 7408	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑎 → (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩) = (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩))
59		eqidd 2762	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑏 → (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩) = (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩))
60	58, 59	cbvmpov 7485	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)) = (𝑎 ∈ V, 𝑏 ∈ V ↦ (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩))
61	60	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)) = (𝑎 ∈ V, 𝑏 ∈ V ↦ (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩)))
62		simprl 780	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (𝑎 = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ∧ 𝑏 = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1)))) → 𝑎 = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))
63	62	fveq2d 6865	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (𝑎 = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ∧ 𝑏 = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1)))) → (𝐹‘𝑎) = (𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)))
64	63	s1eqd 14608	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (𝑎 = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ∧ 𝑏 = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1)))) → ⟨“(𝐹‘𝑎)”⟩ = ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩)
65	62, 64	oveq12d 7408	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (𝑎 = (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ∧ 𝑏 = ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1)))) → (𝑎 ++ ⟨“(𝐹‘𝑎)”⟩) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩))
66		fvexd 6876	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ∈ V)
67		fvexd 6876	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1)) ∈ V)
68		ovex 7423	. . . . . . . . . . . . 13 ⊢ ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩) ∈ V
69	68	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩) ∈ V)
70	61, 65, 66, 67, 69	ovmpod 7542	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)(𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩))((ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)})‘(𝑛 + 1))) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩))
71	54, 70	eqtrd 2796	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩))
72	71	adantr 484	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩))
73	1	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑆 ∈ V)
74	2	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑀 ∈ Word 𝑆)
75	4	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝐹:𝑊⟶𝑆)
76		simpr 488	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑛 ∈ (ℤ≥‘(♯‘𝑀)))
77	73, 74, 3, 75, 76	sseqfv2 34651	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹)‘𝑛) = (lastS‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)))
78	77	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → ((𝑀seqstr𝐹)‘𝑛) = (lastS‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)))
79		simpr 488	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩))
80	79	fveq2d 6865	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (lastS‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)) = (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)))
81	1, 2, 3, 4	sseqf 34649	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝑀seqstr𝐹):ℕ0⟶𝑆)
82		fzo0ssnn0 13745	. . . . . . . . . . . . . . . . . . 19 ⊢ (0..^𝑛) ⊆ ℕ0
83		fssres 6724	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑀seqstr𝐹):ℕ0⟶𝑆 ∧ (0..^𝑛) ⊆ ℕ0) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)):(0..^𝑛)⟶𝑆)
84	81, 82, 83	sylancl 595	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑛)):(0..^𝑛)⟶𝑆)
85		iswrdi 14523	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑛)):(0..^𝑛)⟶𝑆 → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ Word 𝑆)
86	84, 85	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ Word 𝑆)
87	86	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ Word 𝑆)
88		elex 3474	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ Word 𝑆 → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ V)
89	87, 88	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ V)
90	81	adantr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (𝑀seqstr𝐹):ℕ0⟶𝑆)
91		eluznn0 12911	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((♯‘𝑀) ∈ ℕ0 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑛 ∈ ℕ0)
92	41, 91	sylan 589	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑛 ∈ ℕ0)
93	73, 90, 92	subiwrdlen 34643	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) = 𝑛)
94	93, 76	eqeltrd 2861	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) ∈ (ℤ≥‘(♯‘𝑀)))
95		hashf 14344	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ♯:V⟶(ℕ0 ∪ {+∞})
96		ffn 6685	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (♯:V⟶(ℕ0 ∪ {+∞}) → ♯ Fn V)
97		elpreima 7033	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (♯ Fn V → (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))) ↔ (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ V ∧ (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) ∈ (ℤ≥‘(♯‘𝑀)))))
98	95, 96, 97	mp2b 10	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))) ↔ (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ V ∧ (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) ∈ (ℤ≥‘(♯‘𝑀))))
99	89, 94, 98	sylanbrc 592	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))))
100	87, 99	elind 4150	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ (Word 𝑆 ∩ (◡♯ “ (ℤ≥‘(♯‘𝑀)))))
101	100, 3	eleqtrrdi 2872	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ 𝑊)
102	75, 101	ffvelcdmd 7060	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) ∈ 𝑆)
103		lswccats1 14641	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑀seqstr𝐹) ↾ (0..^𝑛)) ∈ Word 𝑆 ∧ (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) ∈ 𝑆) → (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))))
104	87, 102, 103	syl2anc 593	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))))
105	104	adantr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))))
106	78, 80, 105	3eqtrrd 2801	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛))) = ((𝑀seqstr𝐹)‘𝑛))
107	106	s1eqd 14608	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩ = ⟨“((𝑀seqstr𝐹)‘𝑛)”⟩)
108	107	oveq2d 7406	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“((𝑀seqstr𝐹)‘𝑛)”⟩))
109	73, 90, 92	iwrdsplit 34644	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“((𝑀seqstr𝐹)‘𝑛)”⟩))
110	109	adantr 484	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → ((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“((𝑀seqstr𝐹)‘𝑛)”⟩))
111	108, 79, 110	3eqtr4d 2806	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = ((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))
112	111	fveq2d 6865	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1)))))
113	112	s1eqd 14608	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩ = ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩)
114	111, 113	oveq12d 7408	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) ++ ⟨“(𝐹‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛))”⟩) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))
115	72, 114	eqtrd 2796	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) ∧ (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))
116	115	ex 416	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (ℤ≥‘(♯‘𝑀))) → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩)))
117	116	expcom 417	. . . . . 6 ⊢ (𝑛 ∈ (ℤ≥‘(♯‘𝑀)) → (𝜑 → ((seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩) → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))))
118	117	a2d 29	. . . . 5 ⊢ (𝑛 ∈ (ℤ≥‘(♯‘𝑀)) → ((𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑛) = (((𝑀seqstr𝐹) ↾ (0..^𝑛)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑛)))”⟩)) → (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘(𝑛 + 1)) = (((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^(𝑛 + 1))))”⟩))))
119	14, 22, 30, 38, 52, 118	uzind4 12900	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘(♯‘𝑀)) → (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁) = (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)))
120	5, 119	mpcom 38	. . 3 ⊢ (𝜑 → (seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁) = (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩))
121	120	fveq2d 6865	. 2 ⊢ (𝜑 → (lastS‘(seq(♯‘𝑀)((𝑥 ∈ V, 𝑦 ∈ V ↦ (𝑥 ++ ⟨“(𝐹‘𝑥)”⟩)), (ℕ0 × {(𝑀 ++ ⟨“(𝐹‘𝑀)”⟩)}))‘𝑁)) = (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)))
122		fzo0ssnn0 13745	. . . . 5 ⊢ (0..^𝑁) ⊆ ℕ0
123		fssres 6724	. . . . 5 ⊢ (((𝑀seqstr𝐹):ℕ0⟶𝑆 ∧ (0..^𝑁) ⊆ ℕ0) → ((𝑀seqstr𝐹) ↾ (0..^𝑁)):(0..^𝑁)⟶𝑆)
124	81, 122, 123	sylancl 595	. . . 4 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)):(0..^𝑁)⟶𝑆)
125		iswrdi 14523	. . . 4 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑁)):(0..^𝑁)⟶𝑆 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ Word 𝑆)
126	124, 125	syl 17	. . 3 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ Word 𝑆)
127		elex 3474	. . . . . . . 8 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ Word 𝑆 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ V)
128	126, 127	syl 17	. . . . . . 7 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ V)
129		eluznn0 12911	. . . . . . . . . 10 ⊢ (((♯‘𝑀) ∈ ℕ0 ∧ 𝑁 ∈ (ℤ≥‘(♯‘𝑀))) → 𝑁 ∈ ℕ0)
130	41, 5, 129	syl2anc 593	. . . . . . . . 9 ⊢ (𝜑 → 𝑁 ∈ ℕ0)
131	1, 81, 130	subiwrdlen 34643	. . . . . . . 8 ⊢ (𝜑 → (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) = 𝑁)
132	131, 5	eqeltrd 2861	. . . . . . 7 ⊢ (𝜑 → (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) ∈ (ℤ≥‘(♯‘𝑀)))
133		elpreima 7033	. . . . . . . 8 ⊢ (♯ Fn V → (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))) ↔ (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ V ∧ (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) ∈ (ℤ≥‘(♯‘𝑀)))))
134	95, 96, 133	mp2b 10	. . . . . . 7 ⊢ (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))) ↔ (((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ V ∧ (♯‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) ∈ (ℤ≥‘(♯‘𝑀))))
135	128, 132, 134	sylanbrc 592	. . . . . 6 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ (◡♯ “ (ℤ≥‘(♯‘𝑀))))
136	126, 135	elind 4150	. . . . 5 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ (Word 𝑆 ∩ (◡♯ “ (ℤ≥‘(♯‘𝑀)))))
137	136, 3	eleqtrrdi 2872	. . . 4 ⊢ (𝜑 → ((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ 𝑊)
138	4, 137	ffvelcdmd 7060	. . 3 ⊢ (𝜑 → (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) ∈ 𝑆)
139		lswccats1 14641	. . 3 ⊢ ((((𝑀seqstr𝐹) ↾ (0..^𝑁)) ∈ Word 𝑆 ∧ (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))) ∈ 𝑆) → (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))))
140	126, 138, 139	syl2anc 593	. 2 ⊢ (𝜑 → (lastS‘(((𝑀seqstr𝐹) ↾ (0..^𝑁)) ++ ⟨“(𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁)))”⟩)) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))))
141	6, 121, 140	3eqtrd 2800	1 ⊢ (𝜑 → ((𝑀seqstr𝐹)‘𝑁) = (𝐹‘((𝑀seqstr𝐹) ↾ (0..^𝑁))))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   = wceq 1559   ∈ wcel 2141  Vcvv 3453   ∪ cun 3900   ∩ cin 3901   ⊆ wss 3902  {csn 4579   × cxp 5641  ^◡ccnv 5642   ↾ cres 5645   “ cima 5646   Fn wfn 6510  ⟶wf 6511  ‘cfv 6515  (class class class)co 7390   ∈ cmpo 7392  0cc0 11066  1c1 11067   + caddc 11069  +∞cpnf 11206  ℕ₀cn0 12474  ℤcz 12561  ℤ_≥cuz 12832  ..^cfzo 13652  seqcseq 14007  ♯chash 14336  Word cword 14519  lastSclsw 14568   ++ cconcat 14576  ⟨“cs1 14602  seq_strcsseq 34640

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5224  ax-sep 5243  ax-nul 5253  ax-pow 5319  ax-pr 5387  ax-un 7712  ax-inf2 9589  ax-cnex 11122  ax-resscn 11123  ax-1cn 11124  ax-icn 11125  ax-addcl 11126  ax-addrcl 11127  ax-mulcl 11128  ax-mulrcl 11129  ax-mulcom 11130  ax-addass 11131  ax-mulass 11132  ax-distr 11133  ax-i2m1 11134  ax-1ne0 11135  ax-1rid 11136  ax-rnegex 11137  ax-rrecex 11138  ax-cnre 11139  ax-pre-lttri 11140  ax-pre-lttrn 11141  ax-pre-ltadd 11142  ax-pre-mulgt0 11143

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1098  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3061  df-ral 3076  df-rex 3086  df-reu 3367  df-rab 3414  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4284  df-if 4478  df-pw 4554  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-int 4903  df-iun 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-tr 5205  df-id 5538  df-eprel 5543  df-po 5551  df-so 5552  df-fr 5596  df-we 5598  df-xp 5649  df-rel 5650  df-cnv 5651  df-co 5652  df-dm 5653  df-rn 5654  df-res 5655  df-ima 5656  df-pred 6282  df-ord 6343  df-on 6344  df-lim 6345  df-suc 6346  df-iota 6471  df-fun 6517  df-fn 6518  df-f 6519  df-f1 6520  df-fo 6521  df-f1o 6522  df-fv 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7841  df-1st 7964  df-2nd 7965  df-frecs 8255  df-wrecs 8286  df-recs 8335  df-rdg 8374  df-1o 8430  df-er 8671  df-map 8803  df-en 8921  df-dom 8922  df-sdom 8923  df-fin 8924  df-card 9890  df-pnf 11211  df-mnf 11212  df-xr 11213  df-ltxr 11214  df-le 11215  df-sub 11409  df-neg 11410  df-nn 12204  df-n0 12475  df-xnn0 12548  df-z 12562  df-uz 12833  df-rp 12987  df-fz 13506  df-fzo 13653  df-seq 14008  df-hash 14337  df-word 14520  df-lsw 14569  df-concat 14577  df-s1 14603  df-substr 14648  df-pfx 14678  df-sseq 34641

This theorem is referenced by:  fibp1  34658