Theorem subcn2 11311

Description: Complex number subtraction is a continuous function. Part of Proposition 14-4.16 of [Gleason] p. 243. (Contributed by Mario Carneiro, 31-Jan-2014.)

Assertion

Ref	Expression
subcn2	|- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> E. y e. RR+ E. z e. RR+ A. u e. CC A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) )

Distinct variable groups:   v, u, y, z, A   u, B, v, y, z   u, C, v, y, z

Proof of Theorem subcn2

Dummy variable w is distinct from all other variables.

Step	Hyp	Ref	Expression
1		negcl 8152	. . 3 |- ( C e. CC -> -u C e. CC )
2		addcn2 11310	. . 3 |- ( ( A e. RR+ /\ B e. CC /\ -u C e. CC ) -> E. y e. RR+ E. z e. RR+ A. u e. CC A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) )
3	1, 2	syl3an3 1273	. 2 |- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> E. y e. RR+ E. z e. RR+ A. u e. CC A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) )
4		negcl 8152	. . . . . . . . 9 |- ( v e. CC -> -u v e. CC )
5		oveq1 5878	. . . . . . . . . . . . . 14 |- ( w = -u v -> ( w - -u C ) = ( -u v - -u C ) )
6	5	fveq2d 5517	. . . . . . . . . . . . 13 |- ( w = -u v -> ( abs ` ( w - -u C ) ) = ( abs ` ( -u v - -u C ) ) )
7	6	breq1d 4012	. . . . . . . . . . . 12 |- ( w = -u v -> ( ( abs ` ( w - -u C ) ) < z <-> ( abs ` ( -u v - -u C ) ) < z ) )
8	7	anbi2d 464	. . . . . . . . . . 11 |- ( w = -u v -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) <-> ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) ) )
9		oveq2 5879	. . . . . . . . . . . . . 14 |- ( w = -u v -> ( u + w ) = ( u + -u v ) )
10	9	oveq1d 5886	. . . . . . . . . . . . 13 |- ( w = -u v -> ( ( u + w ) - ( B + -u C ) ) = ( ( u + -u v ) - ( B + -u C ) ) )
11	10	fveq2d 5517	. . . . . . . . . . . 12 |- ( w = -u v -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) = ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) )
12	11	breq1d 4012	. . . . . . . . . . 11 |- ( w = -u v -> ( ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A <-> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) )
13	8, 12	imbi12d 234	. . . . . . . . . 10 |- ( w = -u v -> ( ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) <-> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) ) )
14	13	rspcv 2837	. . . . . . . . 9 |- ( -u v e. CC -> ( A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) ) )
15	4, 14	syl 14	. . . . . . . 8 |- ( v e. CC -> ( A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) ) )
16	15	adantl 277	. . . . . . 7 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) ) )
17		simpr 110	. . . . . . . . . . . . 13 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> v e. CC )
18		simpll3 1038	. . . . . . . . . . . . 13 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> C e. CC )
19	17, 18	neg2subd 8280	. . . . . . . . . . . 12 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( -u v - -u C ) = ( C - v ) )
20	19	fveq2d 5517	. . . . . . . . . . 11 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( abs ` ( -u v - -u C ) ) = ( abs ` ( C - v ) ) )
21	18, 17	abssubd 11194	. . . . . . . . . . 11 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( abs ` ( C - v ) ) = ( abs ` ( v - C ) ) )
22	20, 21	eqtrd 2210	. . . . . . . . . 10 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( abs ` ( -u v - -u C ) ) = ( abs ` ( v - C ) ) )
23	22	breq1d 4012	. . . . . . . . 9 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( ( abs ` ( -u v - -u C ) ) < z <-> ( abs ` ( v - C ) ) < z ) )
24	23	anbi2d 464	. . . . . . . 8 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) <-> ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) ) )
25		negsub 8200	. . . . . . . . . . . 12 |- ( ( u e. CC /\ v e. CC ) -> ( u + -u v ) = ( u - v ) )
26	25	adantll 476	. . . . . . . . . . 11 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( u + -u v ) = ( u - v ) )
27		simpll2 1037	. . . . . . . . . . . 12 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> B e. CC )
28	27, 18	negsubd 8269	. . . . . . . . . . 11 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( B + -u C ) = ( B - C ) )
29	26, 28	oveq12d 5889	. . . . . . . . . 10 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( ( u + -u v ) - ( B + -u C ) ) = ( ( u - v ) - ( B - C ) ) )
30	29	fveq2d 5517	. . . . . . . . 9 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) = ( abs ` ( ( u - v ) - ( B - C ) ) ) )
31	30	breq1d 4012	. . . . . . . 8 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A <-> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) )
32	24, 31	imbi12d 234	. . . . . . 7 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( -u v - -u C ) ) < z ) -> ( abs ` ( ( u + -u v ) - ( B + -u C ) ) ) < A ) <-> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
33	16, 32	sylibd 149	. . . . . 6 |- ( ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) /\ v e. CC ) -> ( A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
34	33	ralrimdva 2557	. . . . 5 |- ( ( ( A e. RR+ /\ B e. CC /\ C e. CC ) /\ u e. CC ) -> ( A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
35	34	ralimdva 2544	. . . 4 |- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> ( A. u e. CC A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> A. u e. CC A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
36	35	reximdv 2578	. . 3 |- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> ( E. z e. RR+ A. u e. CC A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> E. z e. RR+ A. u e. CC A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
37	36	reximdv 2578	. 2 |- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> ( E. y e. RR+ E. z e. RR+ A. u e. CC A. w e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( w - -u C ) ) < z ) -> ( abs ` ( ( u + w ) - ( B + -u C ) ) ) < A ) -> E. y e. RR+ E. z e. RR+ A. u e. CC A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) ) )
38	3, 37	mpd 13	1 |- ( ( A e. RR+ /\ B e. CC /\ C e. CC ) -> E. y e. RR+ E. z e. RR+ A. u e. CC A. v e. CC ( ( ( abs ` ( u - B ) ) < y /\ ( abs ` ( v - C ) ) < z ) -> ( abs ` ( ( u - v ) - ( B - C ) ) ) < A ) )

Syntax hints:   -> wi 4   /\ wa 104   /\ w3a 978   = wceq 1353   e. wcel 2148   A.wral 2455   E.wrex 2456   class class class wbr 4002   ` cfv 5214  (class class class)co 5871   CCcc 7805   + caddc 7810   < clt 7987   - cmin 8123   -ucneg 8124   RR+crp 9648   abscabs 10998

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4117  ax-sep 4120  ax-nul 4128  ax-pow 4173  ax-pr 4208  ax-un 4432  ax-setind 4535  ax-iinf 4586  ax-cnex 7898  ax-resscn 7899  ax-1cn 7900  ax-1re 7901  ax-icn 7902  ax-addcl 7903  ax-addrcl 7904  ax-mulcl 7905  ax-mulrcl 7906  ax-addcom 7907  ax-mulcom 7908  ax-addass 7909  ax-mulass 7910  ax-distr 7911  ax-i2m1 7912  ax-0lt1 7913  ax-1rid 7914  ax-0id 7915  ax-rnegex 7916  ax-precex 7917  ax-cnre 7918  ax-pre-ltirr 7919  ax-pre-ltwlin 7920  ax-pre-lttrn 7921  ax-pre-apti 7922  ax-pre-ltadd 7923  ax-pre-mulgt0 7924  ax-pre-mulext 7925  ax-arch 7926  ax-caucvg 7927

This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-reu 2462  df-rmo 2463  df-rab 2464  df-v 2739  df-sbc 2963  df-csb 3058  df-dif 3131  df-un 3133  df-in 3135  df-ss 3142  df-nul 3423  df-if 3535  df-pw 3577  df-sn 3598  df-pr 3599  df-op 3601  df-uni 3810  df-int 3845  df-iun 3888  df-br 4003  df-opab 4064  df-mpt 4065  df-tr 4101  df-id 4292  df-po 4295  df-iso 4296  df-iord 4365  df-on 4367  df-ilim 4368  df-suc 4370  df-iom 4589  df-xp 4631  df-rel 4632  df-cnv 4633  df-co 4634  df-dm 4635  df-rn 4636  df-res 4637  df-ima 4638  df-iota 5176  df-fun 5216  df-fn 5217  df-f 5218  df-f1 5219  df-fo 5220  df-f1o 5221  df-fv 5222  df-riota 5827  df-ov 5874  df-oprab 5875  df-mpo 5876  df-1st 6137  df-2nd 6138  df-recs 6302  df-frec 6388  df-pnf 7989  df-mnf 7990  df-xr 7991  df-ltxr 7992  df-le 7993  df-sub 8125  df-neg 8126  df-reap 8527  df-ap 8534  df-div 8625  df-inn 8915  df-2 8973  df-3 8974  df-4 8975  df-n0 9172  df-z 9249  df-uz 9524  df-rp 9649  df-seqfrec 10440  df-exp 10514  df-cj 10843  df-re 10844  df-im 10845  df-rsqrt 10999  df-abs 11000

This theorem is referenced by:  climsub  11328  subcncntop  13915