Theorem stoweidlem23 37883

Description: This lemma is used to prove the existence of a function p_t as in the beginning of Lemma 1 [BrosowskiDeutsh] p. 90: for all t in T - U, there exists a function p in the subalgebra, such that p_t ( t₀ ) = 0 , p_t ( t ) > 0, and 0 <= p_t <= 1. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

Hypotheses

Ref	Expression
stoweidlem23.1	|- F/ t ph
stoweidlem23.2	|- F/_ t G
stoweidlem23.3	|- H = ( t e. T |-> ( ( G ` t ) - ( G ` Z ) ) )
stoweidlem23.4	|- ( ( ph /\ f e. A ) -> f : T --> RR )
stoweidlem23.5	|- ( ( ph /\ f e. A /\ g e. A ) -> ( t e. T |-> ( ( f ` t ) + ( g ` t ) ) ) e. A )
stoweidlem23.6	|- ( ( ph /\ x e. RR ) -> ( t e. T |-> x ) e. A )
stoweidlem23.7	|- ( ph -> S e. T )
stoweidlem23.8	|- ( ph -> Z e. T )
stoweidlem23.9	|- ( ph -> G e. A )
stoweidlem23.10	|- ( ph -> ( G ` S ) =/= ( G ` Z ) )

Assertion

