Description: Zero-skipping sign in a word compared to a shorter word. (Contributed by Thierry Arnoux, 8-Oct-2018)
Ref | Expression | ||
---|---|---|---|
Hypotheses | signsv.p | |
|
signsv.w | |
||
signsv.t | |
||
signsv.v | |
||
Assertion | signstfvp | |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | signsv.p | |
|
2 | signsv.w | |
|
3 | signsv.t | |
|
4 | signsv.v | |
|
5 | simpl1 | |
|
6 | s1cl | |
|
7 | 6 | 3ad2ant2 | |
8 | 7 | adantr | |
9 | fzssfzo | |
|
10 | 9 | 3ad2ant3 | |
11 | 10 | sselda | |
12 | ccatval1 | |
|
13 | 5 8 11 12 | syl3anc | |
14 | 13 | fveq2d | |
15 | 14 | mpteq2dva | |
16 | 15 | oveq2d | |
17 | ccatws1cl | |
|
18 | 17 | 3adant3 | |
19 | lencl | |
|
20 | 19 | nn0zd | |
21 | 20 | uzidd | |
22 | peano2uz | |
|
23 | fzoss2 | |
|
24 | 21 22 23 | 3syl | |
25 | 24 | sselda | |
26 | 25 | 3adant2 | |
27 | ccatlen | |
|
28 | 6 27 | sylan2 | |
29 | 28 | 3adant3 | |
30 | s1len | |
|
31 | 30 | oveq2i | |
32 | 29 31 | eqtrdi | |
33 | 32 | oveq2d | |
34 | 26 33 | eleqtrrd | |
35 | 1 2 3 4 | signstfval | |
36 | 18 34 35 | syl2anc | |
37 | 1 2 3 4 | signstfval | |
38 | 37 | 3adant2 | |
39 | 16 36 38 | 3eqtr4d | |