Description: Join a successor to the end of a finite set of sequential integers. (Contributed by NM, 19-Jul-2008) (Revised by Mario Carneiro, 28-Apr-2015)
Ref | Expression | ||
---|---|---|---|
Assertion | fzsuc | |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | peano2uz | |
|
2 | eluzfz2 | |
|
3 | 1 2 | syl | |
4 | peano2fzr | |
|
5 | 3 4 | mpdan | |
6 | fzsplit | |
|
7 | 5 6 | syl | |
8 | eluzelz | |
|
9 | fzsn | |
|
10 | 1 8 9 | 3syl | |
11 | 10 | uneq2d | |
12 | 7 11 | eqtrd | |