Step | Hyp | Ref
| Expression |
1 | | peano2cn 11382 |
. . . . 5
โข (๐ด โ โ โ (๐ด + 1) โ
โ) |
2 | | nnnn0 12475 |
. . . . 5
โข (๐ โ โ โ ๐ โ
โ0) |
3 | | fallfacval 15949 |
. . . . 5
โข (((๐ด + 1) โ โ โง ๐ โ โ0)
โ ((๐ด + 1) FallFac
๐) = โ๐ โ (0...(๐ โ 1))((๐ด + 1) โ ๐)) |
4 | 1, 2, 3 | syl2an 596 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด + 1) FallFac ๐) = โ๐ โ (0...(๐ โ 1))((๐ด + 1) โ ๐)) |
5 | | 0p1e1 12330 |
. . . . . . . . 9
โข (0 + 1) =
1 |
6 | 5 | oveq1i 7415 |
. . . . . . . 8
โข ((0 +
1)...(๐ โ 1)) =
(1...(๐ โ
1)) |
7 | 6 | prodeq1i 15858 |
. . . . . . 7
โข
โ๐ โ ((0
+ 1)...(๐ โ 1))(๐ด โ (๐ โ 1)) = โ๐ โ (1...(๐ โ 1))(๐ด โ (๐ โ 1)) |
8 | 7 | oveq2i 7416 |
. . . . . 6
โข ((๐ด โ -1) ยท
โ๐ โ ((0 +
1)...(๐ โ 1))(๐ด โ (๐ โ 1))) = ((๐ด โ -1) ยท โ๐ โ (1...(๐ โ 1))(๐ด โ (๐ โ 1))) |
9 | | nnm1nn0 12509 |
. . . . . . . . 9
โข (๐ โ โ โ (๐ โ 1) โ
โ0) |
10 | 9 | adantl 482 |
. . . . . . . 8
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ โ 1) โ
โ0) |
11 | | nn0uz 12860 |
. . . . . . . 8
โข
โ0 = (โคโฅโ0) |
12 | 10, 11 | eleqtrdi 2843 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ โ 1) โ
(โคโฅโ0)) |
13 | | simpll 765 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ ๐ด โ โ) |
14 | | elfzelz 13497 |
. . . . . . . . . . 11
โข (๐ โ (0...(๐ โ 1)) โ ๐ โ โค) |
15 | 14 | adantl 482 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ ๐ โ โค) |
16 | | peano2zm 12601 |
. . . . . . . . . 10
โข (๐ โ โค โ (๐ โ 1) โ
โค) |
17 | 15, 16 | syl 17 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ (๐ โ 1) โ โค) |
18 | 17 | zcnd 12663 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ (๐ โ 1) โ โ) |
19 | 13, 18 | subcld 11567 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ (๐ด โ (๐ โ 1)) โ โ) |
20 | | oveq1 7412 |
. . . . . . . . 9
โข (๐ = 0 โ (๐ โ 1) = (0 โ 1)) |
21 | | df-neg 11443 |
. . . . . . . . 9
โข -1 = (0
โ 1) |
22 | 20, 21 | eqtr4di 2790 |
. . . . . . . 8
โข (๐ = 0 โ (๐ โ 1) = -1) |
23 | 22 | oveq2d 7421 |
. . . . . . 7
โข (๐ = 0 โ (๐ด โ (๐ โ 1)) = (๐ด โ -1)) |
24 | 12, 19, 23 | fprod1p 15908 |
. . . . . 6
โข ((๐ด โ โ โง ๐ โ โ) โ
โ๐ โ (0...(๐ โ 1))(๐ด โ (๐ โ 1)) = ((๐ด โ -1) ยท โ๐ โ ((0 + 1)...(๐ โ 1))(๐ด โ (๐ โ 1)))) |
25 | | fallfacval2 15951 |
. . . . . . . 8
โข ((๐ด โ โ โง (๐ โ 1) โ
โ0) โ (๐ด FallFac (๐ โ 1)) = โ๐ โ (1...(๐ โ 1))(๐ด โ (๐ โ 1))) |
26 | 9, 25 | sylan2 593 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด FallFac (๐ โ 1)) = โ๐ โ (1...(๐ โ 1))(๐ด โ (๐ โ 1))) |
27 | 26 | oveq2d 7421 |
. . . . . 6
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด โ -1) ยท (๐ด FallFac (๐ โ 1))) = ((๐ด โ -1) ยท โ๐ โ (1...(๐ โ 1))(๐ด โ (๐ โ 1)))) |
28 | 8, 24, 27 | 3eqtr4a 2798 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ
โ๐ โ (0...(๐ โ 1))(๐ด โ (๐ โ 1)) = ((๐ด โ -1) ยท (๐ด FallFac (๐ โ 1)))) |
29 | | elfznn0 13590 |
. . . . . . . . 9
โข (๐ โ (0...(๐ โ 1)) โ ๐ โ โ0) |
30 | 29 | adantl 482 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ ๐ โ โ0) |
31 | 30 | nn0cnd 12530 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ ๐ โ โ) |
32 | | 1cnd 11205 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ 1 โ
โ) |
33 | 13, 31, 32 | subsub3d 11597 |
. . . . . 6
โข (((๐ด โ โ โง ๐ โ โ) โง ๐ โ (0...(๐ โ 1))) โ (๐ด โ (๐ โ 1)) = ((๐ด + 1) โ ๐)) |
34 | 33 | prodeq2dv 15863 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ
โ๐ โ (0...(๐ โ 1))(๐ด โ (๐ โ 1)) = โ๐ โ (0...(๐ โ 1))((๐ด + 1) โ ๐)) |
35 | | simpl 483 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ โ โ) โ ๐ด โ
โ) |
36 | | 1cnd 11205 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ โ โ) โ 1 โ
โ) |
37 | 35, 36 | subnegd 11574 |
. . . . . 6
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด โ -1) = (๐ด + 1)) |
38 | 37 | oveq1d 7420 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด โ -1) ยท (๐ด FallFac (๐ โ 1))) = ((๐ด + 1) ยท (๐ด FallFac (๐ โ 1)))) |
39 | 28, 34, 38 | 3eqtr3d 2780 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ
โ๐ โ (0...(๐ โ 1))((๐ด + 1) โ ๐) = ((๐ด + 1) ยท (๐ด FallFac (๐ โ 1)))) |
40 | 4, 39 | eqtrd 2772 |
. . 3
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด + 1) FallFac ๐) = ((๐ด + 1) ยท (๐ด FallFac (๐ โ 1)))) |
41 | | simpr 485 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ โ โ) โ ๐ โ
โ) |
42 | 41 | nncnd 12224 |
. . . . . 6
โข ((๐ด โ โ โง ๐ โ โ) โ ๐ โ
โ) |
43 | 42, 36 | npcand 11571 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ โ 1) + 1) = ๐) |
44 | 43 | oveq2d 7421 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด FallFac ((๐ โ 1) + 1)) = (๐ด FallFac ๐)) |
45 | | fallfacp1 15970 |
. . . . 5
โข ((๐ด โ โ โง (๐ โ 1) โ
โ0) โ (๐ด FallFac ((๐ โ 1) + 1)) = ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1)))) |
46 | 9, 45 | sylan2 593 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด FallFac ((๐ โ 1) + 1)) = ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1)))) |
47 | 44, 46 | eqtr3d 2774 |
. . 3
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด FallFac ๐) = ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1)))) |
48 | 40, 47 | oveq12d 7423 |
. 2
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) FallFac ๐) โ (๐ด FallFac ๐)) = (((๐ด + 1) ยท (๐ด FallFac (๐ โ 1))) โ ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1))))) |
49 | | fallfaccl 15956 |
. . . . . 6
โข ((๐ด โ โ โง (๐ โ 1) โ
โ0) โ (๐ด FallFac (๐ โ 1)) โ
โ) |
50 | 9, 49 | sylan2 593 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด FallFac (๐ โ 1)) โ
โ) |
51 | 10 | nn0cnd 12530 |
. . . . . 6
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ โ 1) โ
โ) |
52 | 35, 51 | subcld 11567 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด โ (๐ โ 1)) โ
โ) |
53 | 50, 52 | mulcomd 11231 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1))) = ((๐ด โ (๐ โ 1)) ยท (๐ด FallFac (๐ โ 1)))) |
54 | 53 | oveq2d 7421 |
. . 3
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) ยท (๐ด FallFac (๐ โ 1))) โ ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1)))) = (((๐ด + 1) ยท (๐ด FallFac (๐ โ 1))) โ ((๐ด โ (๐ โ 1)) ยท (๐ด FallFac (๐ โ 1))))) |
55 | 1 | adantr 481 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ (๐ด + 1) โ
โ) |
56 | 55, 52, 50 | subdird 11667 |
. . 3
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) โ (๐ด โ (๐ โ 1))) ยท (๐ด FallFac (๐ โ 1))) = (((๐ด + 1) ยท (๐ด FallFac (๐ โ 1))) โ ((๐ด โ (๐ โ 1)) ยท (๐ด FallFac (๐ โ 1))))) |
57 | 35, 36, 51 | pnncand 11606 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด + 1) โ (๐ด โ (๐ โ 1))) = (1 + (๐ โ 1))) |
58 | 36, 42 | pncan3d 11570 |
. . . . 5
โข ((๐ด โ โ โง ๐ โ โ) โ (1 +
(๐ โ 1)) = ๐) |
59 | 57, 58 | eqtrd 2772 |
. . . 4
โข ((๐ด โ โ โง ๐ โ โ) โ ((๐ด + 1) โ (๐ด โ (๐ โ 1))) = ๐) |
60 | 59 | oveq1d 7420 |
. . 3
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) โ (๐ด โ (๐ โ 1))) ยท (๐ด FallFac (๐ โ 1))) = (๐ ยท (๐ด FallFac (๐ โ 1)))) |
61 | 54, 56, 60 | 3eqtr2d 2778 |
. 2
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) ยท (๐ด FallFac (๐ โ 1))) โ ((๐ด FallFac (๐ โ 1)) ยท (๐ด โ (๐ โ 1)))) = (๐ ยท (๐ด FallFac (๐ โ 1)))) |
62 | 48, 61 | eqtrd 2772 |
1
โข ((๐ด โ โ โง ๐ โ โ) โ (((๐ด + 1) FallFac ๐) โ (๐ด FallFac ๐)) = (๐ ยท (๐ด FallFac (๐ โ 1)))) |