Step |
Hyp |
Ref |
Expression |
1 |
|
ballotth.m |
β’ π β β |
2 |
|
ballotth.n |
β’ π β β |
3 |
|
ballotth.o |
β’ π = { π β π« ( 1 ... ( π + π ) ) β£ ( β― β π ) = π } |
4 |
|
ballotth.p |
β’ π = ( π₯ β π« π β¦ ( ( β― β π₯ ) / ( β― β π ) ) ) |
5 |
|
ballotth.f |
β’ πΉ = ( π β π β¦ ( π β β€ β¦ ( ( β― β ( ( 1 ... π ) β© π ) ) β ( β― β ( ( 1 ... π ) β π ) ) ) ) ) |
6 |
|
ballotlemfcc.c |
β’ ( π β πΆ β π ) |
7 |
|
ballotlemfcc.j |
β’ ( π β π½ β β ) |
8 |
|
ballotlemfcc.3 |
β’ ( π β β π β ( 1 ... π½ ) 0 β€ ( ( πΉ β πΆ ) β π ) ) |
9 |
|
ballotlemfcc.4 |
β’ ( π β ( ( πΉ β πΆ ) β π½ ) < 0 ) |
10 |
|
fveq2 |
β’ ( π = π β ( ( πΉ β πΆ ) β π ) = ( ( πΉ β πΆ ) β π ) ) |
11 |
10
|
breq2d |
β’ ( π = π β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
12 |
11
|
elrab |
β’ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
13 |
12
|
anbi1i |
β’ ( ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) β ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) |
14 |
|
simprl |
β’ ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β π β ( 1 ... π½ ) ) |
15 |
14
|
adantrr |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β π β ( 1 ... π½ ) ) |
16 |
|
fzssuz |
β’ ( 1 ... π½ ) β ( β€β₯ β 1 ) |
17 |
|
uzssz |
β’ ( β€β₯ β 1 ) β β€ |
18 |
16 17
|
sstri |
β’ ( 1 ... π½ ) β β€ |
19 |
|
zssre |
β’ β€ β β |
20 |
18 19
|
sstri |
β’ ( 1 ... π½ ) β β |
21 |
20
|
sseli |
β’ ( π β ( 1 ... π½ ) β π β β ) |
22 |
21
|
ltp1d |
β’ ( π β ( 1 ... π½ ) β π < ( π + 1 ) ) |
23 |
|
1red |
β’ ( π β ( 1 ... π½ ) β 1 β β ) |
24 |
21 23
|
readdcld |
β’ ( π β ( 1 ... π½ ) β ( π + 1 ) β β ) |
25 |
21 24
|
ltnled |
β’ ( π β ( 1 ... π½ ) β ( π < ( π + 1 ) β Β¬ ( π + 1 ) β€ π ) ) |
26 |
22 25
|
mpbid |
β’ ( π β ( 1 ... π½ ) β Β¬ ( π + 1 ) β€ π ) |
27 |
15 26
|
syl |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β Β¬ ( π + 1 ) β€ π ) |
28 |
|
simprr |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) |
29 |
9
|
adantr |
β’ ( ( π β§ π = π½ ) β ( ( πΉ β πΆ ) β π½ ) < 0 ) |
30 |
|
simpr |
β’ ( ( π β§ π = π½ ) β π = π½ ) |
31 |
30
|
fveq2d |
β’ ( ( π β§ π = π½ ) β ( ( πΉ β πΆ ) β π ) = ( ( πΉ β πΆ ) β π½ ) ) |
32 |
31
|
breq1d |
β’ ( ( π β§ π = π½ ) β ( ( ( πΉ β πΆ ) β π ) < 0 β ( ( πΉ β πΆ ) β π½ ) < 0 ) ) |
33 |
|
elnnuz |
β’ ( π½ β β β π½ β ( β€β₯ β 1 ) ) |
34 |
7 33
|
sylib |
β’ ( π β π½ β ( β€β₯ β 1 ) ) |
35 |
|
eluzfz2 |
β’ ( π½ β ( β€β₯ β 1 ) β π½ β ( 1 ... π½ ) ) |
36 |
34 35
|
syl |
β’ ( π β π½ β ( 1 ... π½ ) ) |
37 |
|
eleq1 |
β’ ( π = π½ β ( π β ( 1 ... π½ ) β π½ β ( 1 ... π½ ) ) ) |
38 |
36 37
|
syl5ibrcom |
β’ ( π β ( π = π½ β π β ( 1 ... π½ ) ) ) |
39 |
38
|
anc2li |
β’ ( π β ( π = π½ β ( π β§ π β ( 1 ... π½ ) ) ) ) |
40 |
|
1eluzge0 |
β’ 1 β ( β€β₯ β 0 ) |
41 |
|
fzss1 |
β’ ( 1 β ( β€β₯ β 0 ) β ( 1 ... π½ ) β ( 0 ... π½ ) ) |
42 |
41
|
sseld |
β’ ( 1 β ( β€β₯ β 0 ) β ( π β ( 1 ... π½ ) β π β ( 0 ... π½ ) ) ) |
43 |
40 42
|
ax-mp |
β’ ( π β ( 1 ... π½ ) β π β ( 0 ... π½ ) ) |
44 |
6
|
adantr |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β πΆ β π ) |
45 |
|
elfzelz |
β’ ( π β ( 0 ... π½ ) β π β β€ ) |
46 |
45
|
adantl |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β π β β€ ) |
47 |
1 2 3 4 5 44 46
|
ballotlemfelz |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β ( ( πΉ β πΆ ) β π ) β β€ ) |
48 |
47
|
zred |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β ( ( πΉ β πΆ ) β π ) β β ) |
49 |
|
0red |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β 0 β β ) |
50 |
48 49
|
ltnled |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β ( ( ( πΉ β πΆ ) β π ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
51 |
43 50
|
sylan2 |
β’ ( ( π β§ π β ( 1 ... π½ ) ) β ( ( ( πΉ β πΆ ) β π ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
52 |
39 51
|
syl6 |
β’ ( π β ( π = π½ β ( ( ( πΉ β πΆ ) β π ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) ) |
53 |
52
|
imp |
β’ ( ( π β§ π = π½ ) β ( ( ( πΉ β πΆ ) β π ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
54 |
32 53
|
bitr3d |
β’ ( ( π β§ π = π½ ) β ( ( ( πΉ β πΆ ) β π½ ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
55 |
29 54
|
mpbid |
β’ ( ( π β§ π = π½ ) β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) |
56 |
55
|
ex |
β’ ( π β ( π = π½ β Β¬ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
57 |
56
|
con2d |
β’ ( π β ( 0 β€ ( ( πΉ β πΆ ) β π ) β Β¬ π = π½ ) ) |
58 |
|
nn1m1nn |
β’ ( π½ β β β ( π½ = 1 β¨ ( π½ β 1 ) β β ) ) |
59 |
7 58
|
syl |
β’ ( π β ( π½ = 1 β¨ ( π½ β 1 ) β β ) ) |
60 |
8
|
adantr |
β’ ( ( π β§ π½ = 1 ) β β π β ( 1 ... π½ ) 0 β€ ( ( πΉ β πΆ ) β π ) ) |
61 |
|
oveq1 |
β’ ( π½ = 1 β ( π½ ... π½ ) = ( 1 ... π½ ) ) |
62 |
61
|
adantl |
β’ ( ( π β§ π½ = 1 ) β ( π½ ... π½ ) = ( 1 ... π½ ) ) |
63 |
7
|
nnzd |
β’ ( π β π½ β β€ ) |
64 |
|
fzsn |
β’ ( π½ β β€ β ( π½ ... π½ ) = { π½ } ) |
65 |
63 64
|
syl |
β’ ( π β ( π½ ... π½ ) = { π½ } ) |
66 |
65
|
adantr |
β’ ( ( π β§ π½ = 1 ) β ( π½ ... π½ ) = { π½ } ) |
67 |
62 66
|
eqtr3d |
β’ ( ( π β§ π½ = 1 ) β ( 1 ... π½ ) = { π½ } ) |
68 |
67
|
rexeqdv |
β’ ( ( π β§ π½ = 1 ) β ( β π β ( 1 ... π½ ) 0 β€ ( ( πΉ β πΆ ) β π ) β β π β { π½ } 0 β€ ( ( πΉ β πΆ ) β π ) ) ) |
69 |
60 68
|
mpbid |
β’ ( ( π β§ π½ = 1 ) β β π β { π½ } 0 β€ ( ( πΉ β πΆ ) β π ) ) |
70 |
|
fveq2 |
β’ ( π = π½ β ( ( πΉ β πΆ ) β π ) = ( ( πΉ β πΆ ) β π½ ) ) |
71 |
70
|
breq2d |
β’ ( π = π½ β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
72 |
71
|
rexsng |
β’ ( π½ β β β ( β π β { π½ } 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
73 |
7 72
|
syl |
β’ ( π β ( β π β { π½ } 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
74 |
73
|
adantr |
β’ ( ( π β§ π½ = 1 ) β ( β π β { π½ } 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
75 |
69 74
|
mpbid |
β’ ( ( π β§ π½ = 1 ) β 0 β€ ( ( πΉ β πΆ ) β π½ ) ) |
76 |
9
|
adantr |
β’ ( ( π β§ π½ = 1 ) β ( ( πΉ β πΆ ) β π½ ) < 0 ) |
77 |
1 2 3 4 5 6 63
|
ballotlemfelz |
β’ ( π β ( ( πΉ β πΆ ) β π½ ) β β€ ) |
78 |
77
|
zred |
β’ ( π β ( ( πΉ β πΆ ) β π½ ) β β ) |
79 |
|
0red |
β’ ( π β 0 β β ) |
80 |
78 79
|
ltnled |
β’ ( π β ( ( ( πΉ β πΆ ) β π½ ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
81 |
80
|
adantr |
β’ ( ( π β§ π½ = 1 ) β ( ( ( πΉ β πΆ ) β π½ ) < 0 β Β¬ 0 β€ ( ( πΉ β πΆ ) β π½ ) ) ) |
82 |
76 81
|
mpbid |
β’ ( ( π β§ π½ = 1 ) β Β¬ 0 β€ ( ( πΉ β πΆ ) β π½ ) ) |
83 |
75 82
|
pm2.65da |
β’ ( π β Β¬ π½ = 1 ) |
84 |
|
biortn |
β’ ( Β¬ π½ = 1 β ( ( π½ β 1 ) β β β ( Β¬ Β¬ π½ = 1 β¨ ( π½ β 1 ) β β ) ) ) |
85 |
83 84
|
syl |
β’ ( π β ( ( π½ β 1 ) β β β ( Β¬ Β¬ π½ = 1 β¨ ( π½ β 1 ) β β ) ) ) |
86 |
|
notnotb |
β’ ( π½ = 1 β Β¬ Β¬ π½ = 1 ) |
87 |
86
|
orbi1i |
β’ ( ( π½ = 1 β¨ ( π½ β 1 ) β β ) β ( Β¬ Β¬ π½ = 1 β¨ ( π½ β 1 ) β β ) ) |
88 |
85 87
|
bitr4di |
β’ ( π β ( ( π½ β 1 ) β β β ( π½ = 1 β¨ ( π½ β 1 ) β β ) ) ) |
89 |
59 88
|
mpbird |
β’ ( π β ( π½ β 1 ) β β ) |
90 |
|
elnnuz |
β’ ( ( π½ β 1 ) β β β ( π½ β 1 ) β ( β€β₯ β 1 ) ) |
91 |
89 90
|
sylib |
β’ ( π β ( π½ β 1 ) β ( β€β₯ β 1 ) ) |
92 |
|
elfzp1 |
β’ ( ( π½ β 1 ) β ( β€β₯ β 1 ) β ( π β ( 1 ... ( ( π½ β 1 ) + 1 ) ) β ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = ( ( π½ β 1 ) + 1 ) ) ) ) |
93 |
91 92
|
syl |
β’ ( π β ( π β ( 1 ... ( ( π½ β 1 ) + 1 ) ) β ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = ( ( π½ β 1 ) + 1 ) ) ) ) |
94 |
7
|
nncnd |
β’ ( π β π½ β β ) |
95 |
|
1cnd |
β’ ( π β 1 β β ) |
96 |
94 95
|
npcand |
β’ ( π β ( ( π½ β 1 ) + 1 ) = π½ ) |
97 |
96
|
oveq2d |
β’ ( π β ( 1 ... ( ( π½ β 1 ) + 1 ) ) = ( 1 ... π½ ) ) |
98 |
97
|
eleq2d |
β’ ( π β ( π β ( 1 ... ( ( π½ β 1 ) + 1 ) ) β π β ( 1 ... π½ ) ) ) |
99 |
96
|
eqeq2d |
β’ ( π β ( π = ( ( π½ β 1 ) + 1 ) β π = π½ ) ) |
100 |
99
|
orbi2d |
β’ ( π β ( ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = ( ( π½ β 1 ) + 1 ) ) β ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = π½ ) ) ) |
101 |
93 98 100
|
3bitr3d |
β’ ( π β ( π β ( 1 ... π½ ) β ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = π½ ) ) ) |
102 |
|
orcom |
β’ ( ( π β ( 1 ... ( π½ β 1 ) ) β¨ π = π½ ) β ( π = π½ β¨ π β ( 1 ... ( π½ β 1 ) ) ) ) |
103 |
101 102
|
bitrdi |
β’ ( π β ( π β ( 1 ... π½ ) β ( π = π½ β¨ π β ( 1 ... ( π½ β 1 ) ) ) ) ) |
104 |
103
|
biimpd |
β’ ( π β ( π β ( 1 ... π½ ) β ( π = π½ β¨ π β ( 1 ... ( π½ β 1 ) ) ) ) ) |
105 |
|
pm5.6 |
β’ ( ( ( π β ( 1 ... π½ ) β§ Β¬ π = π½ ) β π β ( 1 ... ( π½ β 1 ) ) ) β ( π β ( 1 ... π½ ) β ( π = π½ β¨ π β ( 1 ... ( π½ β 1 ) ) ) ) ) |
106 |
104 105
|
sylibr |
β’ ( π β ( ( π β ( 1 ... π½ ) β§ Β¬ π = π½ ) β π β ( 1 ... ( π½ β 1 ) ) ) ) |
107 |
89
|
nnzd |
β’ ( π β ( π½ β 1 ) β β€ ) |
108 |
|
1z |
β’ 1 β β€ |
109 |
107 108
|
jctil |
β’ ( π β ( 1 β β€ β§ ( π½ β 1 ) β β€ ) ) |
110 |
|
elfzelz |
β’ ( π β ( 1 ... ( π½ β 1 ) ) β π β β€ ) |
111 |
110 108
|
jctir |
β’ ( π β ( 1 ... ( π½ β 1 ) ) β ( π β β€ β§ 1 β β€ ) ) |
112 |
|
fzaddel |
β’ ( ( ( 1 β β€ β§ ( π½ β 1 ) β β€ ) β§ ( π β β€ β§ 1 β β€ ) ) β ( π β ( 1 ... ( π½ β 1 ) ) β ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) ) ) |
113 |
109 111 112
|
syl2an |
β’ ( ( π β§ π β ( 1 ... ( π½ β 1 ) ) ) β ( π β ( 1 ... ( π½ β 1 ) ) β ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) ) ) |
114 |
113
|
biimp3a |
β’ ( ( π β§ π β ( 1 ... ( π½ β 1 ) ) β§ π β ( 1 ... ( π½ β 1 ) ) ) β ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) ) |
115 |
114
|
3anidm23 |
β’ ( ( π β§ π β ( 1 ... ( π½ β 1 ) ) ) β ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) ) |
116 |
|
1p1e2 |
β’ ( 1 + 1 ) = 2 |
117 |
116
|
a1i |
β’ ( π β ( 1 + 1 ) = 2 ) |
118 |
117 96
|
oveq12d |
β’ ( π β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) = ( 2 ... π½ ) ) |
119 |
118
|
eleq2d |
β’ ( π β ( ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) β ( π + 1 ) β ( 2 ... π½ ) ) ) |
120 |
|
2eluzge1 |
β’ 2 β ( β€β₯ β 1 ) |
121 |
|
fzss1 |
β’ ( 2 β ( β€β₯ β 1 ) β ( 2 ... π½ ) β ( 1 ... π½ ) ) |
122 |
120 121
|
ax-mp |
β’ ( 2 ... π½ ) β ( 1 ... π½ ) |
123 |
122
|
sseli |
β’ ( ( π + 1 ) β ( 2 ... π½ ) β ( π + 1 ) β ( 1 ... π½ ) ) |
124 |
119 123
|
syl6bi |
β’ ( π β ( ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) β ( π + 1 ) β ( 1 ... π½ ) ) ) |
125 |
124
|
adantr |
β’ ( ( π β§ π β ( 1 ... ( π½ β 1 ) ) ) β ( ( π + 1 ) β ( ( 1 + 1 ) ... ( ( π½ β 1 ) + 1 ) ) β ( π + 1 ) β ( 1 ... π½ ) ) ) |
126 |
115 125
|
mpd |
β’ ( ( π β§ π β ( 1 ... ( π½ β 1 ) ) ) β ( π + 1 ) β ( 1 ... π½ ) ) |
127 |
126
|
ex |
β’ ( π β ( π β ( 1 ... ( π½ β 1 ) ) β ( π + 1 ) β ( 1 ... π½ ) ) ) |
128 |
106 127
|
syld |
β’ ( π β ( ( π β ( 1 ... π½ ) β§ Β¬ π = π½ ) β ( π + 1 ) β ( 1 ... π½ ) ) ) |
129 |
57 128
|
sylan2d |
β’ ( π β ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β ( π + 1 ) β ( 1 ... π½ ) ) ) |
130 |
129
|
imp |
β’ ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β ( π + 1 ) β ( 1 ... π½ ) ) |
131 |
130
|
adantrr |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( π + 1 ) β ( 1 ... π½ ) ) |
132 |
|
fveq2 |
β’ ( π = ( π + 1 ) β ( ( πΉ β πΆ ) β π ) = ( ( πΉ β πΆ ) β ( π + 1 ) ) ) |
133 |
132
|
breq2d |
β’ ( π = ( π + 1 ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
134 |
133
|
elrab |
β’ ( ( π + 1 ) β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β ( ( π + 1 ) β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
135 |
|
breq1 |
β’ ( π = ( π + 1 ) β ( π β€ π β ( π + 1 ) β€ π ) ) |
136 |
135
|
rspccva |
β’ ( ( β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π β§ ( π + 1 ) β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } ) β ( π + 1 ) β€ π ) |
137 |
134 136
|
sylan2br |
β’ ( ( β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π β§ ( ( π + 1 ) β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) β ( π + 1 ) β€ π ) |
138 |
137
|
expr |
β’ ( ( β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) β ( π + 1 ) β€ π ) ) |
139 |
138
|
con3d |
β’ ( ( β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( Β¬ ( π + 1 ) β€ π β Β¬ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
140 |
28 131 139
|
syl2anc |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( Β¬ ( π + 1 ) β€ π β Β¬ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
141 |
27 140
|
mpd |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β Β¬ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) |
142 |
|
simplrr |
β’ ( ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β§ ( π + 1 ) β πΆ ) β β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) |
143 |
131
|
adantr |
β’ ( ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β§ ( π + 1 ) β πΆ ) β ( π + 1 ) β ( 1 ... π½ ) ) |
144 |
|
0red |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β 0 β β ) |
145 |
|
simpll |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β π ) |
146 |
130
|
adantr |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( π + 1 ) β ( 1 ... π½ ) ) |
147 |
41
|
sseld |
β’ ( 1 β ( β€β₯ β 0 ) β ( ( π + 1 ) β ( 1 ... π½ ) β ( π + 1 ) β ( 0 ... π½ ) ) ) |
148 |
40 146 147
|
mpsyl |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( π + 1 ) β ( 0 ... π½ ) ) |
149 |
6
|
adantr |
β’ ( ( π β§ ( π + 1 ) β ( 0 ... π½ ) ) β πΆ β π ) |
150 |
|
elfzelz |
β’ ( ( π + 1 ) β ( 0 ... π½ ) β ( π + 1 ) β β€ ) |
151 |
150
|
adantl |
β’ ( ( π β§ ( π + 1 ) β ( 0 ... π½ ) ) β ( π + 1 ) β β€ ) |
152 |
1 2 3 4 5 149 151
|
ballotlemfelz |
β’ ( ( π β§ ( π + 1 ) β ( 0 ... π½ ) ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) β β€ ) |
153 |
152
|
zred |
β’ ( ( π β§ ( π + 1 ) β ( 0 ... π½ ) ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) β β ) |
154 |
145 148 153
|
syl2anc |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) β β ) |
155 |
|
simplrr |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β 0 β€ ( ( πΉ β πΆ ) β π ) ) |
156 |
14
|
adantr |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β π β ( 1 ... π½ ) ) |
157 |
156 43
|
syl |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β π β ( 0 ... π½ ) ) |
158 |
129
|
imdistani |
β’ ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) ) |
159 |
6
|
adantr |
β’ ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β πΆ β π ) |
160 |
|
elfznn |
β’ ( ( π + 1 ) β ( 1 ... π½ ) β ( π + 1 ) β β ) |
161 |
160
|
adantl |
β’ ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( π + 1 ) β β ) |
162 |
1 2 3 4 5 159 161
|
ballotlemfp1 |
β’ ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( ( Β¬ ( π + 1 ) β πΆ β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) ) β§ ( ( π + 1 ) β πΆ β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) ) ) ) |
163 |
162
|
simprd |
β’ ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( ( π + 1 ) β πΆ β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) ) ) |
164 |
163
|
imp |
β’ ( ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β§ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) ) |
165 |
158 164
|
sylan |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) ) |
166 |
|
elfzelz |
β’ ( π β ( 1 ... π½ ) β π β β€ ) |
167 |
166
|
zcnd |
β’ ( π β ( 1 ... π½ ) β π β β ) |
168 |
|
1cnd |
β’ ( π β ( 1 ... π½ ) β 1 β β ) |
169 |
167 168
|
pncand |
β’ ( π β ( 1 ... π½ ) β ( ( π + 1 ) β 1 ) = π ) |
170 |
169
|
fveq2d |
β’ ( π β ( 1 ... π½ ) β ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) = ( ( πΉ β πΆ ) β π ) ) |
171 |
170
|
oveq1d |
β’ ( π β ( 1 ... π½ ) β ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) |
172 |
171
|
eqeq2d |
β’ ( π β ( 1 ... π½ ) β ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
173 |
156 172
|
syl |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) + 1 ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
174 |
165 173
|
mpbid |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) |
175 |
|
0z |
β’ 0 β β€ |
176 |
|
zleltp1 |
β’ ( ( 0 β β€ β§ ( ( πΉ β πΆ ) β π ) β β€ ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 < ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
177 |
175 47 176
|
sylancr |
β’ ( ( π β§ π β ( 0 ... π½ ) ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 < ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
178 |
177
|
adantr |
β’ ( ( ( π β§ π β ( 0 ... π½ ) ) β§ ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 < ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
179 |
|
breq2 |
β’ ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) β ( 0 < ( ( πΉ β πΆ ) β ( π + 1 ) ) β 0 < ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
180 |
179
|
adantl |
β’ ( ( ( π β§ π β ( 0 ... π½ ) ) β§ ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) β ( 0 < ( ( πΉ β πΆ ) β ( π + 1 ) ) β 0 < ( ( ( πΉ β πΆ ) β π ) + 1 ) ) ) |
181 |
178 180
|
bitr4d |
β’ ( ( ( π β§ π β ( 0 ... π½ ) ) β§ ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) + 1 ) ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 < ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
182 |
145 157 174 181
|
syl21anc |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β ( 0 β€ ( ( πΉ β πΆ ) β π ) β 0 < ( ( πΉ β πΆ ) β ( π + 1 ) ) ) ) |
183 |
155 182
|
mpbid |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β 0 < ( ( πΉ β πΆ ) β ( π + 1 ) ) ) |
184 |
144 154 183
|
ltled |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ ( π + 1 ) β πΆ ) β 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) |
185 |
184
|
adantlrr |
β’ ( ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β§ ( π + 1 ) β πΆ ) β 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) ) |
186 |
142 143 185 137
|
syl12anc |
β’ ( ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β§ ( π + 1 ) β πΆ ) β ( π + 1 ) β€ π ) |
187 |
27 186
|
mtand |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β Β¬ ( π + 1 ) β πΆ ) |
188 |
162
|
simpld |
β’ ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β ( Β¬ ( π + 1 ) β πΆ β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) ) ) |
189 |
188
|
imp |
β’ ( ( ( π β§ ( π + 1 ) β ( 1 ... π½ ) ) β§ Β¬ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) ) |
190 |
158 189
|
sylan |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ Β¬ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) ) |
191 |
14
|
adantr |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ Β¬ ( π + 1 ) β πΆ ) β π β ( 1 ... π½ ) ) |
192 |
170
|
oveq1d |
β’ ( π β ( 1 ... π½ ) β ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) |
193 |
192
|
eqeq2d |
β’ ( π β ( 1 ... π½ ) β ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
194 |
191 193
|
syl |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ Β¬ ( π + 1 ) β πΆ ) β ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β ( ( π + 1 ) β 1 ) ) β 1 ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
195 |
190 194
|
mpbid |
β’ ( ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β§ Β¬ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) |
196 |
195
|
adantlrr |
β’ ( ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β§ Β¬ ( π + 1 ) β πΆ ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) |
197 |
187 196
|
mpdan |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) ) |
198 |
|
breq2 |
β’ ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) β ( 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) β 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
199 |
198
|
notbid |
β’ ( ( ( πΉ β πΆ ) β ( π + 1 ) ) = ( ( ( πΉ β πΆ ) β π ) β 1 ) β ( Β¬ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
200 |
197 199
|
syl |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( Β¬ 0 β€ ( ( πΉ β πΆ ) β ( π + 1 ) ) β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
201 |
141 200
|
mpbid |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) |
202 |
14 43
|
syl |
β’ ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β π β ( 0 ... π½ ) ) |
203 |
202 47
|
syldan |
β’ ( ( π β§ ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) β ( ( πΉ β πΆ ) β π ) β β€ ) |
204 |
203
|
adantrr |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β π ) β β€ ) |
205 |
|
zlem1lt |
β’ ( ( ( ( πΉ β πΆ ) β π ) β β€ β§ 0 β β€ ) β ( ( ( πΉ β πΆ ) β π ) β€ 0 β ( ( ( πΉ β πΆ ) β π ) β 1 ) < 0 ) ) |
206 |
175 205
|
mpan2 |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β ( ( ( πΉ β πΆ ) β π ) β€ 0 β ( ( ( πΉ β πΆ ) β π ) β 1 ) < 0 ) ) |
207 |
|
zre |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β ( ( πΉ β πΆ ) β π ) β β ) |
208 |
|
1red |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β 1 β β ) |
209 |
207 208
|
resubcld |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β ( ( ( πΉ β πΆ ) β π ) β 1 ) β β ) |
210 |
|
0red |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β 0 β β ) |
211 |
209 210
|
ltnled |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β ( ( ( ( πΉ β πΆ ) β π ) β 1 ) < 0 β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
212 |
206 211
|
bitrd |
β’ ( ( ( πΉ β πΆ ) β π ) β β€ β ( ( ( πΉ β πΆ ) β π ) β€ 0 β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
213 |
204 212
|
syl |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( ( πΉ β πΆ ) β π ) β€ 0 β Β¬ 0 β€ ( ( ( πΉ β πΆ ) β π ) β 1 ) ) ) |
214 |
201 213
|
mpbird |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β π ) β€ 0 ) |
215 |
|
simprlr |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β 0 β€ ( ( πΉ β πΆ ) β π ) ) |
216 |
204
|
zred |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β π ) β β ) |
217 |
|
0red |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β 0 β β ) |
218 |
216 217
|
letri3d |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( ( πΉ β πΆ ) β π ) = 0 β ( ( ( πΉ β πΆ ) β π ) β€ 0 β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) ) ) |
219 |
214 215 218
|
mpbir2and |
β’ ( ( π β§ ( ( π β ( 1 ... π½ ) β§ 0 β€ ( ( πΉ β πΆ ) β π ) ) β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β π ) = 0 ) |
220 |
13 219
|
sylan2b |
β’ ( ( π β§ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β§ β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) ) β ( ( πΉ β πΆ ) β π ) = 0 ) |
221 |
|
ssrab2 |
β’ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β ( 1 ... π½ ) |
222 |
221 20
|
sstri |
β’ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β |
223 |
222
|
a1i |
β’ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β ) |
224 |
|
fzfi |
β’ ( 1 ... π½ ) β Fin |
225 |
|
ssfi |
β’ ( ( ( 1 ... π½ ) β Fin β§ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β ( 1 ... π½ ) ) β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β Fin ) |
226 |
224 221 225
|
mp2an |
β’ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β Fin |
227 |
226
|
a1i |
β’ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β Fin ) |
228 |
|
rabn0 |
β’ ( { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β
β β π β ( 1 ... π½ ) 0 β€ ( ( πΉ β πΆ ) β π ) ) |
229 |
8 228
|
sylibr |
β’ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β
) |
230 |
|
fimaxre |
β’ ( ( { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β β§ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β Fin β§ { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β β
) β β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) |
231 |
223 227 229 230
|
syl3anc |
β’ ( π β β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } π β€ π ) |
232 |
220 231
|
reximddv |
β’ ( π β β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } ( ( πΉ β πΆ ) β π ) = 0 ) |
233 |
|
elrabi |
β’ ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β π β ( 1 ... π½ ) ) |
234 |
233
|
anim1i |
β’ ( ( π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } β§ ( ( πΉ β πΆ ) β π ) = 0 ) β ( π β ( 1 ... π½ ) β§ ( ( πΉ β πΆ ) β π ) = 0 ) ) |
235 |
234
|
reximi2 |
β’ ( β π β { π β ( 1 ... π½ ) β£ 0 β€ ( ( πΉ β πΆ ) β π ) } ( ( πΉ β πΆ ) β π ) = 0 β β π β ( 1 ... π½ ) ( ( πΉ β πΆ ) β π ) = 0 ) |
236 |
232 235
|
syl |
β’ ( π β β π β ( 1 ... π½ ) ( ( πΉ β πΆ ) β π ) = 0 ) |