Step |
Hyp |
Ref |
Expression |
1 |
|
8nn |
|- 8 e. NN |
2 |
|
id |
|- ( 8 e. NN -> 8 e. NN ) |
3 |
2
|
lcmfunnnd |
|- ( 8 e. NN -> ( _lcm ` ( 1 ... 8 ) ) = ( ( _lcm ` ( 1 ... ( 8 - 1 ) ) ) lcm 8 ) ) |
4 |
1 3
|
ax-mp |
|- ( _lcm ` ( 1 ... 8 ) ) = ( ( _lcm ` ( 1 ... ( 8 - 1 ) ) ) lcm 8 ) |
5 |
|
8m1e7 |
|- ( 8 - 1 ) = 7 |
6 |
5
|
oveq2i |
|- ( 1 ... ( 8 - 1 ) ) = ( 1 ... 7 ) |
7 |
6
|
fveq2i |
|- ( _lcm ` ( 1 ... ( 8 - 1 ) ) ) = ( _lcm ` ( 1 ... 7 ) ) |
8 |
7
|
oveq1i |
|- ( ( _lcm ` ( 1 ... ( 8 - 1 ) ) ) lcm 8 ) = ( ( _lcm ` ( 1 ... 7 ) ) lcm 8 ) |
9 |
|
lcm7un |
|- ( _lcm ` ( 1 ... 7 ) ) = ; ; 4 2 0 |
10 |
9
|
oveq1i |
|- ( ( _lcm ` ( 1 ... 7 ) ) lcm 8 ) = ( ; ; 4 2 0 lcm 8 ) |
11 |
8 10
|
eqtri |
|- ( ( _lcm ` ( 1 ... ( 8 - 1 ) ) ) lcm 8 ) = ( ; ; 4 2 0 lcm 8 ) |
12 |
|
420lcm8e840 |
|- ( ; ; 4 2 0 lcm 8 ) = ; ; 8 4 0 |
13 |
4 11 12
|
3eqtri |
|- ( _lcm ` ( 1 ... 8 ) ) = ; ; 8 4 0 |