Theorem heiborlem8 28626

Description: Lemma for heibor 28629. The previous lemmas establish that the sequence M is Cauchy, so using completeness we now consider the convergent point Y. By assumption, U is an open cover, so Y is an element of some Z e. U, and some ball centered at Y is contained in Z. But the sequence contains arbitrarily small balls close to Y, so some element ball ( M ` n ) of the sequence is contained in Z. And finally we arrive at a contradiction, because { Z } is a finite subcover of U that covers ball ( M ` n ), yet ball ( M ` n ) e. K. For convenience, we write this contradiction as ph -> ps where ph is all the accumulated hypotheses and ps is anything at all. (Contributed by Jeff Madsen, 22-Jan-2014.)

Hypotheses

Ref	Expression
heibor.1	|- J = ( MetOpen ` D )
heibor.3	|- K = { u | -. E. v e. ( ~P U i^i Fin ) u C_ U. v }
heibor.4	|- G = { <. y , n >. | ( n e. NN0 /\ y e. ( F ` n ) /\ ( y B n ) e. K ) }
heibor.5	|- B = ( z e. X , m e. NN0 |-> ( z ( ball ` D ) ( 1 / ( 2 ^ m ) ) ) )
heibor.6	|- ( ph -> D e. ( CMet ` X ) )
heibor.7	|- ( ph -> F : NN0 --> ( ~P X i^i Fin ) )
heibor.8	|- ( ph -> A. n e. NN0 X = U_ y e. ( F ` n ) ( y B n ) )
heibor.9	|- ( ph -> A. x e. G ( ( T ` x ) G ( ( 2nd ` x ) + 1 ) /\ ( ( B ` x ) i^i ( ( T ` x ) B ( ( 2nd ` x ) + 1 ) ) ) e. K ) )
heibor.10	|- ( ph -> C G 0 )
heibor.11	|- S = seq 0 ( T , ( m e. NN0 |-> if ( m = 0 , C , ( m - 1 ) ) ) )
heibor.12	|- M = ( n e. NN |-> <. ( S ` n ) , ( 3 / ( 2 ^ n ) ) >. )
heibor.13	|- ( ph -> U C_ J )
heibor.14	|- Y e. _V
heibor.15	|- ( ph -> Y e. Z )
heibor.16	|- ( ph -> Z e. U )
heibor.17	|- ( ph -> ( 1st o. M ) ( ~~> t ` J ) Y )

Assertion

Ref	Expression
heiborlem8	|- ( ph -> ps )

Distinct variable groups:   x, n, y, u, F   x, G   ph, x   m, n, u, v, x, y, z, D   m, M, u, x, y, z   T, m, n, x, y, z   B, n, u, v, y   m, J, n, u, v, x, y, z   U, n, u, v, x, y, z   ps, y, z   S, m, n, u, v, x, y, z   m, X, n, u, v, x, y, z   C, m, n, u, v, y   n, K, x, y, z   x, Y   v, Z, x   x, B

Allowed substitution hints:   ph( y, z, v, u, m, n)   ps( x, v, u, m, n)   B( z, m)   C( x, z)   T( v, u)   U( m)   F( z, v, m)   G( y, z, v, u, m, n)   K( v, u, m)   M( v, n)   Y( y, z, v, u, m, n)   Z( y, z, u, m, n)

Proof of Theorem heiborlem8

Dummy variables t k r are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		heibor.6	. . . 4 |- ( ph -> D e. ( CMet ` X ) )
2		cmetmet 20697	. . . 4 |- ( D e. ( CMet ` X ) -> D e. ( Met ` X ) )
3		metxmet 19809	. . . 4 |- ( D e. ( Met ` X ) -> D e. ( *Met ` X ) )
4	1, 2, 3	3syl 20	. . 3 |- ( ph -> D e. ( *Met ` X ) )
5		heibor.13	. . . 4 |- ( ph -> U C_ J )
6		heibor.16	. . . 4 |- ( ph -> Z e. U )
7	5, 6	sseldd 3354	. . 3 |- ( ph -> Z e. J )
8		heibor.15	. . 3 |- ( ph -> Y e. Z )
9		heibor.1	. . . 4 |- J = ( MetOpen ` D )
10	9	mopni2 19968	. . 3 |- ( ( D e. ( *Met ` X ) /\ Z e. J /\ Y e. Z ) -> E. x e. RR+ ( Y ( ball ` D ) x ) C_ Z )
11	4, 7, 8, 10	syl3anc 1213	. 2 |- ( ph -> E. x e. RR+ ( Y ( ball ` D ) x ) C_ Z )
12		rphalfcl 11011	. . . . . 6 |- ( x e. RR+ -> ( x / 2 ) e. RR+ )
13		breq2 4293	. . . . . . . 8 |- ( r = ( x / 2 ) -> ( ( 2nd ` ( M ` k ) ) < r <-> ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) )
14	13	rexbidv 2734	. . . . . . 7 |- ( r = ( x / 2 ) -> ( E. k e. NN ( 2nd ` ( M ` k ) ) < r <-> E. k e. NN ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) )
15		heibor.3	. . . . . . . 8 |- K = { u | -. E. v e. ( ~P U i^i Fin ) u C_ U. v }
16		heibor.4	. . . . . . . 8 |- G = { <. y , n >. | ( n e. NN0 /\ y e. ( F ` n ) /\ ( y B n ) e. K ) }
17		heibor.5	. . . . . . . 8 |- B = ( z e. X , m e. NN0 |-> ( z ( ball ` D ) ( 1 / ( 2 ^ m ) ) ) )
18		heibor.7	. . . . . . . 8 |- ( ph -> F : NN0 --> ( ~P X i^i Fin ) )
19		heibor.8	. . . . . . . 8 |- ( ph -> A. n e. NN0 X = U_ y e. ( F ` n ) ( y B n ) )
20		heibor.9	. . . . . . . 8 |- ( ph -> A. x e. G ( ( T ` x ) G ( ( 2nd ` x ) + 1 ) /\ ( ( B ` x ) i^i ( ( T ` x ) B ( ( 2nd ` x ) + 1 ) ) ) e. K ) )
21		heibor.10	. . . . . . . 8 |- ( ph -> C G 0 )
22		heibor.11	. . . . . . . 8 |- S = seq 0 ( T , ( m e. NN0 |-> if ( m = 0 , C , ( m - 1 ) ) ) )
23		heibor.12	. . . . . . . 8 |- M = ( n e. NN |-> <. ( S ` n ) , ( 3 / ( 2 ^ n ) ) >. )
24	9, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23	heiborlem7 28625	. . . . . . 7 |- A. r e. RR+ E. k e. NN ( 2nd ` ( M ` k ) ) < r
25	14, 24	vtoclri 3044	. . . . . 6 |- ( ( x / 2 ) e. RR+ -> E. k e. NN ( 2nd ` ( M ` k ) ) < ( x / 2 ) )
26	12, 25	syl 16	. . . . 5 |- ( x e. RR+ -> E. k e. NN ( 2nd ` ( M ` k ) ) < ( x / 2 ) )
27	26	adantl 463	. . . 4 |- ( ( ph /\ x e. RR+ ) -> E. k e. NN ( 2nd ` ( M ` k ) ) < ( x / 2 ) )
28		nnnn0 10582	. . . . . . 7 |- ( k e. NN -> k e. NN0 )
29	9, 15, 16, 17, 1, 18, 19, 20, 21, 22	heiborlem4 28622	. . . . . . . 8 |- ( ( ph /\ k e. NN0 ) -> ( S ` k ) G k )
30		fvex 5698	. . . . . . . . . 10 |- ( S ` k ) e. _V
31		vex 2973	. . . . . . . . . 10 |- k e. _V
32	9, 15, 16, 30, 31	heiborlem2 28620	. . . . . . . . 9 |- ( ( S ` k ) G k <-> ( k e. NN0 /\ ( S ` k ) e. ( F ` k ) /\ ( ( S ` k ) B k ) e. K ) )
33	32	simp3bi 1000	. . . . . . . 8 |- ( ( S ` k ) G k -> ( ( S ` k ) B k ) e. K )
34	29, 33	syl 16	. . . . . . 7 |- ( ( ph /\ k e. NN0 ) -> ( ( S ` k ) B k ) e. K )
35	28, 34	sylan2 471	. . . . . 6 |- ( ( ph /\ k e. NN ) -> ( ( S ` k ) B k ) e. K )
36	35	ad2ant2r 741	. . . . 5 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( S ` k ) B k ) e. K )
37	4	ad2antrr 720	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> D e. ( *Met ` X ) )
38	9, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23	heiborlem5 28623	. . . . . . . . . . . . 13 |- ( ph -> M : NN --> ( X X. RR+ ) )
39	38	ffvelrnda 5840	. . . . . . . . . . . 12 |- ( ( ph /\ k e. NN ) -> ( M ` k ) e. ( X X. RR+ ) )
40	39	ad2ant2r 741	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( M ` k ) e. ( X X. RR+ ) )
41		xp1st 6605	. . . . . . . . . . 11 |- ( ( M ` k ) e. ( X X. RR+ ) -> ( 1st ` ( M ` k ) ) e. X )
42	40, 41	syl 16	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1st ` ( M ` k ) ) e. X )
43		2nn 10475	. . . . . . . . . . . . . . 15 |- 2 e. NN
44		nnexpcl 11874	. . . . . . . . . . . . . . 15 |- ( ( 2 e. NN /\ k e. NN0 ) -> ( 2 ^ k ) e. NN )
45	43, 28, 44	sylancr 658	. . . . . . . . . . . . . 14 |- ( k e. NN -> ( 2 ^ k ) e. NN )
46	45	nnrpd 11022	. . . . . . . . . . . . 13 |- ( k e. NN -> ( 2 ^ k ) e. RR+ )
47	46	rpreccld 11033	. . . . . . . . . . . 12 |- ( k e. NN -> ( 1 / ( 2 ^ k ) ) e. RR+ )
48	47	ad2antrl 722	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1 / ( 2 ^ k ) ) e. RR+ )
49	48	rpxrd 11024	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1 / ( 2 ^ k ) ) e. RR* )
50		xp2nd 6606	. . . . . . . . . . . 12 |- ( ( M ` k ) e. ( X X. RR+ ) -> ( 2nd ` ( M ` k ) ) e. RR+ )
51	40, 50	syl 16	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 2nd ` ( M ` k ) ) e. RR+ )
52	51	rpxrd 11024	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 2nd ` ( M ` k ) ) e. RR* )
53		1le3 10534	. . . . . . . . . . . . . 14 |- 1 <_ 3
54		elrp 10989	. . . . . . . . . . . . . . 15 |- ( ( 2 ^ k ) e. RR+ <-> ( ( 2 ^ k ) e. RR /\ 0 < ( 2 ^ k ) ) )
55		1re 9381	. . . . . . . . . . . . . . . 16 |- 1 e. RR
56		3re 10391	. . . . . . . . . . . . . . . 16 |- 3 e. RR
57		lediv1 10190	. . . . . . . . . . . . . . . 16 |- ( ( 1 e. RR /\ 3 e. RR /\ ( ( 2 ^ k ) e. RR /\ 0 < ( 2 ^ k ) ) ) -> ( 1 <_ 3 <-> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) ) )
58	55, 56, 57	mp3an12 1299	. . . . . . . . . . . . . . 15 |- ( ( ( 2 ^ k ) e. RR /\ 0 < ( 2 ^ k ) ) -> ( 1 <_ 3 <-> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) ) )
59	54, 58	sylbi 195	. . . . . . . . . . . . . 14 |- ( ( 2 ^ k ) e. RR+ -> ( 1 <_ 3 <-> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) ) )
60	53, 59	mpbii 211	. . . . . . . . . . . . 13 |- ( ( 2 ^ k ) e. RR+ -> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) )
61	46, 60	syl 16	. . . . . . . . . . . 12 |- ( k e. NN -> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) )
62	61	ad2antrl 722	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1 / ( 2 ^ k ) ) <_ ( 3 / ( 2 ^ k ) ) )
63		fveq2 5688	. . . . . . . . . . . . . . . 16 |- ( n = k -> ( S ` n ) = ( S ` k ) )
64		oveq2 6098	. . . . . . . . . . . . . . . . 17 |- ( n = k -> ( 2 ^ n ) = ( 2 ^ k ) )
65	64	oveq2d 6106	. . . . . . . . . . . . . . . 16 |- ( n = k -> ( 3 / ( 2 ^ n ) ) = ( 3 / ( 2 ^ k ) ) )
66	63, 65	opeq12d 4064	. . . . . . . . . . . . . . 15 |- ( n = k -> <. ( S ` n ) , ( 3 / ( 2 ^ n ) ) >. = <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. )
67		opex 4553	. . . . . . . . . . . . . . 15 |- <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. e. _V
68	66, 23, 67	fvmpt 5771	. . . . . . . . . . . . . 14 |- ( k e. NN -> ( M ` k ) = <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. )
69	68	fveq2d 5692	. . . . . . . . . . . . 13 |- ( k e. NN -> ( 2nd ` ( M ` k ) ) = ( 2nd ` <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. ) )
70		ovex 6115	. . . . . . . . . . . . . 14 |- ( 3 / ( 2 ^ k ) ) e. _V
71	30, 70	op2nd 6585	. . . . . . . . . . . . 13 |- ( 2nd ` <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. ) = ( 3 / ( 2 ^ k ) )
72	69, 71	syl6eq 2489	. . . . . . . . . . . 12 |- ( k e. NN -> ( 2nd ` ( M ` k ) ) = ( 3 / ( 2 ^ k ) ) )
73	72	ad2antrl 722	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 2nd ` ( M ` k ) ) = ( 3 / ( 2 ^ k ) ) )
74	62, 73	breqtrrd 4315	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1 / ( 2 ^ k ) ) <_ ( 2nd ` ( M ` k ) ) )
75		ssbl 19898	. . . . . . . . . 10 |- ( ( ( D e. ( *Met ` X ) /\ ( 1st ` ( M ` k ) ) e. X ) /\ ( ( 1 / ( 2 ^ k ) ) e. RR* /\ ( 2nd ` ( M ` k ) ) e. RR* ) /\ ( 1 / ( 2 ^ k ) ) <_ ( 2nd ` ( M ` k ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) C_ ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) )
76	37, 42, 49, 52, 74, 75	syl221anc 1224	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) C_ ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) )
77	28	ad2antrl 722	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> k e. NN0 )
78		oveq1 6097	. . . . . . . . . . . 12 |- ( z = ( 1st ` ( M ` k ) ) -> ( z ( ball ` D ) ( 1 / ( 2 ^ m ) ) ) = ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ m ) ) ) )
79		oveq2 6098	. . . . . . . . . . . . . 14 |- ( m = k -> ( 2 ^ m ) = ( 2 ^ k ) )
80	79	oveq2d 6106	. . . . . . . . . . . . 13 |- ( m = k -> ( 1 / ( 2 ^ m ) ) = ( 1 / ( 2 ^ k ) ) )
81	80	oveq2d 6106	. . . . . . . . . . . 12 |- ( m = k -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ m ) ) ) = ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) )
82		ovex 6115	. . . . . . . . . . . 12 |- ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) e. _V
83	78, 81, 17, 82	ovmpt2 6225	. . . . . . . . . . 11 |- ( ( ( 1st ` ( M ` k ) ) e. X /\ k e. NN0 ) -> ( ( 1st ` ( M ` k ) ) B k ) = ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) )
84	42, 77, 83	syl2anc 656	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) B k ) = ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) )
85	68	fveq2d 5692	. . . . . . . . . . . . 13 |- ( k e. NN -> ( 1st ` ( M ` k ) ) = ( 1st ` <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. ) )
86	30, 70	op1st 6584	. . . . . . . . . . . . 13 |- ( 1st ` <. ( S ` k ) , ( 3 / ( 2 ^ k ) ) >. ) = ( S ` k )
87	85, 86	syl6eq 2489	. . . . . . . . . . . 12 |- ( k e. NN -> ( 1st ` ( M ` k ) ) = ( S ` k ) )
88	87	ad2antrl 722	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 1st ` ( M ` k ) ) = ( S ` k ) )
89	88	oveq1d 6105	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) B k ) = ( ( S ` k ) B k ) )
90	84, 89	eqtr3d 2475	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 1 / ( 2 ^ k ) ) ) = ( ( S ` k ) B k ) )
91		1st2nd2 6612	. . . . . . . . . . . 12 |- ( ( M ` k ) e. ( X X. RR+ ) -> ( M ` k ) = <. ( 1st ` ( M ` k ) ) , ( 2nd ` ( M ` k ) ) >. )
92	40, 91	syl 16	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( M ` k ) = <. ( 1st ` ( M ` k ) ) , ( 2nd ` ( M ` k ) ) >. )
93	92	fveq2d 5692	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( ball ` D ) ` ( M ` k ) ) = ( ( ball ` D ) ` <. ( 1st ` ( M ` k ) ) , ( 2nd ` ( M ` k ) ) >. ) )
94		df-ov 6093	. . . . . . . . . 10 |- ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) = ( ( ball ` D ) ` <. ( 1st ` ( M ` k ) ) , ( 2nd ` ( M ` k ) ) >. )
95	93, 94	syl6reqr 2492	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) = ( ( ball ` D ) ` ( M ` k ) ) )
96	76, 90, 95	3sstr3d 3395	. . . . . . . 8 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( S ` k ) B k ) C_ ( ( ball ` D ) ` ( M ` k ) ) )
97	9	mopntop 19915	. . . . . . . . . . 11 |- ( D e. ( *Met ` X ) -> J e. Top )
98	37, 97	syl 16	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> J e. Top )
99		blssm 19893	. . . . . . . . . . . 12 |- ( ( D e. ( *Met ` X ) /\ ( 1st ` ( M ` k ) ) e. X /\ ( 2nd ` ( M ` k ) ) e. RR* ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) C_ X )
100	37, 42, 52, 99	syl3anc 1213	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) C_ X )
101	9	mopnuni 19916	. . . . . . . . . . . 12 |- ( D e. ( *Met ` X ) -> X = U. J )
102	37, 101	syl 16	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> X = U. J )
103	100, 95, 102	3sstr3d 3395	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( ball ` D ) ` ( M ` k ) ) C_ U. J )
104		eqid 2441	. . . . . . . . . . 11 |- U. J = U. J
105	104	sscls 18560	. . . . . . . . . 10 |- ( ( J e. Top /\ ( ( ball ` D ) ` ( M ` k ) ) C_ U. J ) -> ( ( ball ` D ) ` ( M ` k ) ) C_ ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
106	98, 103, 105	syl2anc 656	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( ball ` D ) ` ( M ` k ) ) C_ ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
107	95	fveq2d 5692	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( cls ` J ) ` ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) ) = ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
108	12	ad2antlr 721	. . . . . . . . . . . . 13 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( x / 2 ) e. RR+ )
109	108	rpxrd 11024	. . . . . . . . . . . 12 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( x / 2 ) e. RR* )
110		simprr 751	. . . . . . . . . . . 12 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( 2nd ` ( M ` k ) ) < ( x / 2 ) )
111	9	blsscls 19982	. . . . . . . . . . . 12 |- ( ( ( D e. ( *Met ` X ) /\ ( 1st ` ( M ` k ) ) e. X ) /\ ( ( 2nd ` ( M ` k ) ) e. RR* /\ ( x / 2 ) e. RR* /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( cls ` J ) ` ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) ) C_ ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) )
112	37, 42, 52, 109, 110, 111	syl23anc 1220	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( cls ` J ) ` ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( 2nd ` ( M ` k ) ) ) ) C_ ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) )
113	107, 112	eqsstr3d 3388	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) C_ ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) )
114		rpre 10993	. . . . . . . . . . . 12 |- ( x e. RR+ -> x e. RR )
115	114	ad2antlr 721	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> x e. RR )
116		heibor.17	. . . . . . . . . . . . . . 15 |- ( ph -> ( 1st o. M ) ( ~~> t ` J ) Y )
117	9, 15, 16, 17, 1, 18, 19, 20, 21, 22, 23	heiborlem6 28624	. . . . . . . . . . . . . . . . 17 |- ( ph -> A. t e. NN ( ( ball ` D ) ` ( M ` ( t + 1 ) ) ) C_ ( ( ball ` D ) ` ( M ` t ) ) )
118	4, 38, 117, 9	caublcls 20719	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( 1st o. M ) ( ~~> t ` J ) Y /\ k e. NN ) -> Y e. ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
119	118	3expia 1184	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( 1st o. M ) ( ~~> t ` J ) Y ) -> ( k e. NN -> Y e. ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) ) )
120	116, 119	mpdan 663	. . . . . . . . . . . . . 14 |- ( ph -> ( k e. NN -> Y e. ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) ) )
121	120	imp 429	. . . . . . . . . . . . 13 |- ( ( ph /\ k e. NN ) -> Y e. ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
122	121	ad2ant2r 741	. . . . . . . . . . . 12 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> Y e. ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) )
123	113, 122	sseldd 3354	. . . . . . . . . . 11 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> Y e. ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) )
124		blhalf 19880	. . . . . . . . . . 11 |- ( ( ( D e. ( *Met ` X ) /\ ( 1st ` ( M ` k ) ) e. X ) /\ ( x e. RR /\ Y e. ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) C_ ( Y ( ball ` D ) x ) )
125	37, 42, 115, 123, 124	syl22anc 1214	. . . . . . . . . 10 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( 1st ` ( M ` k ) ) ( ball ` D ) ( x / 2 ) ) C_ ( Y ( ball ` D ) x ) )
126	113, 125	sstrd 3363	. . . . . . . . 9 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( cls ` J ) ` ( ( ball ` D ) ` ( M ` k ) ) ) C_ ( Y ( ball ` D ) x ) )
127	106, 126	sstrd 3363	. . . . . . . 8 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( ball ` D ) ` ( M ` k ) ) C_ ( Y ( ball ` D ) x ) )
128	96, 127	sstrd 3363	. . . . . . 7 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( S ` k ) B k ) C_ ( Y ( ball ` D ) x ) )
129		sstr2 3360	. . . . . . 7 |- ( ( ( S ` k ) B k ) C_ ( Y ( ball ` D ) x ) -> ( ( Y ( ball ` D ) x ) C_ Z -> ( ( S ` k ) B k ) C_ Z ) )
130	128, 129	syl 16	. . . . . 6 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( Y ( ball ` D ) x ) C_ Z -> ( ( S ` k ) B k ) C_ Z ) )
131		unisng 4104	. . . . . . . . . . . . 13 |- ( Z e. U -> U. { Z } = Z )
132	6, 131	syl 16	. . . . . . . . . . . 12 |- ( ph -> U. { Z } = Z )
133	132	sseq2d 3381	. . . . . . . . . . 11 |- ( ph -> ( ( ( S ` k ) B k ) C_ U. { Z } <-> ( ( S ` k ) B k ) C_ Z ) )
134	133	biimpar 482	. . . . . . . . . 10 |- ( ( ph /\ ( ( S ` k ) B k ) C_ Z ) -> ( ( S ` k ) B k ) C_ U. { Z } )
135	6	snssd 4015	. . . . . . . . . . . . 13 |- ( ph -> { Z } C_ U )
136		snex 4530	. . . . . . . . . . . . . 14 |- { Z } e. _V
137	136	elpw 3863	. . . . . . . . . . . . 13 |- ( { Z } e. ~P U <-> { Z } C_ U )
138	135, 137	sylibr 212	. . . . . . . . . . . 12 |- ( ph -> { Z } e. ~P U )
139		snfi 7386	. . . . . . . . . . . . 13 |- { Z } e. Fin
140	139	a1i 11	. . . . . . . . . . . 12 |- ( ph -> { Z } e. Fin )
141	138, 140	elind 3537	. . . . . . . . . . 11 |- ( ph -> { Z } e. ( ~P U i^i Fin ) )
142		unieq 4096	. . . . . . . . . . . . 13 |- ( v = { Z } -> U. v = U. { Z } )
143	142	sseq2d 3381	. . . . . . . . . . . 12 |- ( v = { Z } -> ( ( ( S ` k ) B k ) C_ U. v <-> ( ( S ` k ) B k ) C_ U. { Z } ) )
144	143	rspcev 3070	. . . . . . . . . . 11 |- ( ( { Z } e. ( ~P U i^i Fin ) /\ ( ( S ` k ) B k ) C_ U. { Z } ) -> E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v )
145	141, 144	sylan 468	. . . . . . . . . 10 |- ( ( ph /\ ( ( S ` k ) B k ) C_ U. { Z } ) -> E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v )
146	134, 145	syldan 467	. . . . . . . . 9 |- ( ( ph /\ ( ( S ` k ) B k ) C_ Z ) -> E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v )
147		ovex 6115	. . . . . . . . . . 11 |- ( ( S ` k ) B k ) e. _V
148		sseq1 3374	. . . . . . . . . . . . 13 |- ( u = ( ( S ` k ) B k ) -> ( u C_ U. v <-> ( ( S ` k ) B k ) C_ U. v ) )
149	148	rexbidv 2734	. . . . . . . . . . . 12 |- ( u = ( ( S ` k ) B k ) -> ( E. v e. ( ~P U i^i Fin ) u C_ U. v <-> E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v ) )
150	149	notbid 294	. . . . . . . . . . 11 |- ( u = ( ( S ` k ) B k ) -> ( -. E. v e. ( ~P U i^i Fin ) u C_ U. v <-> -. E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v ) )
151	147, 150, 15	elab2 3106	. . . . . . . . . 10 |- ( ( ( S ` k ) B k ) e. K <-> -. E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v )
152	151	con2bii 332	. . . . . . . . 9 |- ( E. v e. ( ~P U i^i Fin ) ( ( S ` k ) B k ) C_ U. v <-> -. ( ( S ` k ) B k ) e. K )
153	146, 152	sylib 196	. . . . . . . 8 |- ( ( ph /\ ( ( S ` k ) B k ) C_ Z ) -> -. ( ( S ` k ) B k ) e. K )
154	153	ex 434	. . . . . . 7 |- ( ph -> ( ( ( S ` k ) B k ) C_ Z -> -. ( ( S ` k ) B k ) e. K ) )
155	154	ad2antrr 720	. . . . . 6 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( ( S ` k ) B k ) C_ Z -> -. ( ( S ` k ) B k ) e. K ) )
156	130, 155	syld 44	. . . . 5 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> ( ( Y ( ball ` D ) x ) C_ Z -> -. ( ( S ` k ) B k ) e. K ) )
157	36, 156	mt2d 117	. . . 4 |- ( ( ( ph /\ x e. RR+ ) /\ ( k e. NN /\ ( 2nd ` ( M ` k ) ) < ( x / 2 ) ) ) -> -. ( Y ( ball ` D ) x ) C_ Z )
158	27, 157	rexlimddv 2843	. . 3 |- ( ( ph /\ x e. RR+ ) -> -. ( Y ( ball ` D ) x ) C_ Z )
159	158	nrexdv 2817	. 2 |- ( ph -> -. E. x e. RR+ ( Y ( ball ` D ) x ) C_ Z )
160	11, 159	pm2.21dd 174	1 |- ( ph -> ps )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   /\ wa 369   /\ w3a 960   = wceq 1364   e. wcel 1761   {cab 2427   A.wral 2713   E.wrex 2714   _Vcvv 2970   i^i cin 3324   C_ wss 3325   ifcif 3788   ~Pcpw 3857   {csn 3874   <.cop 3880   U.cuni 4088   U_ciun 4168   class class class wbr 4289   {copab 4346   e. cmpt 4347   X. cxp 4834   o. ccom 4840   -->wf 5411   ` cfv 5415  (class class class)co 6090   e. cmpt2 6092   1stc1st 6574   2ndc2nd 6575   Fincfn 7306   RRcr 9277   0cc0 9278   1c1 9279   + caddc 9281   RR*cxr 9413   < clt 9414   <_ cle 9415   - cmin 9591   / cdiv 9989   NNcn 10318   2c2 10367   3c3 10368   NN0cn0 10575   RR+crp 10987   seqcseq 11802   ^cexp 11861   *Metcxmt 17701   Metcme 17702   ballcbl 17703   MetOpencmopn 17706   Topctop 18398   clsccl 18522   ~~> tclm 18730   CMetcms 20665

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1596  ax-4 1607  ax-5 1675  ax-6 1713  ax-7 1733  ax-8 1763  ax-9 1765  ax-10 1780  ax-11 1785  ax-12 1797  ax-13 1948  ax-ext 2422  ax-rep 4400  ax-sep 4410  ax-nul 4418  ax-pow 4467  ax-pr 4528  ax-un 6371  ax-cnex 9334  ax-resscn 9335  ax-1cn 9336  ax-icn 9337  ax-addcl 9338  ax-addrcl 9339  ax-mulcl 9340  ax-mulrcl 9341  ax-mulcom 9342  ax-addass 9343  ax-mulass 9344  ax-distr 9345  ax-i2m1 9346  ax-1ne0 9347  ax-1rid 9348  ax-rnegex 9349  ax-rrecex 9350  ax-cnre 9351  ax-pre-lttri 9352  ax-pre-lttrn 9353  ax-pre-ltadd 9354  ax-pre-mulgt0 9355  ax-pre-sup 9356

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 961  df-3an 962  df-tru 1367  df-ex 1592  df-nf 1595  df-sb 1706  df-eu 2263  df-mo 2264  df-clab 2428  df-cleq 2434  df-clel 2437  df-nfc 2566  df-ne 2606  df-nel 2607  df-ral 2718  df-rex 2719  df-reu 2720  df-rmo 2721  df-rab 2722  df-v 2972  df-sbc 3184  df-csb 3286  df-dif 3328  df-un 3330  df-in 3332  df-ss 3339  df-pss 3341  df-nul 3635  df-if 3789  df-pw 3859  df-sn 3875  df-pr 3877  df-tp 3879  df-op 3881  df-uni 4089  df-int 4126  df-iun 4170  df-iin 4171  df-br 4290  df-opab 4348  df-mpt 4349  df-tr 4383  df-eprel 4628  df-id 4632  df-po 4637  df-so 4638  df-fr 4675  df-we 4677  df-ord 4718  df-on 4719  df-lim 4720  df-suc 4721  df-xp 4842  df-rel 4843  df-cnv 4844  df-co 4845  df-dm 4846  df-rn 4847  df-res 4848  df-ima 4849  df-iota 5378  df-fun 5417  df-fn 5418  df-f 5419  df-f1 5420  df-fo 5421  df-f1o 5422  df-fv 5423  df-riota 6049  df-ov 6093  df-oprab 6094  df-mpt2 6095  df-om 6476  df-1st 6576  df-2nd 6577  df-recs 6828  df-rdg 6862  df-1o 6916  df-er 7097  df-map 7212  df-pm 7213  df-en 7307  df-dom 7308  df-sdom 7309  df-fin 7310  df-sup 7687  df-pnf 9416  df-mnf 9417  df-xr 9418  df-ltxr 9419  df-le 9420  df-sub 9593  df-neg 9594  df-div 9990  df-nn 10319  df-2 10376  df-3 10377  df-n0 10576  df-z 10643  df-uz 10858  df-q 10950  df-rp 10988  df-xneg 11085  df-xadd 11086  df-xmul 11087  df-fl 11638  df-seq 11803  df-exp 11862  df-topgen 14378  df-psmet 17709  df-xmet 17710  df-met 17711  df-bl 17712  df-mopn 17713  df-top 18403  df-bases 18405  df-topon 18406  df-cld 18523  df-ntr 18524  df-cls 18525  df-lm 18733  df-cmet 20668

This theorem is referenced by:  heiborlem9  28627