Step |
Hyp |
Ref |
Expression |
1 |
|
metdscn.f |
β’ πΉ = ( π₯ β π β¦ inf ( ran ( π¦ β π β¦ ( π₯ π· π¦ ) ) , β* , < ) ) |
2 |
|
metdscn.j |
β’ π½ = ( MetOpen β π· ) |
3 |
|
metnrmlem.1 |
β’ ( π β π· β ( βMet β π ) ) |
4 |
|
metnrmlem.2 |
β’ ( π β π β ( Clsd β π½ ) ) |
5 |
|
metnrmlem.3 |
β’ ( π β π β ( Clsd β π½ ) ) |
6 |
|
metnrmlem.4 |
β’ ( π β ( π β© π ) = β
) |
7 |
|
metnrmlem.u |
β’ π = βͺ π‘ β π ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) |
8 |
|
metnrmlem.g |
β’ πΊ = ( π₯ β π β¦ inf ( ran ( π¦ β π β¦ ( π₯ π· π¦ ) ) , β* , < ) ) |
9 |
|
metnrmlem.v |
β’ π = βͺ π β π ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) |
10 |
|
incom |
β’ ( π β© π ) = ( π β© π ) |
11 |
10 6
|
eqtrid |
β’ ( π β ( π β© π ) = β
) |
12 |
8 2 3 5 4 11 9
|
metnrmlem2 |
β’ ( π β ( π β π½ β§ π β π ) ) |
13 |
12
|
simpld |
β’ ( π β π β π½ ) |
14 |
1 2 3 4 5 6 7
|
metnrmlem2 |
β’ ( π β ( π β π½ β§ π β π ) ) |
15 |
14
|
simpld |
β’ ( π β π β π½ ) |
16 |
12
|
simprd |
β’ ( π β π β π ) |
17 |
14
|
simprd |
β’ ( π β π β π ) |
18 |
9
|
ineq1i |
β’ ( π β© π ) = ( βͺ π β π ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) |
19 |
|
iunin1 |
β’ βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) = ( βͺ π β π ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) |
20 |
18 19
|
eqtr4i |
β’ ( π β© π ) = βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) |
21 |
7
|
ineq2i |
β’ ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) = ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© βͺ π‘ β π ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) |
22 |
|
iunin2 |
β’ βͺ π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) = ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© βͺ π‘ β π ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) |
23 |
21 22
|
eqtr4i |
β’ ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) = βͺ π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) |
24 |
3
|
adantr |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β π· β ( βMet β π ) ) |
25 |
|
eqid |
β’ βͺ π½ = βͺ π½ |
26 |
25
|
cldss |
β’ ( π β ( Clsd β π½ ) β π β βͺ π½ ) |
27 |
4 26
|
syl |
β’ ( π β π β βͺ π½ ) |
28 |
2
|
mopnuni |
β’ ( π· β ( βMet β π ) β π = βͺ π½ ) |
29 |
3 28
|
syl |
β’ ( π β π = βͺ π½ ) |
30 |
27 29
|
sseqtrrd |
β’ ( π β π β π ) |
31 |
30
|
sselda |
β’ ( ( π β§ π β π ) β π β π ) |
32 |
31
|
adantrr |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β π β π ) |
33 |
25
|
cldss |
β’ ( π β ( Clsd β π½ ) β π β βͺ π½ ) |
34 |
5 33
|
syl |
β’ ( π β π β βͺ π½ ) |
35 |
34 29
|
sseqtrrd |
β’ ( π β π β π ) |
36 |
35
|
sselda |
β’ ( ( π β§ π‘ β π ) β π‘ β π ) |
37 |
36
|
adantrl |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β π‘ β π ) |
38 |
8 2 3 5 4 11
|
metnrmlem1a |
β’ ( ( π β§ π β π ) β ( 0 < ( πΊ β π ) β§ if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β+ ) ) |
39 |
38
|
simprd |
β’ ( ( π β§ π β π ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β+ ) |
40 |
39
|
adantrr |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β+ ) |
41 |
40
|
rphalfcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) β β+ ) |
42 |
41
|
rpxrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) β β* ) |
43 |
1 2 3 4 5 6
|
metnrmlem1a |
β’ ( ( π β§ π‘ β π ) β ( 0 < ( πΉ β π‘ ) β§ if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β+ ) ) |
44 |
43
|
adantrl |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 0 < ( πΉ β π‘ ) β§ if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β+ ) ) |
45 |
44
|
simprd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β+ ) |
46 |
45
|
rphalfcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) β β+ ) |
47 |
46
|
rpxrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) β β* ) |
48 |
40
|
rpred |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β ) |
49 |
48
|
rehalfcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) β β ) |
50 |
45
|
rpred |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β ) |
51 |
50
|
rehalfcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) β β ) |
52 |
49 51
|
rexaddd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) +π ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) = ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) + ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) |
53 |
48
|
recnd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β ) |
54 |
50
|
recnd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β ) |
55 |
|
2cnd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β 2 β β ) |
56 |
|
2ne0 |
β’ 2 β 0 |
57 |
56
|
a1i |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β 2 β 0 ) |
58 |
53 54 55 57
|
divdird |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) = ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) + ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) |
59 |
52 58
|
eqtr4d |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) +π ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) = ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) |
60 |
8 2 3 5 4 11
|
metnrmlem1 |
β’ ( ( π β§ ( π‘ β π β§ π β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β€ ( π‘ π· π ) ) |
61 |
60
|
ancom2s |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β€ ( π‘ π· π ) ) |
62 |
|
xmetsym |
β’ ( ( π· β ( βMet β π ) β§ π‘ β π β§ π β π ) β ( π‘ π· π ) = ( π π· π‘ ) ) |
63 |
24 37 32 62
|
syl3anc |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( π‘ π· π ) = ( π π· π‘ ) ) |
64 |
61 63
|
breqtrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β€ ( π π· π‘ ) ) |
65 |
1 2 3 4 5 6
|
metnrmlem1 |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β€ ( π π· π‘ ) ) |
66 |
40
|
rpxrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β* ) |
67 |
45
|
rpxrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β* ) |
68 |
|
xmetcl |
β’ ( ( π· β ( βMet β π ) β§ π β π β§ π‘ β π ) β ( π π· π‘ ) β β* ) |
69 |
24 32 37 68
|
syl3anc |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( π π· π‘ ) β β* ) |
70 |
|
xle2add |
β’ ( ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β β* β§ if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β β* ) β§ ( ( π π· π‘ ) β β* β§ ( π π· π‘ ) β β* ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β€ ( π π· π‘ ) β§ if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β€ ( π π· π‘ ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) +π if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) β€ ( ( π π· π‘ ) +π ( π π· π‘ ) ) ) ) |
71 |
66 67 69 69 70
|
syl22anc |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) β€ ( π π· π‘ ) β§ if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) β€ ( π π· π‘ ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) +π if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) β€ ( ( π π· π‘ ) +π ( π π· π‘ ) ) ) ) |
72 |
64 65 71
|
mp2and |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) +π if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) β€ ( ( π π· π‘ ) +π ( π π· π‘ ) ) ) |
73 |
48 50
|
readdcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) β β ) |
74 |
73
|
recnd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) β β ) |
75 |
74 55 57
|
divcan2d |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 2 Β· ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) = ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) ) |
76 |
|
2re |
β’ 2 β β |
77 |
73
|
rehalfcld |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β β ) |
78 |
|
rexmul |
β’ ( ( 2 β β β§ ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β β ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) = ( 2 Β· ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) ) |
79 |
76 77 78
|
sylancr |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) = ( 2 Β· ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) ) |
80 |
48 50
|
rexaddd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) +π if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) = ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) ) |
81 |
75 79 80
|
3eqtr4d |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) = ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) +π if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) ) |
82 |
|
x2times |
β’ ( ( π π· π‘ ) β β* β ( 2 Β·e ( π π· π‘ ) ) = ( ( π π· π‘ ) +π ( π π· π‘ ) ) ) |
83 |
69 82
|
syl |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 2 Β·e ( π π· π‘ ) ) = ( ( π π· π‘ ) +π ( π π· π‘ ) ) ) |
84 |
72 81 83
|
3brtr4d |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) β€ ( 2 Β·e ( π π· π‘ ) ) ) |
85 |
77
|
rexrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β β* ) |
86 |
|
2rp |
β’ 2 β β+ |
87 |
86
|
a1i |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β 2 β β+ ) |
88 |
|
xlemul2 |
β’ ( ( ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β β* β§ ( π π· π‘ ) β β* β§ 2 β β+ ) β ( ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β€ ( π π· π‘ ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) β€ ( 2 Β·e ( π π· π‘ ) ) ) ) |
89 |
85 69 87 88
|
syl3anc |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β€ ( π π· π‘ ) β ( 2 Β·e ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) ) β€ ( 2 Β·e ( π π· π‘ ) ) ) ) |
90 |
84 89
|
mpbird |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) + if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) ) / 2 ) β€ ( π π· π‘ ) ) |
91 |
59 90
|
eqbrtrd |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) +π ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) β€ ( π π· π‘ ) ) |
92 |
|
bldisj |
β’ ( ( ( π· β ( βMet β π ) β§ π β π β§ π‘ β π ) β§ ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) β β* β§ ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) β β* β§ ( ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) +π ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) β€ ( π π· π‘ ) ) ) β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) = β
) |
93 |
24 32 37 42 47 91 92
|
syl33anc |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) = β
) |
94 |
|
eqimss |
β’ ( ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) = β
β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
95 |
93 94
|
syl |
β’ ( ( π β§ ( π β π β§ π‘ β π ) ) β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
96 |
95
|
anassrs |
β’ ( ( ( π β§ π β π ) β§ π‘ β π ) β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
97 |
96
|
ralrimiva |
β’ ( ( π β§ π β π ) β β π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
98 |
|
iunss |
β’ ( βͺ π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
β β π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
99 |
97 98
|
sylibr |
β’ ( ( π β§ π β π ) β βͺ π‘ β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© ( π‘ ( ball β π· ) ( if ( 1 β€ ( πΉ β π‘ ) , 1 , ( πΉ β π‘ ) ) / 2 ) ) ) β β
) |
100 |
23 99
|
eqsstrid |
β’ ( ( π β§ π β π ) β ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
) |
101 |
100
|
ralrimiva |
β’ ( π β β π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
) |
102 |
|
iunss |
β’ ( βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
β β π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
) |
103 |
101 102
|
sylibr |
β’ ( π β βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
) |
104 |
|
ss0 |
β’ ( βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) β β
β βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) = β
) |
105 |
103 104
|
syl |
β’ ( π β βͺ π β π ( ( π ( ball β π· ) ( if ( 1 β€ ( πΊ β π ) , 1 , ( πΊ β π ) ) / 2 ) ) β© π ) = β
) |
106 |
20 105
|
eqtrid |
β’ ( π β ( π β© π ) = β
) |
107 |
|
sseq2 |
β’ ( π§ = π β ( π β π§ β π β π ) ) |
108 |
|
ineq1 |
β’ ( π§ = π β ( π§ β© π€ ) = ( π β© π€ ) ) |
109 |
108
|
eqeq1d |
β’ ( π§ = π β ( ( π§ β© π€ ) = β
β ( π β© π€ ) = β
) ) |
110 |
107 109
|
3anbi13d |
β’ ( π§ = π β ( ( π β π§ β§ π β π€ β§ ( π§ β© π€ ) = β
) β ( π β π β§ π β π€ β§ ( π β© π€ ) = β
) ) ) |
111 |
|
sseq2 |
β’ ( π€ = π β ( π β π€ β π β π ) ) |
112 |
|
ineq2 |
β’ ( π€ = π β ( π β© π€ ) = ( π β© π ) ) |
113 |
112
|
eqeq1d |
β’ ( π€ = π β ( ( π β© π€ ) = β
β ( π β© π ) = β
) ) |
114 |
111 113
|
3anbi23d |
β’ ( π€ = π β ( ( π β π β§ π β π€ β§ ( π β© π€ ) = β
) β ( π β π β§ π β π β§ ( π β© π ) = β
) ) ) |
115 |
110 114
|
rspc2ev |
β’ ( ( π β π½ β§ π β π½ β§ ( π β π β§ π β π β§ ( π β© π ) = β
) ) β β π§ β π½ β π€ β π½ ( π β π§ β§ π β π€ β§ ( π§ β© π€ ) = β
) ) |
116 |
13 15 16 17 106 115
|
syl113anc |
β’ ( π β β π§ β π½ β π€ β π½ ( π β π§ β§ π β π€ β§ ( π§ β© π€ ) = β
) ) |