Metamath Proof Explorer


Theorem s3rn

Description: Range of a length 3 string. (Contributed by Thierry Arnoux, 19-Sep-2023)

Ref Expression
Hypotheses s3rn.i φID
s3rn.j φJD
s3rn.k φKD
Assertion s3rn φran⟨“IJK”⟩=IJK

Proof

Step Hyp Ref Expression
1 s3rn.i φID
2 s3rn.j φJD
3 s3rn.k φKD
4 imadmrn ⟨“IJK”⟩dom⟨“IJK”⟩=ran⟨“IJK”⟩
5 1 2 3 s3cld φ⟨“IJK”⟩WordD
6 wrdfn ⟨“IJK”⟩WordD⟨“IJK”⟩Fn0..^⟨“IJK”⟩
7 s3len ⟨“IJK”⟩=3
8 7 oveq2i 0..^⟨“IJK”⟩=0..^3
9 fzo0to3tp 0..^3=012
10 8 9 eqtri 0..^⟨“IJK”⟩=012
11 10 fneq2i ⟨“IJK”⟩Fn0..^⟨“IJK”⟩⟨“IJK”⟩Fn012
12 11 biimpi ⟨“IJK”⟩Fn0..^⟨“IJK”⟩⟨“IJK”⟩Fn012
13 5 6 12 3syl φ⟨“IJK”⟩Fn012
14 13 fndmd φdom⟨“IJK”⟩=012
15 14 imaeq2d φ⟨“IJK”⟩dom⟨“IJK”⟩=⟨“IJK”⟩012
16 c0ex 0V
17 16 tpid1 0012
18 17 a1i φ0012
19 1ex 1V
20 19 tpid2 1012
21 20 a1i φ1012
22 2ex 2V
23 22 tpid3 2012
24 23 a1i φ2012
25 13 18 21 24 fnimatp φ⟨“IJK”⟩012=⟨“IJK”⟩0⟨“IJK”⟩1⟨“IJK”⟩2
26 s3fv0 ID⟨“IJK”⟩0=I
27 1 26 syl φ⟨“IJK”⟩0=I
28 s3fv1 JD⟨“IJK”⟩1=J
29 2 28 syl φ⟨“IJK”⟩1=J
30 s3fv2 KD⟨“IJK”⟩2=K
31 3 30 syl φ⟨“IJK”⟩2=K
32 27 29 31 tpeq123d φ⟨“IJK”⟩0⟨“IJK”⟩1⟨“IJK”⟩2=IJK
33 15 25 32 3eqtrd φ⟨“IJK”⟩dom⟨“IJK”⟩=IJK
34 4 33 eqtr3id φran⟨“IJK”⟩=IJK