Theorem stoweidlem18 37878

Description: This theorem proves Lemma 2 in [BrosowskiDeutsh] p. 92 when A is empty, the trivial case. Here D is used to denote the set A of Lemma 2, because the variable A is used for the subalgebra. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

Hypotheses

Ref	Expression
stoweidlem18.1	|- F/_ t D
stoweidlem18.2	|- F/ t ph
stoweidlem18.3	|- F = ( t e. T |-> 1 )
stoweidlem18.4	|- T = U. J
stoweidlem18.5	|- ( ( ph /\ a e. RR ) -> ( t e. T |-> a ) e. A )
stoweidlem18.6	|- ( ph -> B e. ( Clsd ` J ) )
stoweidlem18.7	|- ( ph -> E e. RR+ )
stoweidlem18.8	|- ( ph -> D = (/) )

Assertion

Ref	Expression
stoweidlem18	|- ( ph -> E. x e. A ( A. t e. T ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) /\ A. t e. D ( x ` t ) < E /\ A. t e. B ( 1 - E ) < ( x ` t ) ) )

Distinct variable groups:   t, a, T   A, a   ph, a   x, t   x, A   x, B   x, D   x, E   x, F   x, T

Allowed substitution hints:   ph( x, t)   A( t)   B( t, a)   D( t, a)   E( t, a)   F( t, a)   J( x, t, a)

Proof of Theorem stoweidlem18

Step	Hyp	Ref	Expression
1		stoweidlem18.3	. . 3 |- F = ( t e. T |-> 1 )
2		1re 9642	. . . 4 |- 1 e. RR
3		stoweidlem18.5	. . . . 5 |- ( ( ph /\ a e. RR ) -> ( t e. T |-> a ) e. A )
4	3	stoweidlem4 37864	. . . 4 |- ( ( ph /\ 1 e. RR ) -> ( t e. T |-> 1 ) e. A )
5	2, 4	mpan2 677	. . 3 |- ( ph -> ( t e. T |-> 1 ) e. A )
6	1, 5	syl5eqel 2533	. 2 |- ( ph -> F e. A )
7		stoweidlem18.2	. . 3 |- F/ t ph
8		0le1 10137	. . . . . 6 |- 0 <_ 1
9		simpr 463	. . . . . . 7 |- ( ( ph /\ t e. T ) -> t e. T )
10	1	fvmpt2 5957	. . . . . . 7 |- ( ( t e. T /\ 1 e. RR ) -> ( F ` t ) = 1 )
11	9, 2, 10	sylancl 668	. . . . . 6 |- ( ( ph /\ t e. T ) -> ( F ` t ) = 1 )
12	8, 11	syl5breqr 4439	. . . . 5 |- ( ( ph /\ t e. T ) -> 0 <_ ( F ` t ) )
13		1le1 10240	. . . . . 6 |- 1 <_ 1
14	11, 13	syl6eqbr 4440	. . . . 5 |- ( ( ph /\ t e. T ) -> ( F ` t ) <_ 1 )
15	12, 14	jca 535	. . . 4 |- ( ( ph /\ t e. T ) -> ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) )
16	15	ex 436	. . 3 |- ( ph -> ( t e. T -> ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) ) )
17	7, 16	ralrimi 2788	. 2 |- ( ph -> A. t e. T ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) )
18		stoweidlem18.8	. . 3 |- ( ph -> D = (/) )
19		stoweidlem18.1	. . . . 5 |- F/_ t D
20		nfcv 2592	. . . . 5 |- F/_ t (/)
21	19, 20	nfeq 2603	. . . 4 |- F/ t D = (/)
22	21	rzalf 37338	. . 3 |- ( D = (/) -> A. t e. D ( F ` t ) < E )
23	18, 22	syl 17	. 2 |- ( ph -> A. t e. D ( F ` t ) < E )
24		1red 9658	. . . . . . 7 |- ( ph -> 1 e. RR )
25		stoweidlem18.7	. . . . . . 7 |- ( ph -> E e. RR+ )
26	24, 25	ltsubrpd 11370	. . . . . 6 |- ( ph -> ( 1 - E ) < 1 )
27	26	adantr 467	. . . . 5 |- ( ( ph /\ t e. B ) -> ( 1 - E ) < 1 )
28		stoweidlem18.6	. . . . . . . 8 |- ( ph -> B e. ( Clsd ` J ) )
29		stoweidlem18.4	. . . . . . . . 9 |- T = U. J
30	29	cldss 20044	. . . . . . . 8 |- ( B e. ( Clsd ` J ) -> B C_ T )
31	28, 30	syl 17	. . . . . . 7 |- ( ph -> B C_ T )
32	31	sselda 3432	. . . . . 6 |- ( ( ph /\ t e. B ) -> t e. T )
33	32, 2, 10	sylancl 668	. . . . 5 |- ( ( ph /\ t e. B ) -> ( F ` t ) = 1 )
34	27, 33	breqtrrd 4429	. . . 4 |- ( ( ph /\ t e. B ) -> ( 1 - E ) < ( F ` t ) )
35	34	ex 436	. . 3 |- ( ph -> ( t e. B -> ( 1 - E ) < ( F ` t ) ) )
36	7, 35	ralrimi 2788	. 2 |- ( ph -> A. t e. B ( 1 - E ) < ( F ` t ) )
37		nfcv 2592	. . . . . 6 |- F/_ t x
38		nfmpt1 4492	. . . . . . 7 |- F/_ t ( t e. T |-> 1 )
39	1, 38	nfcxfr 2590	. . . . . 6 |- F/_ t F
40	37, 39	nfeq 2603	. . . . 5 |- F/ t x = F
41		fveq1 5864	. . . . . . 7 |- ( x = F -> ( x ` t ) = ( F ` t ) )
42	41	breq2d 4414	. . . . . 6 |- ( x = F -> ( 0 <_ ( x ` t ) <-> 0 <_ ( F ` t ) ) )
43	41	breq1d 4412	. . . . . 6 |- ( x = F -> ( ( x ` t ) <_ 1 <-> ( F ` t ) <_ 1 ) )
44	42, 43	anbi12d 717	. . . . 5 |- ( x = F -> ( ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) <-> ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) ) )
45	40, 44	ralbid 2822	. . . 4 |- ( x = F -> ( A. t e. T ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) <-> A. t e. T ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) ) )
46	41	breq1d 4412	. . . . 5 |- ( x = F -> ( ( x ` t ) < E <-> ( F ` t ) < E ) )
47	40, 46	ralbid 2822	. . . 4 |- ( x = F -> ( A. t e. D ( x ` t ) < E <-> A. t e. D ( F ` t ) < E ) )
48	41	breq2d 4414	. . . . 5 |- ( x = F -> ( ( 1 - E ) < ( x ` t ) <-> ( 1 - E ) < ( F ` t ) ) )
49	40, 48	ralbid 2822	. . . 4 |- ( x = F -> ( A. t e. B ( 1 - E ) < ( x ` t ) <-> A. t e. B ( 1 - E ) < ( F ` t ) ) )
50	45, 47, 49	3anbi123d 1339	. . 3 |- ( x = F -> ( ( A. t e. T ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) /\ A. t e. D ( x ` t ) < E /\ A. t e. B ( 1 - E ) < ( x ` t ) ) <-> ( A. t e. T ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) /\ A. t e. D ( F ` t ) < E /\ A. t e. B ( 1 - E ) < ( F ` t ) ) ) )
51	50	rspcev 3150	. 2 |- ( ( F e. A /\ ( A. t e. T ( 0 <_ ( F ` t ) /\ ( F ` t ) <_ 1 ) /\ A. t e. D ( F ` t ) < E /\ A. t e. B ( 1 - E ) < ( F ` t ) ) ) -> E. x e. A ( A. t e. T ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) /\ A. t e. D ( x ` t ) < E /\ A. t e. B ( 1 - E ) < ( x ` t ) ) )
52	6, 17, 23, 36, 51	syl13anc 1270	1 |- ( ph -> E. x e. A ( A. t e. T ( 0 <_ ( x ` t ) /\ ( x ` t ) <_ 1 ) /\ A. t e. D ( x ` t ) < E /\ A. t e. B ( 1 - E ) < ( x ` t ) ) )

Syntax hints:   -> wi 4   /\ wa 371   /\ w3a 985   = wceq 1444   F/wnf 1667   e. wcel 1887   F/_wnfc 2579   A.wral 2737   E.wrex 2738   C_ wss 3404   (/)c0 3731   U.cuni 4198   class class class wbr 4402   |-> cmpt 4461   ` cfv 5582  (class class class)co 6290   RRcr 9538   0cc0 9539   1c1 9540   < clt 9675   <_ cle 9676   - cmin 9860   RR+crp 11302   Clsdccld 20031

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1669  ax-4 1682  ax-5 1758  ax-6 1805  ax-7 1851  ax-8 1889  ax-9 1896  ax-10 1915  ax-11 1920  ax-12 1933  ax-13 2091  ax-ext 2431  ax-sep 4525  ax-nul 4534  ax-pow 4581  ax-pr 4639  ax-un 6583  ax-resscn 9596  ax-1cn 9597  ax-icn 9598  ax-addcl 9599  ax-addrcl 9600  ax-mulcl 9601  ax-mulrcl 9602  ax-mulcom 9603  ax-addass 9604  ax-mulass 9605  ax-distr 9606  ax-i2m1 9607  ax-1ne0 9608  ax-1rid 9609  ax-rnegex 9610  ax-rrecex 9611  ax-cnre 9612  ax-pre-lttri 9613  ax-pre-lttrn 9614  ax-pre-ltadd 9615  ax-pre-mulgt0 9616

This theorem depends on definitions:  df-bi 189  df-or 372  df-an 373  df-3or 986  df-3an 987  df-tru 1447  df-ex 1664  df-nf 1668  df-sb 1798  df-eu 2303  df-mo 2304  df-clab 2438  df-cleq 2444  df-clel 2447  df-nfc 2581  df-ne 2624  df-nel 2625  df-ral 2742  df-rex 2743  df-reu 2744  df-rab 2746  df-v 3047  df-sbc 3268  df-csb 3364  df-dif 3407  df-un 3409  df-in 3411  df-ss 3418  df-nul 3732  df-if 3882  df-pw 3953  df-sn 3969  df-pr 3971  df-op 3975  df-uni 4199  df-br 4403  df-opab 4462  df-mpt 4463  df-id 4749  df-po 4755  df-so 4756  df-xp 4840  df-rel 4841  df-cnv 4842  df-co 4843  df-dm 4844  df-rn 4845  df-res 4846  df-ima 4847  df-iota 5546  df-fun 5584  df-fn 5585  df-f 5586  df-f1 5587  df-fo 5588  df-f1o 5589  df-fv 5590  df-riota 6252  df-ov 6293  df-oprab 6294  df-mpt2 6295  df-er 7363  df-en 7570  df-dom 7571  df-sdom 7572  df-pnf 9677  df-mnf 9678  df-xr 9679  df-ltxr 9680  df-le 9681  df-sub 9862  df-neg 9863  df-rp 11303  df-top 19921  df-cld 20034

This theorem is referenced by:  stoweidlem58  37919