Theorem iccf1o 10018

Description: Describe a bijection from [ 0 , 1 ] to an arbitrary nontrivial closed interval [ A , B ]. (Contributed by Mario Carneiro, 8-Sep-2015.)

Hypothesis

Ref	Expression
iccf1o.1	|- F = ( x e. ( 0 [,] 1 ) |-> ( ( x x. B ) + ( ( 1 - x ) x. A ) ) )

Assertion

Ref	Expression
iccf1o	|- ( ( A e. RR /\ B e. RR /\ A < B ) -> ( F : ( 0 [,] 1 ) -1-1-onto-> ( A [,] B ) /\ `' F = ( y e. ( A [,] B ) |-> ( ( y - A ) / ( B - A ) ) ) ) )

Distinct variable groups:   x, y, A   x, B, y

Allowed substitution hints:   F( x, y)

Proof of Theorem iccf1o

Step	Hyp	Ref	Expression
1		iccf1o.1	. 2 |- F = ( x e. ( 0 [,] 1 ) |-> ( ( x x. B ) + ( ( 1 - x ) x. A ) ) )
2		0re 7971	. . . . . . . . 9 |- 0 e. RR
3		1re 7970	. . . . . . . . 9 |- 1 e. RR
4	2, 3	elicc2i 9953	. . . . . . . 8 |- ( x e. ( 0 [,] 1 ) <-> ( x e. RR /\ 0 <_ x /\ x <_ 1 ) )
5	4	simp1bi 1013	. . . . . . 7 |- ( x e. ( 0 [,] 1 ) -> x e. RR )
6	5	adantl 277	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> x e. RR )
7	6	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> x e. CC )
8		simpl2 1002	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> B e. RR )
9	8	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> B e. CC )
10	7, 9	mulcld 7992	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( x x. B ) e. CC )
11		ax-1cn 7918	. . . . . 6 |- 1 e. CC
12		subcl 8170	. . . . . 6 |- ( ( 1 e. CC /\ x e. CC ) -> ( 1 - x ) e. CC )
13	11, 7, 12	sylancr 414	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( 1 - x ) e. CC )
14		simpl1 1001	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> A e. RR )
15	14	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> A e. CC )
16	13, 15	mulcld 7992	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( 1 - x ) x. A ) e. CC )
17	10, 16	addcomd 8122	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( x x. B ) + ( ( 1 - x ) x. A ) ) = ( ( ( 1 - x ) x. A ) + ( x x. B ) ) )
18		lincmb01cmp 10017	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( ( 1 - x ) x. A ) + ( x x. B ) ) e. ( A [,] B ) )
19	17, 18	eqeltrd 2264	. 2 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( x x. B ) + ( ( 1 - x ) x. A ) ) e. ( A [,] B ) )
20		simpr 110	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> y e. ( A [,] B ) )
21		simpl1 1001	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> A e. RR )
22		simpl2 1002	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> B e. RR )
23		elicc2 9952	. . . . . . . . 9 |- ( ( A e. RR /\ B e. RR ) -> ( y e. ( A [,] B ) <-> ( y e. RR /\ A <_ y /\ y <_ B ) ) )
24	23	3adant3 1018	. . . . . . . 8 |- ( ( A e. RR /\ B e. RR /\ A < B ) -> ( y e. ( A [,] B ) <-> ( y e. RR /\ A <_ y /\ y <_ B ) ) )
25	24	biimpa 296	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( y e. RR /\ A <_ y /\ y <_ B ) )
26	25	simp1d 1010	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> y e. RR )
27		eqid 2187	. . . . . . 7 |- ( A - A ) = ( A - A )
28		eqid 2187	. . . . . . 7 |- ( B - A ) = ( B - A )
29	27, 28	iccshftl 10010	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR ) /\ ( y e. RR /\ A e. RR ) ) -> ( y e. ( A [,] B ) <-> ( y - A ) e. ( ( A - A ) [,] ( B - A ) ) ) )
30	21, 22, 26, 21, 29	syl22anc 1249	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( y e. ( A [,] B ) <-> ( y - A ) e. ( ( A - A ) [,] ( B - A ) ) ) )
31	20, 30	mpbid 147	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( y - A ) e. ( ( A - A ) [,] ( B - A ) ) )
32	26, 21	resubcld 8352	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( y - A ) e. RR )
33	32	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( y - A ) e. CC )
34		difrp 9706	. . . . . . . 8 |- ( ( A e. RR /\ B e. RR ) -> ( A < B <-> ( B - A ) e. RR+ ) )
35	34	biimp3a 1355	. . . . . . 7 |- ( ( A e. RR /\ B e. RR /\ A < B ) -> ( B - A ) e. RR+ )
36	35	adantr 276	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( B - A ) e. RR+ )
37	36	rpcnd 9712	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( B - A ) e. CC )
38		rpap0 9684	. . . . . 6 |- ( ( B - A ) e. RR+ -> ( B - A ) # 0 )
39	36, 38	syl 14	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( B - A ) # 0 )
40	33, 37, 39	divcanap1d 8762	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( ( y - A ) / ( B - A ) ) x. ( B - A ) ) = ( y - A ) )
41	37	mul02d 8363	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( 0 x. ( B - A ) ) = 0 )
42	21	recnd 8000	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> A e. CC )
43	42	subidd 8270	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( A - A ) = 0 )
44	41, 43	eqtr4d 2223	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( 0 x. ( B - A ) ) = ( A - A ) )
45	37	mulid2d 7990	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( 1 x. ( B - A ) ) = ( B - A ) )
46	44, 45	oveq12d 5906	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( 0 x. ( B - A ) ) [,] ( 1 x. ( B - A ) ) ) = ( ( A - A ) [,] ( B - A ) ) )
47	31, 40, 46	3eltr4d 2271	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( ( y - A ) / ( B - A ) ) x. ( B - A ) ) e. ( ( 0 x. ( B - A ) ) [,] ( 1 x. ( B - A ) ) ) )
48		0red 7972	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> 0 e. RR )
49		1red 7986	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> 1 e. RR )
50	32, 36	rerpdivcld 9742	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( y - A ) / ( B - A ) ) e. RR )
51		eqid 2187	. . . . 5 |- ( 0 x. ( B - A ) ) = ( 0 x. ( B - A ) )
52		eqid 2187	. . . . 5 |- ( 1 x. ( B - A ) ) = ( 1 x. ( B - A ) )
53	51, 52	iccdil 10012	. . . 4 |- ( ( ( 0 e. RR /\ 1 e. RR ) /\ ( ( ( y - A ) / ( B - A ) ) e. RR /\ ( B - A ) e. RR+ ) ) -> ( ( ( y - A ) / ( B - A ) ) e. ( 0 [,] 1 ) <-> ( ( ( y - A ) / ( B - A ) ) x. ( B - A ) ) e. ( ( 0 x. ( B - A ) ) [,] ( 1 x. ( B - A ) ) ) ) )
54	48, 49, 50, 36, 53	syl22anc 1249	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( ( y - A ) / ( B - A ) ) e. ( 0 [,] 1 ) <-> ( ( ( y - A ) / ( B - A ) ) x. ( B - A ) ) e. ( ( 0 x. ( B - A ) ) [,] ( 1 x. ( B - A ) ) ) ) )
55	47, 54	mpbird 167	. 2 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ y e. ( A [,] B ) ) -> ( ( y - A ) / ( B - A ) ) e. ( 0 [,] 1 ) )
56		eqcom 2189	. . . 4 |- ( x = ( ( y - A ) / ( B - A ) ) <-> ( ( y - A ) / ( B - A ) ) = x )
57	33	adantrl 478	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( y - A ) e. CC )
58	7	adantrr 479	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> x e. CC )
59	37	adantrl 478	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( B - A ) e. CC )
60	39	adantrl 478	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( B - A ) # 0 )
61	57, 58, 59, 60	divmulap3d 8796	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( ( ( y - A ) / ( B - A ) ) = x <-> ( y - A ) = ( x x. ( B - A ) ) ) )
62	56, 61	bitrid 192	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( x = ( ( y - A ) / ( B - A ) ) <-> ( y - A ) = ( x x. ( B - A ) ) ) )
63	26	adantrl 478	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> y e. RR )
64	63	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> y e. CC )
65	42	adantrl 478	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> A e. CC )
66	8, 14	resubcld 8352	. . . . . . . 8 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( B - A ) e. RR )
67	6, 66	remulcld 8002	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( x x. ( B - A ) ) e. RR )
68	67	adantrr 479	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( x x. ( B - A ) ) e. RR )
69	68	recnd 8000	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( x x. ( B - A ) ) e. CC )
70	64, 65, 69	subadd2d 8301	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( ( y - A ) = ( x x. ( B - A ) ) <-> ( ( x x. ( B - A ) ) + A ) = y ) )
71		eqcom 2189	. . . 4 |- ( ( ( x x. ( B - A ) ) + A ) = y <-> y = ( ( x x. ( B - A ) ) + A ) )
72	70, 71	bitrdi 196	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( ( y - A ) = ( x x. ( B - A ) ) <-> y = ( ( x x. ( B - A ) ) + A ) ) )
73	7, 15	mulcld 7992	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( x x. A ) e. CC )
74	10, 73, 15	subadd23d 8304	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( ( x x. B ) - ( x x. A ) ) + A ) = ( ( x x. B ) + ( A - ( x x. A ) ) ) )
75	7, 9, 15	subdid 8385	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( x x. ( B - A ) ) = ( ( x x. B ) - ( x x. A ) ) )
76	75	oveq1d 5903	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( x x. ( B - A ) ) + A ) = ( ( ( x x. B ) - ( x x. A ) ) + A ) )
77		1cnd 7987	. . . . . . . . 9 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> 1 e. CC )
78	77, 7, 15	subdird 8386	. . . . . . . 8 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( 1 - x ) x. A ) = ( ( 1 x. A ) - ( x x. A ) ) )
79	15	mulid2d 7990	. . . . . . . . 9 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( 1 x. A ) = A )
80	79	oveq1d 5903	. . . . . . . 8 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( 1 x. A ) - ( x x. A ) ) = ( A - ( x x. A ) ) )
81	78, 80	eqtrd 2220	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( 1 - x ) x. A ) = ( A - ( x x. A ) ) )
82	81	oveq2d 5904	. . . . . 6 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( x x. B ) + ( ( 1 - x ) x. A ) ) = ( ( x x. B ) + ( A - ( x x. A ) ) ) )
83	74, 76, 82	3eqtr4d 2230	. . . . 5 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ x e. ( 0 [,] 1 ) ) -> ( ( x x. ( B - A ) ) + A ) = ( ( x x. B ) + ( ( 1 - x ) x. A ) ) )
84	83	adantrr 479	. . . 4 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( ( x x. ( B - A ) ) + A ) = ( ( x x. B ) + ( ( 1 - x ) x. A ) ) )
85	84	eqeq2d 2199	. . 3 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( y = ( ( x x. ( B - A ) ) + A ) <-> y = ( ( x x. B ) + ( ( 1 - x ) x. A ) ) ) )
86	62, 72, 85	3bitrd 214	. 2 |- ( ( ( A e. RR /\ B e. RR /\ A < B ) /\ ( x e. ( 0 [,] 1 ) /\ y e. ( A [,] B ) ) ) -> ( x = ( ( y - A ) / ( B - A ) ) <-> y = ( ( x x. B ) + ( ( 1 - x ) x. A ) ) ) )
87	1, 19, 55, 86	f1ocnv2d 6089	1 |- ( ( A e. RR /\ B e. RR /\ A < B ) -> ( F : ( 0 [,] 1 ) -1-1-onto-> ( A [,] B ) /\ `' F = ( y e. ( A [,] B ) |-> ( ( y - A ) / ( B - A ) ) ) ) )

Syntax hints:   -> wi 4   /\ wa 104   <-> wb 105   /\ w3a 979   = wceq 1363   e. wcel 2158   class class class wbr 4015   |-> cmpt 4076   `'ccnv 4637   -1-1-onto->wf1o 5227  (class class class)co 5888   CCcc 7823   RRcr 7824   0cc0 7825   1c1 7826   + caddc 7828   x. cmul 7830   < clt 8006   <_ cle 8007   - cmin 8142   # cap 8552   / cdiv 8643   RR+crp 9667   [,]cicc 9905

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 615  ax-in2 616  ax-io 710  ax-5 1457  ax-7 1458  ax-gen 1459  ax-ie1 1503  ax-ie2 1504  ax-8 1514  ax-10 1515  ax-11 1516  ax-i12 1517  ax-bndl 1519  ax-4 1520  ax-17 1536  ax-i9 1540  ax-ial 1544  ax-i5r 1545  ax-13 2160  ax-14 2161  ax-ext 2169  ax-sep 4133  ax-pow 4186  ax-pr 4221  ax-un 4445  ax-setind 4548  ax-cnex 7916  ax-resscn 7917  ax-1cn 7918  ax-1re 7919  ax-icn 7920  ax-addcl 7921  ax-addrcl 7922  ax-mulcl 7923  ax-mulrcl 7924  ax-addcom 7925  ax-mulcom 7926  ax-addass 7927  ax-mulass 7928  ax-distr 7929  ax-i2m1 7930  ax-0lt1 7931  ax-1rid 7932  ax-0id 7933  ax-rnegex 7934  ax-precex 7935  ax-cnre 7936  ax-pre-ltirr 7937  ax-pre-ltwlin 7938  ax-pre-lttrn 7939  ax-pre-apti 7940  ax-pre-ltadd 7941  ax-pre-mulgt0 7942  ax-pre-mulext 7943

This theorem depends on definitions:  df-bi 117  df-3or 980  df-3an 981  df-tru 1366  df-fal 1369  df-nf 1471  df-sb 1773  df-eu 2039  df-mo 2040  df-clab 2174  df-cleq 2180  df-clel 2183  df-nfc 2318  df-ne 2358  df-nel 2453  df-ral 2470  df-rex 2471  df-reu 2472  df-rmo 2473  df-rab 2474  df-v 2751  df-sbc 2975  df-dif 3143  df-un 3145  df-in 3147  df-ss 3154  df-pw 3589  df-sn 3610  df-pr 3611  df-op 3613  df-uni 3822  df-br 4016  df-opab 4077  df-mpt 4078  df-id 4305  df-po 4308  df-iso 4309  df-xp 4644  df-rel 4645  df-cnv 4646  df-co 4647  df-dm 4648  df-rn 4649  df-iota 5190  df-fun 5230  df-fn 5231  df-f 5232  df-f1 5233  df-fo 5234  df-f1o 5235  df-fv 5236  df-riota 5844  df-ov 5891  df-oprab 5892  df-mpo 5893  df-pnf 8008  df-mnf 8009  df-xr 8010  df-ltxr 8011  df-le 8012  df-sub 8144  df-neg 8145  df-reap 8546  df-ap 8553  df-div 8644  df-rp 9668  df-icc 9909

This theorem is referenced by:  iccen  10020