Step | Hyp | Ref
| Expression |
1 | | prodfn0.1 |
. . 3
โข (๐ โ ๐ โ (โคโฅโ๐)) |
2 | | eluzfz2 13505 |
. . 3
โข (๐ โ
(โคโฅโ๐) โ ๐ โ (๐...๐)) |
3 | 1, 2 | syl 17 |
. 2
โข (๐ โ ๐ โ (๐...๐)) |
4 | | fveq2 6888 |
. . . . 5
โข (๐ = ๐ โ (seq๐( ยท , ๐น)โ๐) = (seq๐( ยท , ๐น)โ๐)) |
5 | 4 | neeq1d 3000 |
. . . 4
โข (๐ = ๐ โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
6 | 5 | imbi2d 340 |
. . 3
โข (๐ = ๐ โ ((๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0))) |
7 | | fveq2 6888 |
. . . . 5
โข (๐ = ๐ โ (seq๐( ยท , ๐น)โ๐) = (seq๐( ยท , ๐น)โ๐)) |
8 | 7 | neeq1d 3000 |
. . . 4
โข (๐ = ๐ โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
9 | 8 | imbi2d 340 |
. . 3
โข (๐ = ๐ โ ((๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0))) |
10 | | fveq2 6888 |
. . . . 5
โข (๐ = (๐ + 1) โ (seq๐( ยท , ๐น)โ๐) = (seq๐( ยท , ๐น)โ(๐ + 1))) |
11 | 10 | neeq1d 3000 |
. . . 4
โข (๐ = (๐ + 1) โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0)) |
12 | 11 | imbi2d 340 |
. . 3
โข (๐ = (๐ + 1) โ ((๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐ โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0))) |
13 | | fveq2 6888 |
. . . . 5
โข (๐ = ๐ โ (seq๐( ยท , ๐น)โ๐) = (seq๐( ยท , ๐น)โ๐)) |
14 | 13 | neeq1d 3000 |
. . . 4
โข (๐ = ๐ โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
15 | 14 | imbi2d 340 |
. . 3
โข (๐ = ๐ โ ((๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0))) |
16 | | eluzfz1 13504 |
. . . 4
โข (๐ โ
(โคโฅโ๐) โ ๐ โ (๐...๐)) |
17 | | elfzelz 13497 |
. . . . . . . 8
โข (๐ โ (๐...๐) โ ๐ โ โค) |
18 | 17 | adantl 482 |
. . . . . . 7
โข ((๐ โง ๐ โ (๐...๐)) โ ๐ โ โค) |
19 | | seq1 13975 |
. . . . . . 7
โข (๐ โ โค โ (seq๐( ยท , ๐น)โ๐) = (๐นโ๐)) |
20 | 18, 19 | syl 17 |
. . . . . 6
โข ((๐ โง ๐ โ (๐...๐)) โ (seq๐( ยท , ๐น)โ๐) = (๐นโ๐)) |
21 | | fveq2 6888 |
. . . . . . . . . 10
โข (๐ = ๐ โ (๐นโ๐) = (๐นโ๐)) |
22 | 21 | neeq1d 3000 |
. . . . . . . . 9
โข (๐ = ๐ โ ((๐นโ๐) โ 0 โ (๐นโ๐) โ 0)) |
23 | 22 | imbi2d 340 |
. . . . . . . 8
โข (๐ = ๐ โ ((๐ โ (๐นโ๐) โ 0) โ (๐ โ (๐นโ๐) โ 0))) |
24 | | prodfn0.3 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (๐...๐)) โ (๐นโ๐) โ 0) |
25 | 24 | expcom 414 |
. . . . . . . 8
โข (๐ โ (๐...๐) โ (๐ โ (๐นโ๐) โ 0)) |
26 | 23, 25 | vtoclga 3565 |
. . . . . . 7
โข (๐ โ (๐...๐) โ (๐ โ (๐นโ๐) โ 0)) |
27 | 26 | impcom 408 |
. . . . . 6
โข ((๐ โง ๐ โ (๐...๐)) โ (๐นโ๐) โ 0) |
28 | 20, 27 | eqnetrd 3008 |
. . . . 5
โข ((๐ โง ๐ โ (๐...๐)) โ (seq๐( ยท , ๐น)โ๐) โ 0) |
29 | 28 | expcom 414 |
. . . 4
โข (๐ โ (๐...๐) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
30 | 16, 29 | syl 17 |
. . 3
โข (๐ โ
(โคโฅโ๐) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
31 | | elfzouz 13632 |
. . . . . . . . 9
โข (๐ โ (๐..^๐) โ ๐ โ (โคโฅโ๐)) |
32 | 31 | 3ad2ant2 1134 |
. . . . . . . 8
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ ๐ โ (โคโฅโ๐)) |
33 | | seqp1 13977 |
. . . . . . . 8
โข (๐ โ
(โคโฅโ๐) โ (seq๐( ยท , ๐น)โ(๐ + 1)) = ((seq๐( ยท , ๐น)โ๐) ยท (๐นโ(๐ + 1)))) |
34 | 32, 33 | syl 17 |
. . . . . . 7
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (seq๐( ยท , ๐น)โ(๐ + 1)) = ((seq๐( ยท , ๐น)โ๐) ยท (๐นโ(๐ + 1)))) |
35 | | elfzofz 13644 |
. . . . . . . . . 10
โข (๐ โ (๐..^๐) โ ๐ โ (๐...๐)) |
36 | | elfzuz 13493 |
. . . . . . . . . . . 12
โข (๐ โ (๐...๐) โ ๐ โ (โคโฅโ๐)) |
37 | 36 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ โง ๐ โ (๐...๐)) โ ๐ โ (โคโฅโ๐)) |
38 | | elfzuz3 13494 |
. . . . . . . . . . . . . . 15
โข (๐ โ (๐...๐) โ ๐ โ (โคโฅโ๐)) |
39 | | fzss2 13537 |
. . . . . . . . . . . . . . 15
โข (๐ โ
(โคโฅโ๐) โ (๐...๐) โ (๐...๐)) |
40 | 38, 39 | syl 17 |
. . . . . . . . . . . . . 14
โข (๐ โ (๐...๐) โ (๐...๐) โ (๐...๐)) |
41 | 40 | sselda 3981 |
. . . . . . . . . . . . 13
โข ((๐ โ (๐...๐) โง ๐ โ (๐...๐)) โ ๐ โ (๐...๐)) |
42 | | prodfn0.2 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐ โ (๐...๐)) โ (๐นโ๐) โ โ) |
43 | 41, 42 | sylan2 593 |
. . . . . . . . . . . 12
โข ((๐ โง (๐ โ (๐...๐) โง ๐ โ (๐...๐))) โ (๐นโ๐) โ โ) |
44 | 43 | anassrs 468 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (๐...๐)) โง ๐ โ (๐...๐)) โ (๐นโ๐) โ โ) |
45 | | mulcl 11190 |
. . . . . . . . . . . 12
โข ((๐ โ โ โง ๐ฅ โ โ) โ (๐ ยท ๐ฅ) โ โ) |
46 | 45 | adantl 482 |
. . . . . . . . . . 11
โข (((๐ โง ๐ โ (๐...๐)) โง (๐ โ โ โง ๐ฅ โ โ)) โ (๐ ยท ๐ฅ) โ โ) |
47 | 37, 44, 46 | seqcl 13984 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (๐...๐)) โ (seq๐( ยท , ๐น)โ๐) โ โ) |
48 | 35, 47 | sylan2 593 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (๐..^๐)) โ (seq๐( ยท , ๐น)โ๐) โ โ) |
49 | 48 | 3adant3 1132 |
. . . . . . . 8
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (seq๐( ยท , ๐น)โ๐) โ โ) |
50 | | fzofzp1 13725 |
. . . . . . . . . . 11
โข (๐ โ (๐..^๐) โ (๐ + 1) โ (๐...๐)) |
51 | | fveq2 6888 |
. . . . . . . . . . . . . 14
โข (๐ = (๐ + 1) โ (๐นโ๐) = (๐นโ(๐ + 1))) |
52 | 51 | eleq1d 2818 |
. . . . . . . . . . . . 13
โข (๐ = (๐ + 1) โ ((๐นโ๐) โ โ โ (๐นโ(๐ + 1)) โ โ)) |
53 | 52 | imbi2d 340 |
. . . . . . . . . . . 12
โข (๐ = (๐ + 1) โ ((๐ โ (๐นโ๐) โ โ) โ (๐ โ (๐นโ(๐ + 1)) โ โ))) |
54 | 42 | expcom 414 |
. . . . . . . . . . . 12
โข (๐ โ (๐...๐) โ (๐ โ (๐นโ๐) โ โ)) |
55 | 53, 54 | vtoclga 3565 |
. . . . . . . . . . 11
โข ((๐ + 1) โ (๐...๐) โ (๐ โ (๐นโ(๐ + 1)) โ โ)) |
56 | 50, 55 | syl 17 |
. . . . . . . . . 10
โข (๐ โ (๐..^๐) โ (๐ โ (๐นโ(๐ + 1)) โ โ)) |
57 | 56 | impcom 408 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (๐..^๐)) โ (๐นโ(๐ + 1)) โ โ) |
58 | 57 | 3adant3 1132 |
. . . . . . . 8
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐นโ(๐ + 1)) โ โ) |
59 | | simp3 1138 |
. . . . . . . 8
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (seq๐( ยท , ๐น)โ๐) โ 0) |
60 | 51 | neeq1d 3000 |
. . . . . . . . . . . . 13
โข (๐ = (๐ + 1) โ ((๐นโ๐) โ 0 โ (๐นโ(๐ + 1)) โ 0)) |
61 | 60 | imbi2d 340 |
. . . . . . . . . . . 12
โข (๐ = (๐ + 1) โ ((๐ โ (๐นโ๐) โ 0) โ (๐ โ (๐นโ(๐ + 1)) โ 0))) |
62 | 61, 25 | vtoclga 3565 |
. . . . . . . . . . 11
โข ((๐ + 1) โ (๐...๐) โ (๐ โ (๐นโ(๐ + 1)) โ 0)) |
63 | 62 | impcom 408 |
. . . . . . . . . 10
โข ((๐ โง (๐ + 1) โ (๐...๐)) โ (๐นโ(๐ + 1)) โ 0) |
64 | 50, 63 | sylan2 593 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (๐..^๐)) โ (๐นโ(๐ + 1)) โ 0) |
65 | 64 | 3adant3 1132 |
. . . . . . . 8
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐นโ(๐ + 1)) โ 0) |
66 | 49, 58, 59, 65 | mulne0d 11862 |
. . . . . . 7
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ ((seq๐( ยท , ๐น)โ๐) ยท (๐นโ(๐ + 1))) โ 0) |
67 | 34, 66 | eqnetrd 3008 |
. . . . . 6
โข ((๐ โง ๐ โ (๐..^๐) โง (seq๐( ยท , ๐น)โ๐) โ 0) โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0) |
68 | 67 | 3exp 1119 |
. . . . 5
โข (๐ โ (๐ โ (๐..^๐) โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0))) |
69 | 68 | com12 32 |
. . . 4
โข (๐ โ (๐..^๐) โ (๐ โ ((seq๐( ยท , ๐น)โ๐) โ 0 โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0))) |
70 | 69 | a2d 29 |
. . 3
โข (๐ โ (๐..^๐) โ ((๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) โ (๐ โ (seq๐( ยท , ๐น)โ(๐ + 1)) โ 0))) |
71 | 6, 9, 12, 15, 30, 70 | fzind2 13746 |
. 2
โข (๐ โ (๐...๐) โ (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0)) |
72 | 3, 71 | mpcom 38 |
1
โข (๐ โ (seq๐( ยท , ๐น)โ๐) โ 0) |