Ref	Expression
stoweidlem23	|- ( ph -> ( H e. A /\ ( H ` S ) =/= ( H ` Z ) /\ ( H ` Z ) = 0 ) )

Distinct variable groups:   f, g, t, T   A, f, g   f, G, g   ph, f, g   g, Z, t   x, t, T   t, S   x, A   x, G   x, Z   ph, x

Allowed substitution hints:   ph( t)   A( t)   S( x, f, g)   G( t)   H( x, t, f, g)   Z( f)

Proof of Theorem stoweidlem23

Step	Hyp	Ref	Expression
1		stoweidlem23.3	. . 3 |- H = ( t e. T |-> ( ( G ` t ) - ( G ` Z ) ) )
2		stoweidlem23.1	. . . . 5 |- F/ t ph
3		stoweidlem23.9	. . . . . . . . 9 |- ( ph -> G e. A )
4	3	ancli 554	. . . . . . . . 9 |- ( ph -> ( ph /\ G e. A ) )
5		eleq1 2517	. . . . . . . . . . . 12 |- ( f = G -> ( f e. A <-> G e. A ) )
6	5	anbi2d 710	. . . . . . . . . . 11 |- ( f = G -> ( ( ph /\ f e. A ) <-> ( ph /\ G e. A ) ) )
7		feq1 5710	. . . . . . . . . . 11 |- ( f = G -> ( f : T --> RR <-> G : T --> RR ) )
8	6, 7	imbi12d 322	. . . . . . . . . 10 |- ( f = G -> ( ( ( ph /\ f e. A ) -> f : T --> RR ) <-> ( ( ph /\ G e. A ) -> G : T --> RR ) ) )
9		stoweidlem23.4	. . . . . . . . . 10 |- ( ( ph /\ f e. A ) -> f : T --> RR )
10	8, 9	vtoclg 3107	. . . . . . . . 9 |- ( G e. A -> ( ( ph /\ G e. A ) -> G : T --> RR ) )
11	3, 4, 10	sylc 62	. . . . . . . 8 |- ( ph -> G : T --> RR )
12	11	fnvinran 37335	. . . . . . 7 |- ( ( ph /\ t e. T ) -> ( G ` t ) e. RR )
13	12	recnd 9669	. . . . . 6 |- ( ( ph /\ t e. T ) -> ( G ` t ) e. CC )
14		stoweidlem23.8	. . . . . . . . 9 |- ( ph -> Z e. T )
15	11, 14	ffvelrnd 6023	. . . . . . . 8 |- ( ph -> ( G ` Z ) e. RR )
16	15	adantr 467	. . . . . . 7 |- ( ( ph /\ t e. T ) -> ( G ` Z ) e. RR )
17	16	recnd 9669	. . . . . 6 |- ( ( ph /\ t e. T ) -> ( G ` Z ) e. CC )
18	13, 17	negsubd 9992	. . . . 5 |- ( ( ph /\ t e. T ) -> ( ( G ` t ) + -u ( G ` Z ) ) = ( ( G ` t ) - ( G ` Z ) ) )
19	2, 18	mpteq2da 4488	. . . 4 |- ( ph -> ( t e. T |-> ( ( G ` t ) + -u ( G ` Z ) ) ) = ( t e. T |-> ( ( G ` t ) - ( G ` Z ) ) ) )
20		simpr 463	. . . . . . . 8 |- ( ( ph /\ t e. T ) -> t e. T )
21	15	renegcld 10046	. . . . . . . . 9 |- ( ph -> -u ( G ` Z ) e. RR )
22	21	adantr 467	. . . . . . . 8 |- ( ( ph /\ t e. T ) -> -u ( G ` Z ) e. RR )
23		eqid 2451	. . . . . . . . 9 |- ( t e. T |-> -u ( G ` Z ) ) = ( t e. T |-> -u ( G ` Z ) )
24	23	fvmpt2 5957	. . . . . . . 8 |- ( ( t e. T /\ -u ( G ` Z ) e. RR ) -> ( ( t e. T |-> -u ( G ` Z ) ) ` t ) = -u ( G ` Z ) )
25	20, 22, 24	syl2anc 667	. . . . . . 7 |- ( ( ph /\ t e. T ) -> ( ( t e. T |-> -u ( G ` Z ) ) ` t ) = -u ( G ` Z ) )
26	25	oveq2d 6306	. . . . . 6 |- ( ( ph /\ t e. T ) -> ( ( G ` t ) + ( ( t e. T |-> -u ( G ` Z ) ) ` t ) ) = ( ( G ` t ) + -u ( G ` Z ) ) )
27	2, 26	mpteq2da 4488	. . . . 5 |- ( ph -> ( t e. T |-> ( ( G ` t ) + ( ( t e. T |-> -u ( G ` Z ) ) ` t ) ) ) = ( t e. T |-> ( ( G ` t ) + -u ( G ` Z ) ) ) )
28	21	ancli 554	. . . . . . 7 |- ( ph -> ( ph /\ -u ( G ` Z ) e. RR ) )
29		eleq1 2517	. . . . . . . . . 10 |- ( x = -u ( G ` Z ) -> ( x e. RR <-> -u ( G ` Z ) e. RR ) )
30	29	anbi2d 710	. . . . . . . . 9 |- ( x = -u ( G ` Z ) -> ( ( ph /\ x e. RR ) <-> ( ph /\ -u ( G ` Z ) e. RR ) ) )
31		stoweidlem23.2	. . . . . . . . . . . . . 14 |- F/_ t G
32		nfcv 2592	. . . . . . . . . . . . . 14 |- F/_ t Z
33	31, 32	nffv 5872	. . . . . . . . . . . . 13 |- F/_ t ( G ` Z )
34	33	nfneg 9871	. . . . . . . . . . . 12 |- F/_ t -u ( G ` Z )
35	34	nfeq2 2607	. . . . . . . . . . 11 |- F/ t x = -u ( G ` Z )
36		simpl 459	. . . . . . . . . . 11 |- ( ( x = -u ( G ` Z ) /\ t e. T ) -> x = -u ( G ` Z ) )
37	35, 36	mpteq2da 4488	. . . . . . . . . 10 |- ( x = -u ( G ` Z ) -> ( t e. T |-> x ) = ( t e. T |-> -u ( G ` Z ) ) )
38	37	eleq1d 2513	. . . . . . . . 9 |- ( x = -u ( G ` Z ) -> ( ( t e. T |-> x ) e. A <-> ( t e. T |-> -u ( G ` Z ) ) e. A ) )
39	30, 38	imbi12d 322	. . . . . . . 8 |- ( x = -u ( G ` Z ) -> ( ( ( ph /\ x e. RR ) -> ( t e. T |-> x ) e. A ) <-> ( ( ph /\ -u ( G ` Z ) e. RR ) -> ( t e. T |-> -u ( G ` Z ) ) e. A ) ) )
40		stoweidlem23.6	. . . . . . . 8 |- ( ( ph /\ x e. RR ) -> ( t e. T |-> x ) e. A )
41	39, 40	vtoclg 3107	. . . . . . 7 |- ( -u ( G ` Z ) e. RR -> ( ( ph /\ -u ( G ` Z ) e. RR ) -> ( t e. T |-> -u ( G ` Z ) ) e. A ) )
42	21, 28, 41	sylc 62	. . . . . 6 |- ( ph -> ( t e. T |-> -u ( G ` Z ) ) e. A )
43		stoweidlem23.5	. . . . . . 7 |- ( ( ph /\ f e. A /\ g e. A ) -> ( t e. T |-> ( ( f ` t ) + ( g ` t ) ) ) e. A )
44		nfmpt1 4492	. . . . . . 7 |- F/_ t ( t e. T |-> -u ( G ` Z ) )
45	43, 31, 44	stoweidlem8 37868	. . . . . 6 |- ( ( ph /\ G e. A /\ ( t e. T |-> -u ( G ` Z ) ) e. A ) -> ( t e. T |-> ( ( G ` t ) + ( ( t e. T |-> -u ( G ` Z ) ) ` t ) ) ) e. A )
46	3, 42, 45	mpd3an23 1366	. . . . 5 |- ( ph -> ( t e. T |-> ( ( G ` t ) + ( ( t e. T |-> -u ( G ` Z ) ) ` t ) ) ) e. A )
47	27, 46	eqeltrrd 2530	. . . 4 |- ( ph -> ( t e. T |-> ( ( G ` t ) + -u ( G ` Z ) ) ) e. A )
48	19, 47	eqeltrrd 2530	. . 3 |- ( ph -> ( t e. T |-> ( ( G ` t ) - ( G ` Z ) ) ) e. A )
49	1, 48	syl5eqel 2533	. 2 |- ( ph -> H e. A )
50		stoweidlem23.7	. . . . . 6 |- ( ph -> S e. T )
51	11, 50	ffvelrnd 6023	. . . . 5 |- ( ph -> ( G ` S ) e. RR )
52	51	recnd 9669	. . . 4 |- ( ph -> ( G ` S ) e. CC )
53	15	recnd 9669	. . . 4 |- ( ph -> ( G ` Z ) e. CC )
54		stoweidlem23.10	. . . 4 |- ( ph -> ( G ` S ) =/= ( G ` Z ) )
55	52, 53, 54	subne0d 9995	. . 3 |- ( ph -> ( ( G ` S ) - ( G ` Z ) ) =/= 0 )
56	51, 15	resubcld 10047	. . . 4 |- ( ph -> ( ( G ` S ) - ( G ` Z ) ) e. RR )
57		nfcv 2592	. . . . 5 |- F/_ t S
58	31, 57	nffv 5872	. . . . . 6 |- F/_ t ( G ` S )
59		nfcv 2592	. . . . . 6 |- F/_ t -
60	58, 59, 33	nfov 6316	. . . . 5 |- F/_ t ( ( G ` S ) - ( G ` Z ) )
61		fveq2 5865	. . . . . 6 |- ( t = S -> ( G ` t ) = ( G ` S ) )
62	61	oveq1d 6305	. . . . 5 |- ( t = S -> ( ( G ` t ) - ( G ` Z ) ) = ( ( G ` S ) - ( G ` Z ) ) )
63	57, 60, 62, 1	fvmptf 5966	. . . 4 |- ( ( S e. T /\ ( ( G ` S ) - ( G ` Z ) ) e. RR ) -> ( H ` S ) = ( ( G ` S ) - ( G ` Z ) ) )
64	50, 56, 63	syl2anc 667	. . 3 |- ( ph -> ( H ` S ) = ( ( G ` S ) - ( G ` Z ) ) )
65	15, 15	resubcld 10047	. . . . 5 |- ( ph -> ( ( G ` Z ) - ( G ` Z ) ) e. RR )
66	33, 59, 33	nfov 6316	. . . . . 6 |- F/_ t ( ( G ` Z ) - ( G ` Z ) )
67		fveq2 5865	. . . . . . 7 |- ( t = Z -> ( G ` t ) = ( G ` Z ) )
68	67	oveq1d 6305	. . . . . 6 |- ( t = Z -> ( ( G ` t ) - ( G ` Z ) ) = ( ( G ` Z ) - ( G ` Z ) ) )
69	32, 66, 68, 1	fvmptf 5966	. . . . 5 |- ( ( Z e. T /\ ( ( G ` Z ) - ( G ` Z ) ) e. RR ) -> ( H ` Z ) = ( ( G ` Z ) - ( G ` Z ) ) )
70	14, 65, 69	syl2anc 667	. . . 4 |- ( ph -> ( H ` Z ) = ( ( G ` Z ) - ( G ` Z ) ) )
71	53	subidd 9974	. . . 4 |- ( ph -> ( ( G ` Z ) - ( G ` Z ) ) = 0 )
72	70, 71	eqtrd 2485	. . 3 |- ( ph -> ( H ` Z ) = 0 )
73	55, 64, 72	3netr4d 2701	. 2 |- ( ph -> ( H ` S ) =/= ( H ` Z ) )
74	49, 73, 72	3jca 1188	1 |- ( ph -> ( H e. A /\ ( H ` S ) =/= ( H ` Z ) /\ ( H ` Z ) = 0 ) )

Syntax hints:   -> wi 4   /\ wa 371   /\ w3a 985   = wceq 1444   F/wnf 1667   e. wcel 1887   F/_wnfc 2579   =/= wne 2622   |-> cmpt 4461   -->wf 5578   ` cfv 5582  (class class class)co 6290   RRcr 9538   0cc0 9539   + caddc 9542   - cmin 9860   -ucneg 9861

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

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-ltxr 9680  df-sub 9862  df-neg 9863

This theorem is referenced by:  stoweidlem43  37904