Metamath Proof Explorer


Theorem repswpfx

Description: A prefix of a repeated symbol word is a repeated symbol word. (Contributed by AV, 11-May-2020)

Ref Expression
Assertion repswpfx SVN0L0NSrepeatSNprefixL=SrepeatSL

Proof

Step Hyp Ref Expression
1 repsw SVN0SrepeatSNWordV
2 1 3adant3 SVN0L0NSrepeatSNWordV
3 repswlen SVN0SrepeatSN=N
4 3 oveq2d SVN00SrepeatSN=0N
5 4 eleq2d SVN0L0SrepeatSNL0N
6 5 biimp3ar SVN0L0NL0SrepeatSN
7 pfxlen SrepeatSNWordVL0SrepeatSNSrepeatSNprefixL=L
8 2 6 7 syl2anc SVN0L0NSrepeatSNprefixL=L
9 elfznn0 L0NL0
10 repswlen SVL0SrepeatSL=L
11 9 10 sylan2 SVL0NSrepeatSL=L
12 11 3adant2 SVN0L0NSrepeatSL=L
13 8 12 eqtr4d SVN0L0NSrepeatSNprefixL=SrepeatSL
14 simpl1 SVN0L0Ni0..^SrepeatSNprefixLSV
15 simpl2 SVN0L0Ni0..^SrepeatSNprefixLN0
16 elfzuz3 L0NNL
17 16 3ad2ant3 SVN0L0NNL
18 8 fveq2d SVN0L0NSrepeatSNprefixL=L
19 17 18 eleqtrrd SVN0L0NNSrepeatSNprefixL
20 fzoss2 NSrepeatSNprefixL0..^SrepeatSNprefixL0..^N
21 19 20 syl SVN0L0N0..^SrepeatSNprefixL0..^N
22 21 sselda SVN0L0Ni0..^SrepeatSNprefixLi0..^N
23 repswsymb SVN0i0..^NSrepeatSNi=S
24 14 15 22 23 syl3anc SVN0L0Ni0..^SrepeatSNprefixLSrepeatSNi=S
25 2 adantr SVN0L0Ni0..^SrepeatSNprefixLSrepeatSNWordV
26 6 adantr SVN0L0Ni0..^SrepeatSNprefixLL0SrepeatSN
27 8 oveq2d SVN0L0N0..^SrepeatSNprefixL=0..^L
28 27 eleq2d SVN0L0Ni0..^SrepeatSNprefixLi0..^L
29 28 biimpa SVN0L0Ni0..^SrepeatSNprefixLi0..^L
30 pfxfv SrepeatSNWordVL0SrepeatSNi0..^LSrepeatSNprefixLi=SrepeatSNi
31 25 26 29 30 syl3anc SVN0L0Ni0..^SrepeatSNprefixLSrepeatSNprefixLi=SrepeatSNi
32 9 3ad2ant3 SVN0L0NL0
33 32 adantr SVN0L0Ni0..^SrepeatSNprefixLL0
34 repswsymb SVL0i0..^LSrepeatSLi=S
35 14 33 29 34 syl3anc SVN0L0Ni0..^SrepeatSNprefixLSrepeatSLi=S
36 24 31 35 3eqtr4d SVN0L0Ni0..^SrepeatSNprefixLSrepeatSNprefixLi=SrepeatSLi
37 36 ralrimiva SVN0L0Ni0..^SrepeatSNprefixLSrepeatSNprefixLi=SrepeatSLi
38 pfxcl SrepeatSNWordVSrepeatSNprefixLWordV
39 2 38 syl SVN0L0NSrepeatSNprefixLWordV
40 repsw SVL0SrepeatSLWordV
41 9 40 sylan2 SVL0NSrepeatSLWordV
42 eqwrd SrepeatSNprefixLWordVSrepeatSLWordVSrepeatSNprefixL=SrepeatSLSrepeatSNprefixL=SrepeatSLi0..^SrepeatSNprefixLSrepeatSNprefixLi=SrepeatSLi
43 39 41 42 3imp3i2an SVN0L0NSrepeatSNprefixL=SrepeatSLSrepeatSNprefixL=SrepeatSLi0..^SrepeatSNprefixLSrepeatSNprefixLi=SrepeatSLi
44 13 37 43 mpbir2and SVN0L0NSrepeatSNprefixL=SrepeatSL