Table of ContentsTable of Contents Mathbox for Jeff Madsen < Previous   Next >
Related theorems
Unicode version

Theorem pcoass 16085
Description: Order of concatenation does not affect homotopy class.
Assertion
Ref Expression
pcoass |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)(*p` J)H)(~=ph` J)(F(*p` J)(G(*p` J)H)))

Proof of Theorem pcoass
StepHypRef Expression
1 simp1 876 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> J e. Top)
2 simp1 876 . . . . . . . . . . . . . . . 16 |- ((F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) -> F e. (II Cn J))
323ad2ant2 898 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> F e. (II Cn J))
4 simp2 877 . . . . . . . . . . . . . . . 16 |- ((F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) -> G e. (II Cn J))
543ad2ant2 898 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> G e. (II Cn J))
6 simp3l 904 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F` 1) = (G` 0))
7 pcoval 16073 . . . . . . . . . . . . . . 15 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ (F` 1) = (G` 0))) -> (F(*p` J)G) = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))})
81, 3, 5, 6, 7syl13anc 1102 . . . . . . . . . . . . . 14 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F(*p` J)G) = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))})
98ad2antrr 440 . . . . . . . . . . . . 13 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> (F(*p` J)G) = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))})
109fveq1d 4683 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> ((F(*p` J)G)` (2 x. x)) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))}` (2 x. x)))
11 0re 6603 . . . . . . . . . . . . . . . . . . 19 |- 0 e. RR
12 2re 7163 . . . . . . . . . . . . . . . . . . . 20 |- 2 e. RR
13 2ne0 7174 . . . . . . . . . . . . . . . . . . . 20 |- 2 =/= 0
1412, 13rereccli 6979 . . . . . . . . . . . . . . . . . . 19 |- (1 / 2) e. RR
15 elicc2 7560 . . . . . . . . . . . . . . . . . . 19 |- ((0 e. RR /\ (1 / 2) e. RR) -> (x e. (0[,](1 / 2)) <-> (x e. RR /\ 0 <_ x /\ x <_ (1 / 2))))
1611, 14, 15mp2an 761 . . . . . . . . . . . . . . . . . 18 |- (x e. (0[,](1 / 2)) <-> (x e. RR /\ 0 <_ x /\ x <_ (1 / 2)))
1716biimpri 169 . . . . . . . . . . . . . . . . 17 |- ((x e. RR /\ 0 <_ x /\ x <_ (1 / 2)) -> x e. (0[,](1 / 2)))
18173expa 1067 . . . . . . . . . . . . . . . 16 |- (((x e. RR /\ 0 <_ x) /\ x <_ (1 / 2)) -> x e. (0[,](1 / 2)))
19183adantl3 1034 . . . . . . . . . . . . . . 15 |- (((x e. RR /\ 0 <_ x /\ x <_ 1) /\ x <_ (1 / 2)) -> x e. (0[,](1 / 2)))
20 1re 6598 . . . . . . . . . . . . . . . 16 |- 1 e. RR
21 elicc2 7560 . . . . . . . . . . . . . . . 16 |- ((0 e. RR /\ 1 e. RR) -> (x e. (0[,]1) <-> (x e. RR /\ 0 <_ x /\ x <_ 1)))
2211, 20, 21mp2an 761 . . . . . . . . . . . . . . 15 |- (x e. (0[,]1) <-> (x e. RR /\ 0 <_ x /\ x <_ 1))
2319, 22sylanb 498 . . . . . . . . . . . . . 14 |- ((x e. (0[,]1) /\ x <_ (1 / 2)) -> x e. (0[,](1 / 2)))
24 iihalf1 15872 . . . . . . . . . . . . . 14 |- (x e. (0[,](1 / 2)) -> (2 x. x) e. (0[,]1))
25 breq1 3341 . . . . . . . . . . . . . . . 16 |- (v = (2 x. x) -> (v <_ (1 / 2) <-> (2 x. x) <_ (1 / 2)))
26 opreq2 4890 . . . . . . . . . . . . . . . . 17 |- (v = (2 x. x) -> (2 x. v) = (2 x. (2 x. x)))
2726fveq2d 4685 . . . . . . . . . . . . . . . 16 |- (v = (2 x. x) -> (F` (2 x. v)) = (F` (2 x. (2 x. x))))
2826opreq1d 4897 . . . . . . . . . . . . . . . . 17 |- (v = (2 x. x) -> ((2 x. v) - 1) = ((2 x. (2 x. x)) - 1))
2928fveq2d 4685 . . . . . . . . . . . . . . . 16 |- (v = (2 x. x) -> (G` ((2 x. v) - 1)) = (G` ((2 x. (2 x. x)) - 1)))
3025, 27, 29ifbieq12d 2998 . . . . . . . . . . . . . . 15 |- (v = (2 x. x) -> if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))))
31 eqid 1884 . . . . . . . . . . . . . . 15 |- {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))} = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))}
32 fvex 4689 . . . . . . . . . . . . . . . 16 |- (F` (2 x. (2 x. x))) e. _V
33 fvex 4689 . . . . . . . . . . . . . . . 16 |- (G` ((2 x. (2 x. x)) - 1)) e. _V
3432, 33ifex 3031 . . . . . . . . . . . . . . 15 |- if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))) e. _V
3530, 31, 34fvopab4 4743 . . . . . . . . . . . . . 14 |- ((2 x. x) e. (0[,]1) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))}` (2 x. x)) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))))
3623, 24, 353syl 24 . . . . . . . . . . . . 13 |- ((x e. (0[,]1) /\ x <_ (1 / 2)) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))}` (2 x. x)) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))))
3736adantll 428 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), (G` ((2 x. v) - 1))))}` (2 x. x)) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))))
38 iccssre 7565 . . . . . . . . . . . . . . . . . 18 |- ((0 e. RR /\ 1 e. RR) -> (0[,]1) C_ RR)
3911, 20, 38mp2an 761 . . . . . . . . . . . . . . . . 17 |- (0[,]1) C_ RR
4039sseli 2617 . . . . . . . . . . . . . . . 16 |- (x e. (0[,]1) -> x e. RR)
41 2pos 7173 . . . . . . . . . . . . . . . . . . 19 |- 0 < 2
4212, 41pm3.2i 307 . . . . . . . . . . . . . . . . . 18 |- (2 e. RR /\ 0 < 2)
43 lemuldiv2 7059 . . . . . . . . . . . . . . . . . 18 |- ((x e. RR /\ (1 / 2) e. RR /\ (2 e. RR /\ 0 < 2)) -> ((2 x. x) <_ (1 / 2) <-> x <_ ((1 / 2) / 2)))
4414, 42, 43mp3an23 1183 . . . . . . . . . . . . . . . . 17 |- (x e. RR -> ((2 x. x) <_ (1 / 2) <-> x <_ ((1 / 2) / 2)))
45 ax1cn 6422 . . . . . . . . . . . . . . . . . . . 20 |- 1 e. CC
46 2cn 7164 . . . . . . . . . . . . . . . . . . . . 21 |- 2 e. CC
4746, 13pm3.2i 307 . . . . . . . . . . . . . . . . . . . 20 |- (2 e. CC /\ 2 =/= 0)
48 divdiv1 6972 . . . . . . . . . . . . . . . . . . . 20 |- ((1 e. CC /\ (2 e. CC /\ 2 =/= 0) /\ (2 e. CC /\ 2 =/= 0)) -> ((1 / 2) / 2) = (1 / (2 x. 2)))
4945, 47, 47, 48mp3an 1191 . . . . . . . . . . . . . . . . . . 19 |- ((1 / 2) / 2) = (1 / (2 x. 2))
50 2t2e4 7206 . . . . . . . . . . . . . . . . . . . 20 |- (2 x. 2) = 4
5150opreq2i 4893 . . . . . . . . . . . . . . . . . . 19 |- (1 / (2 x. 2)) = (1 / 4)
5249, 51eqtri 1908 . . . . . . . . . . . . . . . . . 18 |- ((1 / 2) / 2) = (1 / 4)
5352breq2i 3346 . . . . . . . . . . . . . . . . 17 |- (x <_ ((1 / 2) / 2) <-> x <_ (1 / 4))
5444, 53syl6bb 595 . . . . . . . . . . . . . . . 16 |- (x e. RR -> ((2 x. x) <_ (1 / 2) <-> x <_ (1 / 4)))
5540, 54syl 12 . . . . . . . . . . . . . . 15 |- (x e. (0[,]1) -> ((2 x. x) <_ (1 / 2) <-> x <_ (1 / 4)))
5655ad2antlr 441 . . . . . . . . . . . . . 14 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> ((2 x. x) <_ (1 / 2) <-> x <_ (1 / 4)))
5756ifbid 2996 . . . . . . . . . . . . 13 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))) = if(x <_ (1 / 4), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))))
5823, 24syl 12 . . . . . . . . . . . . . . . . . 18 |- ((x e. (0[,]1) /\ x <_ (1 / 2)) -> (2 x. x) e. (0[,]1))
5958adantr 425 . . . . . . . . . . . . . . . . 17 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> (2 x. x) e. (0[,]1))
6028fveq2d 4685 . . . . . . . . . . . . . . . . . . 19 |- (v = (2 x. x) -> ((G(*p` J)H)` ((2 x. v) - 1)) = ((G(*p` J)H)` ((2 x. (2 x. x)) - 1)))
6125, 27, 60ifbieq12d 2998 . . . . . . . . . . . . . . . . . 18 |- (v = (2 x. x) -> if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))))
62 eqid 1884 . . . . . . . . . . . . . . . . . 18 |- {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}
63 fvex 4689 . . . . . . . . . . . . . . . . . . 19 |- ((G(*p` J)H)` ((2 x. (2 x. x)) - 1)) e. _V
6432, 63ifex 3031 . . . . . . . . . . . . . . . . . 18 |- if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))) e. _V
6561, 62, 64fvopab4 4743 . . . . . . . . . . . . . . . . 17 |- ((2 x. x) e. (0[,]1) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))))
6659, 65syl 12 . . . . . . . . . . . . . . . 16 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)) = if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))))
6754biimpar 461 . . . . . . . . . . . . . . . . . . 19 |- ((x e. RR /\ x <_ (1 / 4)) -> (2 x. x) <_ (1 / 2))
6867, 40sylan 497 . . . . . . . . . . . . . . . . . 18 |- ((x e. (0[,]1) /\ x <_ (1 / 4)) -> (2 x. x) <_ (1 / 2))
6968adantlr 429 . . . . . . . . . . . . . . . . 17 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> (2 x. x) <_ (1 / 2))
70 iftrue 2989 . . . . . . . . . . . . . . . . 17 |- ((2 x. x) <_ (1 / 2) -> if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))) = (F` (2 x. (2 x. x))))
7169, 70syl 12 . . . . . . . . . . . . . . . 16 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), ((G(*p` J)H)` ((2 x. (2 x. x)) - 1))) = (F` (2 x. (2 x. x))))
7266, 71eqtr2d 1926 . . . . . . . . . . . . . . 15 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> (F` (2 x. (2 x. x))) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)))
7372adantlll 432 . . . . . . . . . . . . . 14 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ x <_ (1 / 4)) -> (F` (2 x. (2 x. x))) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)))
7473ifeq1da 15693 . . . . . . . . . . . . 13 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))) = if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), (G` ((2 x. (2 x. x)) - 1))))
75 4re 7166 . . . . . . . . . . . . . . . . . . . . 21 |- 4 e. RR
76 4pos 7176 . . . . . . . . . . . . . . . . . . . . . 22 |- 0 < 4
7775, 76gt0ne0ii 6799 . . . . . . . . . . . . . . . . . . . . 21 |- 4 =/= 0
7875, 77rereccli 6979 . . . . . . . . . . . . . . . . . . . 20 |- (1 / 4) e. RR
7978recni 6467 . . . . . . . . . . . . . . . . . . . . 21 |- (1 / 4) e. CC
8079addid2i 6484 . . . . . . . . . . . . . . . . . . . 20 |- (0 + (1 / 4)) = (1 / 4)
8175recni 6467 . . . . . . . . . . . . . . . . . . . . . 22 |- 4 e. CC
8246, 45, 81, 77divdiri 6930 . . . . . . . . . . . . . . . . . . . . 21 |- ((2 + 1) / 4) = ((2 / 4) + (1 / 4))
83 df-3 7155 . . . . . . . . . . . . . . . . . . . . . 22 |- 3 = (2 + 1)
8483opreq1i 4892 . . . . . . . . . . . . . . . . . . . . 21 |- (3 / 4) = ((2 + 1) / 4)
85 divcan5 6957 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((1 e. CC /\ (2 e. CC /\ 2 =/= 0) /\ (2 e. CC /\ 2 =/= 0)) -> ((2 x. 1) / (2 x. 2)) = (1 / 2))
8645, 47, 47, 85mp3an 1191 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((2 x. 1) / (2 x. 2)) = (1 / 2)
8746mulid1i 6485 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (2 x. 1) = 2
8887, 50opreq12i 4894 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((2 x. 1) / (2 x. 2)) = (2 / 4)
8986, 88eqtr3i 1910 . . . . . . . . . . . . . . . . . . . . . 22 |- (1 / 2) = (2 / 4)
9089opreq1i 4892 . . . . . . . . . . . . . . . . . . . . 21 |- ((1 / 2) + (1 / 4)) = ((2 / 4) + (1 / 4))
9182, 84, 903eqtr4ri 1923 . . . . . . . . . . . . . . . . . . . 20 |- ((1 / 2) + (1 / 4)) = (3 / 4)
9211, 14, 78, 80, 91iccshftri 15858 . . . . . . . . . . . . . . . . . . 19 |- (x e. (0[,](1 / 2)) -> (x + (1 / 4)) e. ((1 / 4)[,](3 / 4)))
9311, 20pm3.2i 307 . . . . . . . . . . . . . . . . . . . . 21 |- (0 e. RR /\ 1 e. RR)
94 3re 7165 . . . . . . . . . . . . . . . . . . . . . . 23 |- 3 e. RR
9594, 75, 77redivcli 6976 . . . . . . . . . . . . . . . . . . . . . 22 |- (3 / 4) e. RR
9678, 95pm3.2i 307 . . . . . . . . . . . . . . . . . . . . 21 |- ((1 / 4) e. RR /\ (3 / 4) e. RR)
9775, 76recgt0ii 6992 . . . . . . . . . . . . . . . . . . . . . . 23 |- 0 < (1 / 4)
9811, 78, 97ltleii 6756 . . . . . . . . . . . . . . . . . . . . . 22 |- 0 <_ (1 / 4)
9994ltp1i 6991 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- 3 < (3 + 1)
100 df-4 7156 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- 4 = (3 + 1)
10199, 100breqtrri 3362 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- 3 < 4
10294, 75, 101ltleii 6756 . . . . . . . . . . . . . . . . . . . . . . . 24 |- 3 <_ 4
10381mulid1i 6485 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (4 x. 1) = 4
104102, 103breqtrri 3362 . . . . . . . . . . . . . . . . . . . . . . 23 |- 3 <_ (4 x. 1)
10575, 76pm3.2i 307 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (4 e. RR /\ 0 < 4)
106 ledivmul 7051 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((3 e. RR /\ 1 e. RR /\ (4 e. RR /\ 0 < 4)) -> ((3 / 4) <_ 1 <-> 3 <_ (4 x. 1)))
10794, 20, 105, 106mp3an 1191 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((3 / 4) <_ 1 <-> 3 <_ (4 x. 1))
108104, 107mpbir 207 . . . . . . . . . . . . . . . . . . . . . 22 |- (3 / 4) <_ 1
10998, 108pm3.2i 307 . . . . . . . . . . . . . . . . . . . . 21 |- (0 <_ (1 / 4) /\ (3 / 4) <_ 1)
110 iccss 15855 . . . . . . . . . . . . . . . . . . . . 21 |- (((0 e. RR /\ 1 e. RR) /\ ((1 / 4) e. RR /\ (3 / 4) e. RR) /\ (0 <_ (1 / 4) /\ (3 / 4) <_ 1)) -> ((1 / 4)[,](3 / 4)) C_ (0[,]1))
11193, 96, 109, 110mp3an 1191 . . . . . . . . . . . . . . . . . . . 20 |- ((1 / 4)[,](3 / 4)) C_ (0[,]1)
112111sseli 2617 . . . . . . . . . . . . . . . . . . 19 |- ((x + (1 / 4)) e. ((1 / 4)[,](3 / 4)) -> (x + (1 / 4)) e. (0[,]1))
11323, 92, 1123syl 24 . . . . . . . . . . . . . . . . . 18 |- ((x e. (0[,]1) /\ x <_ (1 / 2)) -> (x + (1 / 4)) e. (0[,]1))
114113adantr 425 . . . . . . . . . . . . . . . . 17 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (x + (1 / 4)) e. (0[,]1))
115114adantlll 432 . . . . . . . . . . . . . . . 16 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (x + (1 / 4)) e. (0[,]1))
116 breq1 3341 . . . . . . . . . . . . . . . . . 18 |- (v = (x + (1 / 4)) -> (v <_ (1 / 2) <-> (x + (1 / 4)) <_ (1 / 2)))
117 opreq2 4890 . . . . . . . . . . . . . . . . . . 19 |- (v = (x + (1 / 4)) -> (2 x. v) = (2 x. (x + (1 / 4))))
118117fveq2d 4685 . . . . . . . . . . . . . . . . . 18 |- (v = (x + (1 / 4)) -> (F` (2 x. v)) = (F` (2 x. (x + (1 / 4)))))
119117opreq1d 4897 . . . . . . . . . . . . . . . . . . 19 |- (v = (x + (1 / 4)) -> ((2 x. v) - 1) = ((2 x. (x + (1 / 4))) - 1))
120119fveq2d 4685 . . . . . . . . . . . . . . . . . 18 |- (v = (x + (1 / 4)) -> ((G(*p` J)H)` ((2 x. v) - 1)) = ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)))
121116, 118, 120ifbieq12d 2998 . . . . . . . . . . . . . . . . 17 |- (v = (x + (1 / 4)) -> if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))) = if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))))
122 fvex 4689 . . . . . . . . . . . . . . . . . 18 |- (F` (2 x. (x + (1 / 4)))) e. _V
123 fvex 4689 . . . . . . . . . . . . . . . . . 18 |- ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) e. _V
124122, 123ifex 3031 . . . . . . . . . . . . . . . . 17 |- if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))) e. _V
125121, 62, 124fvopab4 4743 . . . . . . . . . . . . . . . 16 |- ((x + (1 / 4)) e. (0[,]1) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4))) = if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))))
126115, 125syl 12 . . . . . . . . . . . . . . 15 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4))) = if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))))
127 leadd1 6808 . . . . . . . . . . . . . . . . . . . . . 22 |- ((x e. RR /\ (1 / 4) e. RR /\ (1 / 4) e. RR) -> (x <_ (1 / 4) <-> (x + (1 / 4)) <_ ((1 / 4) + (1 / 4))))
12878, 78, 127mp3an23 1183 . . . . . . . . . . . . . . . . . . . . 21 |- (x e. RR -> (x <_ (1 / 4) <-> (x + (1 / 4)) <_ ((1 / 4) + (1 / 4))))
12940, 128syl 12 . . . . . . . . . . . . . . . . . . . 20 |- (x e. (0[,]1) -> (x <_ (1 / 4) <-> (x + (1 / 4)) <_ ((1 / 4) + (1 / 4))))
130 df-2 7154 . . . . . . . . . . . . . . . . . . . . . . 23 |- 2 = (1 + 1)
131130opreq1i 4892 . . . . . . . . . . . . . . . . . . . . . 22 |- (2 / 4) = ((1 + 1) / 4)
13245, 45, 81, 77divdiri 6930 . . . . . . . . . . . . . . . . . . . . . 22 |- ((1 + 1) / 4) = ((1 / 4) + (1 / 4))
13389, 131, 1323eqtrri 1913 . . . . . . . . . . . . . . . . . . . . 21 |- ((1 / 4) + (1 / 4)) = (1 / 2)
134133breq2i 3346 . . . . . . . . . . . . . . . . . . . 20 |- ((x + (1 / 4)) <_ ((1 / 4) + (1 / 4)) <-> (x + (1 / 4)) <_ (1 / 2))
135129, 134syl6rbb 596 . . . . . . . . . . . . . . . . . . 19 |- (x e. (0[,]1) -> ((x + (1 / 4)) <_ (1 / 2) <-> x <_ (1 / 4)))
136135ad2antrr 440 . . . . . . . . . . . . . . . . . 18 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ((x + (1 / 4)) <_ (1 / 2) <-> x <_ (1 / 4)))
137136adantlll 432 . . . . . . . . . . . . . . . . 17 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ((x + (1 / 4)) <_ (1 / 2) <-> x <_ (1 / 4)))
138137ifbid 2996 . . . . . . . . . . . . . . . 16 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))) = if(x <_ (1 / 4), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))))
139 iffalse 2991 . . . . . . . . . . . . . . . . 17 |- (-. x <_ (1 / 4) -> if(x <_ (1 / 4), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))) = ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)))
140139adantl 424 . . . . . . . . . . . . . . . 16 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> if(x <_ (1 / 4), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))) = ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)))
141 pcoval1 16074 . . . . . . . . . . . . . . . . . . . 20 |- (((J e. Top /\ (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0))) /\ ((2 x. (x + (1 / 4))) - 1) e. (0[,](1 / 2))) -> ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) = (G` (2 x. ((2 x. (x + (1 / 4))) - 1))))
142 simp3 878 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) -> H e. (II Cn J))
1431423ad2ant2 898 . . . . . . . . . . . . . . . . . . . . . 22 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> H e. (II Cn J))
144 simp3r 905 . . . . . . . . . . . . . . . . . . . . . 22 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (G` 1) = (H` 0))
1455, 143, 1443jca 1050 . . . . . . . . . . . . . . . . . . . . 21 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0)))
1461, 145jca 310 . . . . . . . . . . . . . . . . . . . 20 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (J e. Top /\ (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0))))
147 recn 6466 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. RR -> x e. CC)
148 adddi 6462 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ((2 e. CC /\ x e. CC /\ (1 / 4) e. CC) -> (2 x. (x + (1 / 4))) = ((2 x. x) + (2 x. (1 / 4))))
14946, 79, 148mp3an13 1182 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. CC -> (2 x. (x + (1 / 4))) = ((2 x. x) + (2 x. (1 / 4))))
150147, 149syl 12 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (x e. RR -> (2 x. (x + (1 / 4))) = ((2 x. x) + (2 x. (1 / 4))))
15114recni 6467 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (1 / 2) e. CC
152151, 46, 79, 13divmuli 6894 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (((1 / 2) / 2) = (1 / 4) <-> (2 x. (1 / 4)) = (1 / 2))
15352, 152mpbi 206 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (2 x. (1 / 4)) = (1 / 2)
154153a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. RR -> (2 x. (1 / 4)) = (1 / 2))
155154opreq2d 4898 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (x e. RR -> ((2 x. x) + (2 x. (1 / 4))) = ((2 x. x) + (1 / 2)))
156150, 155eqtrd 1925 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (x e. RR -> (2 x. (x + (1 / 4))) = ((2 x. x) + (1 / 2)))
157156opreq1d 4897 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (x e. RR -> ((2 x. (x + (1 / 4))) - 1) = (((2 x. x) + (1 / 2)) - 1))
158 mulcl 6456 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ((2 e. CC /\ x e. CC) -> (2 x. x) e. CC)
15946, 158mpan 759 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. CC -> (2 x. x) e. CC)
160 subsub3 6628 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (((2 x. x) e. CC /\ 1 e. CC /\ (1 / 2) e. CC) -> ((2 x. x) - (1 - (1 / 2))) = (((2 x. x) + (1 / 2)) - 1))
16145, 151, 160mp3an23 1183 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((2 x. x) e. CC -> ((2 x. x) - (1 - (1 / 2))) = (((2 x. x) + (1 / 2)) - 1))
162159, 161syl 12 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (x e. CC -> ((2 x. x) - (1 - (1 / 2))) = (((2 x. x) + (1 / 2)) - 1))
163 2halves 7225 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (1 e. CC -> ((1 / 2) + (1 / 2)) = 1)
16445, 163ax-mp 7 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ((1 / 2) + (1 / 2)) = 1
16545, 151, 151, 164subaddrii 6529 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (1 - (1 / 2)) = (1 / 2)
166165a1i 8 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. CC -> (1 - (1 / 2)) = (1 / 2))
167166opreq2d 4898 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (x e. CC -> ((2 x. x) - (1 - (1 / 2))) = ((2 x. x) - (1 / 2)))
168162, 167eqtr3d 1927 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (x e. CC -> (((2 x. x) + (1 / 2)) - 1) = ((2 x. x) - (1 / 2)))
169147, 168syl 12 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (x e. RR -> (((2 x. x) + (1 / 2)) - 1) = ((2 x. x) - (1 / 2)))
170157, 169eqtrd 1925 . . . . . . . . . . . . . . . . . . . . . . 23 |- (x e. RR -> ((2 x. (x + (1 / 4))) - 1) = ((2 x. x) - (1 / 2)))
17140, 170syl 12 . . . . . . . . . . . . . . . . . . . . . 22 |- (x e. (0[,]1) -> ((2 x. (x + (1 / 4))) - 1) = ((2 x. x) - (1 / 2)))
172171adantr 425 . . . . . . . . . . . . . . . . . . . . 21 |- ((x e. (0[,]1) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((2 x. (x + (1 / 4))) - 1) = ((2 x. x) - (1 / 2)))
173 ltnle 6680 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (((1 / 4) e. RR /\ x e. RR) -> ((1 / 4) < x <-> -. x <_ (1 / 4)))
174 ltle 6690 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (((1 / 4) e. RR /\ x e. RR) -> ((1 / 4) < x -> (1 / 4) <_ x))
175173, 174sylbird 222 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (((1 / 4) e. RR /\ x e. RR) -> (-. x <_ (1 / 4) -> (1 / 4) <_ x))
17678, 175mpan 759 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- (x e. RR -> (-. x <_ (1 / 4) -> (1 / 4) <_ x))
177176imp 377 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ((x e. RR /\ -. x <_ (1 / 4)) -> (1 / 4) <_ x)
178177adantlr 429 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (((x e. RR /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (1 / 4) <_ x)
179 elicc2 7560 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (((1 / 4) e. RR /\ (1 / 2) e. RR) -> (x e. ((1 / 4)[,](1 / 2)) <-> (x e. RR /\ (1 / 4) <_ x /\ x <_ (1 / 2))))
18078, 14, 179mp2an 761 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (x e. ((1 / 4)[,](1 / 2)) <-> (x e. RR /\ (1 / 4) <_ x /\ x <_ (1 / 2)))
181 mulcom 6459 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ((2 e. CC /\ x e. CC) -> (2 x. x) = (x x. 2))
182181, 46, 147sylancr 526 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- (x e. RR -> (2 x. x) = (x x. 2))
1831823ad2ant1 897 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ((x e. RR /\ (1 / 4) <_ x /\ x <_ (1 / 2)) -> (2 x. x) = (x x. 2))
184180, 183sylbi 216 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (x e. ((1 / 4)[,](1 / 2)) -> (2 x. x) = (x x. 2))
18512, 41elrpii 7234 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- 2 e. RR+
18679, 46mulcomi 6476 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ((1 / 4) x. 2) = (2 x. (1 / 4))
187186, 153eqtri 1908 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ((1 / 4) x. 2) = (1 / 2)
18845, 46, 13divcan1i 6906 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ((1 / 2) x. 2) = 1
18978, 14, 185, 187, 188iccdili 15862 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- (x e. ((1 / 4)[,](1 / 2)) -> (x x. 2) e. ((1 / 2)[,]1))
190184, 189eqeltrd 1971 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- (x e. ((1 / 4)[,](1 / 2)) -> (2 x. x) e. ((1 / 2)[,]1))
191151subidi 6551 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ((1 / 2) - (1 / 2)) = 0
19214, 20, 14, 191, 165iccshftli 15860 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ((2 x. x) e. ((1 / 2)[,]1) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
193190, 192syl 12 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- (x e. ((1 / 4)[,](1 / 2)) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
194180, 193sylbir 218 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ((x e. RR /\ (1 / 4) <_ x /\ x <_ (1 / 2)) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
1951943expa 1067 . . . . . . . . . . . . . . . . . . . . . . . . . 26 |- (((x e. RR /\ (1 / 4) <_ x) /\ x <_ (1 / 2)) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
196195an1rs 547 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- (((x e. RR /\ x <_ (1 / 2)) /\ (1 / 4) <_ x) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
197178, 196syldan 516 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (((x e. RR /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
198197anasss 488 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((x e. RR /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
1991983ad2antl1 1038 . . . . . . . . . . . . . . . . . . . . . 22 |- (((x e. RR /\ 0 <_ x /\ x <_ 1) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
200199, 22sylanb 498 . . . . . . . . . . . . . . . . . . . . 21 |- ((x e. (0[,]1) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((2 x. x) - (1 / 2)) e. (0[,](1 / 2)))
201172, 200eqeltrd 1971 . . . . . . . . . . . . . . . . . . . 20 |- ((x e. (0[,]1) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((2 x. (x + (1 / 4))) - 1) e. (0[,](1 / 2)))
202141, 146, 201syl2an 503 . . . . . . . . . . . . . . . . . . 19 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ (x e. (0[,]1) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4)))) -> ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) = (G` (2 x. ((2 x. (x + (1 / 4))) - 1))))
203202anassrs 489 . . . . . . . . . . . . . . . . . 18 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ (x <_ (1 / 2) /\ -. x <_ (1 / 4))) -> ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) = (G` (2 x. ((2 x. (x + (1 / 4))) - 1))))
204203anassrs 489 . . . . . . . . . . . . . . . . 17 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) = (G` (2 x. ((2 x. (x + (1 / 4))) - 1))))
205170opreq2d 4898 . . . . . . . . . . . . . . . . . . . . . 22 |- (x e. RR -> (2 x. ((2 x. (x + (1 / 4))) - 1)) = (2 x. ((2 x. x) - (1 / 2))))
206 subdi 6590 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((2 e. CC /\ (2 x. x) e. CC /\ (1 / 2) e. CC) -> (2 x. ((2 x. x) - (1 / 2))) = ((2 x. (2 x. x)) - (2 x. (1 / 2))))
20746, 151, 206mp3an13 1182 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((2 x. x) e. CC -> (2 x. ((2 x. x) - (1 / 2))) = ((2 x. (2 x. x)) - (2 x. (1 / 2))))
208147, 159, 2073syl 24 . . . . . . . . . . . . . . . . . . . . . 22 |- (x e. RR -> (2 x. ((2 x. x) - (1 / 2))) = ((2 x. (2 x. x)) - (2 x. (1 / 2))))
20946, 13recidi 6916 . . . . . . . . . . . . . . . . . . . . . . . 24 |- (2 x. (1 / 2)) = 1
210209a1i 8 . . . . . . . . . . . . . . . . . . . . . . 23 |- (x e. RR -> (2 x. (1 / 2)) = 1)
211210opreq2d 4898 . . . . . . . . . . . . . . . . . . . . . 22 |- (x e. RR -> ((2 x. (2 x. x)) - (2 x. (1 / 2))) = ((2 x. (2 x. x)) - 1))
212205, 208, 2113eqtrd 1929 . . . . . . . . . . . . . . . . . . . . 21 |- (x e. RR -> (2 x. ((2 x. (x + (1 / 4))) - 1)) = ((2 x. (2 x. x)) - 1))
21340, 212syl 12 . . . . . . . . . . . . . . . . . . . 20 |- (x e. (0[,]1) -> (2 x. ((2 x. (x + (1 / 4))) - 1)) = ((2 x. (2 x. x)) - 1))
214213ad2antrr 440 . . . . . . . . . . . . . . . . . . 19 |- (((x e. (0[,]1) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (2 x. ((2 x. (x + (1 / 4))) - 1)) = ((2 x. (2 x. x)) - 1))
215214adantlll 432 . . . . . . . . . . . . . . . . . 18 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (2 x. ((2 x. (x + (1 / 4))) - 1)) = ((2 x. (2 x. x)) - 1))
216215fveq2d 4685 . . . . . . . . . . . . . . . . 17 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (G` (2 x. ((2 x. (x + (1 / 4))) - 1))) = (G` ((2 x. (2 x. x)) - 1)))
217204, 216eqtrd 1925 . . . . . . . . . . . . . . . 16 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1)) = (G` ((2 x. (2 x. x)) - 1)))
218138, 140, 2173eqtrd 1929 . . . . . . . . . . . . . . 15 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> if((x + (1 / 4)) <_ (1 / 2), (F` (2 x. (x + (1 / 4)))), ((G(*p` J)H)` ((2 x. (x + (1 / 4))) - 1))) = (G` ((2 x. (2 x. x)) - 1)))
219126, 218eqtr2d 1926 . . . . . . . . . . . . . 14 |- (((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) /\ -. x <_ (1 / 4)) -> (G` ((2 x. (2 x. x)) - 1)) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4))))
220219ifeq2da 15694 . . . . . . . . . . . . 13 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), (G` ((2 x. (2 x. x)) - 1))) = if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4)))))
22157, 74, 2203eqtrd 1929 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> if((2 x. x) <_ (1 / 2), (F` (2 x. (2 x. x))), (G` ((2 x. (2 x. x)) - 1))) = if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4)))))
22210, 37, 2213eqtrd 1929 . . . . . . . . . . 11 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> ((F(*p` J)G)` (2 x. x)) = if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4)))))
223 fvif 15692 . . . . . . . . . . 11 |- ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))) = if(x <_ (1 / 4), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (2 x. x)), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` (x + (1 / 4))))
224222, 223syl6eqr 1946 . . . . . . . . . 10 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ x <_ (1 / 2)) -> ((F(*p` J)G)` (2 x. x)) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))))
225224ifeq1da 15693 . . . . . . . . 9 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) -> if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))) = if(x <_ (1 / 2), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))), (H` ((2 x. x) - 1))))
226 ltnle 6680 . . . . . . . . . . . . . . . . . . . 20 |- (((1 / 2) e. RR /\ x e. RR) -> ((1 / 2) < x <-> -. x <_ (1 / 2)))
227 ltle 6690 . . . . . . . . . . . . . . . . . . . 20 |- (((1 / 2) e. RR /\ x e. RR) -> ((1 / 2) < x -> (1 / 2) <_ x))
228226, 227sylbird 222 . . . . . . . . . . . . . . . . . . 19 |- (((1 / 2) e. RR /\ x e. RR) -> (-. x <_ (1 / 2) -> (1 / 2) <_ x))
22914, 228mpan 759 . . . . . . . . . . . . . . . . . 18 |- (x e. RR -> (-. x <_ (1 / 2) -> (1 / 2) <_ x))
230229imp 377 . . . . . . . . . . . . . . . . 17 |- ((x e. RR /\ -. x <_ (1 / 2)) -> (1 / 2) <_ x)
231230adantlr 429 . . . . . . . . . . . . . . . 16 |- (((x e. RR /\ x <_ 1) /\ -. x <_ (1 / 2)) -> (1 / 2) <_ x)
232 elicc2 7560 . . . . . . . . . . . . . . . . . . . 20 |- (((1 / 2) e. RR /\ 1 e. RR) -> (x e. ((1 / 2)[,]1) <-> (x e. RR /\ (1 / 2) <_ x /\ x <_ 1)))
23314, 20, 232mp2an 761 . . . . . . . . . . . . . . . . . . 19 |- (x e. ((1 / 2)[,]1) <-> (x e. RR /\ (1 / 2) <_ x /\ x <_ 1))
234 eqid 1884 . . . . . . . . . . . . . . . . . . . . 21 |- (1 / 2) = (1 / 2)
23514, 20, 185, 52, 234icccntri 15864 . . . . . . . . . . . . . . . . . . . 20 |- (x e. ((1 / 2)[,]1) -> (x / 2) e. ((1 / 4)[,](1 / 2)))
236 eqid 1884 . . . . . . . . . . . . . . . . . . . . 21 |- ((1 / 4) + (1 / 2)) = ((1 / 4) + (1 / 2))
23778, 14, 14, 236, 164iccshftri 15858 . . . . . . . . . . . . . . . . . . . 20 |- ((x / 2) e. ((1 / 4)[,](1 / 2)) -> ((x / 2) + (1 / 2)) e. (((1 / 4) + (1 / 2))[,]1))
23878, 14readdcli 6487 . . . . . . . . . . . . . . . . . . . . . . 23 |- ((1 / 4) + (1 / 2)) e. RR
239238, 20pm3.2i 307 . . . . . . . . . . . . . . . . . . . . . 22 |- (((1 / 4) + (1 / 2)) e. RR /\ 1 e. RR)
240 halfgt0 7215 . . . . . . . . . . . . . . . . . . . . . . . . 25 |- 0 < (1 / 2)
24111, 14, 240ltleii 6756 . . . . . . . . . . . . . . . . . . . . . . . 24 |- 0 <_ (1 / 2)
24278, 14addge0i 6777 . . . . . . . . . . . . . . . . . . . . . . . 24 |- ((0 <_ (1 / 4) /\ 0 <_ (1 / 2)) -> 0 <_ ((1 / 4) + (1 / 2)))
24398, 241, 242mp2an 761 . . . . . . . . . . . . . . . . . . . . . . 23 |- 0 <_ ((1 / 4) + (1 / 2))
24420leidi 6790 . . . . . . . . . . . . . . . . . . . . . . 23 |- 1 <_ 1
245243, 244pm3.2i 307 . . . . . . . . . . . . . . . . . . . . . 22 |- (0 <_ ((1 / 4) + (1 / 2)) /\ 1 <_ 1)
246 iccss 15855 . . . . . . . . . . . . . . . . . . . . . 22 |- (((0 e. RR /\ 1 e. RR) /\ (((1 / 4) + (1 / 2)) e. RR /\ 1 e. RR) /\ (0 <_ ((1 / 4) + (1 / 2)) /\ 1 <_ 1)) -> (((1 / 4) + (1 / 2))[,]1) C_ (0[,]1))
24793, 239, 245, 246mp3an 1191 . . . . . . . . . . . . . . . . . . . . 21 |- (((1 / 4) + (1 / 2))[,]1) C_ (0[,]1)
248247sseli 2617 . . . . . . . . . . . . . . . . . . . 20 |- (((x / 2) + (1 / 2)) e. (((1 / 4) + (1 / 2))[,]1) -> ((x / 2) + (1 / 2)) e. (0[,]1))
249235, 237, 2483syl 24 . . . . . . . . . . . . . . . . . . 19 |- (x e. ((1 / 2)[,]1) -> ((x / 2) + (1 / 2)) e. (0[,]1))
250233, 249sylbir 218 . . . . . . . . . . . . . . . . . 18 |- ((x e. RR /\ (1 / 2) <_ x /\ x <_ 1) -> ((x / 2) + (1 / 2)) e. (0[,]1))
2512503expa 1067 . . . . . . . . . . . . . . . . 17 |- (((x e. RR /\ (1 / 2) <_ x) /\ x <_ 1) -> ((x / 2) + (1 / 2)) e. (0[,]1))
252251an1rs 547 . . . . . . . . . . . . . . . 16 |- (((x e. RR /\ x <_ 1) /\ (1 / 2) <_ x) -> ((x / 2) + (1 / 2)) e. (0[,]1))
253231, 252syldan 516 . . . . . . . . . . . . . . 15 |- (((x e. RR /\ x <_ 1) /\ -. x <_ (1 / 2)) -> ((x / 2) + (1 / 2)) e. (0[,]1))
2542533adantl2 1033 . . . . . . . . . . . . . 14 |- (((x e. RR /\ 0 <_ x /\ x <_ 1) /\ -. x <_ (1 / 2)) -> ((x / 2) + (1 / 2)) e. (0[,]1))
255254, 22sylanb 498 . . . . . . . . . . . . 13 |- ((x e. (0[,]1) /\ -. x <_ (1 / 2)) -> ((x / 2) + (1 / 2)) e. (0[,]1))
256255adantll 428 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> ((x / 2) + (1 / 2)) e. (0[,]1))
257 breq1 3341 . . . . . . . . . . . . . 14 |- (v = ((x / 2) + (1 / 2)) -> (v <_ (1 / 2) <-> ((x / 2) + (1 / 2)) <_ (1 / 2)))
258 opreq2 4890 . . . . . . . . . . . . . . 15 |- (v = ((x / 2) + (1 / 2)) -> (2 x. v) = (2 x. ((x / 2) + (1 / 2))))
259258fveq2d 4685 . . . . . . . . . . . . . 14 |- (v = ((x / 2) + (1 / 2)) -> (F` (2 x. v)) = (F` (2 x. ((x / 2) + (1 / 2)))))
260258opreq1d 4897 . . . . . . . . . . . . . . 15 |- (v = ((x / 2) + (1 / 2)) -> ((2 x. v) - 1) = ((2 x. ((x / 2) + (1 / 2))) - 1))
261260fveq2d 4685 . . . . . . . . . . . . . 14 |- (v = ((x / 2) + (1 / 2)) -> ((G(*p` J)H)` ((2 x. v) - 1)) = ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)))
262257, 259, 261ifbieq12d 2998 . . . . . . . . . . . . 13 |- (v = ((x / 2) + (1 / 2)) -> if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))) = if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))))
263 fvex 4689 . . . . . . . . . . . . . 14 |- (F` (2 x. ((x / 2) + (1 / 2)))) e. _V
264 fvex 4689 . . . . . . . . . . . . . 14 |- ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)) e. _V
265263, 264ifex 3031 . . . . . . . . . . . . 13 |- if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))) e. _V
266262, 62, 265fvopab4 4743 . . . . . . . . . . . 12 |- (((x / 2) + (1 / 2)) e. (0[,]1) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2))) = if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))))
267256, 266syl 12 . . . . . . . . . . 11 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2))) = if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))))
268 lttr 6677 . . . . . . . . . . . . . . . . . . . 20 |- ((0 e. RR /\ (1 / 2) e. RR /\ x e. RR) -> ((0 < (1 / 2) /\ (1 / 2) < x) -> 0 < x))
26911, 14, 268mp3an12 1181 . . . . . . . . . . . . . . . . . . 19 |- (x e. RR -> ((0 < (1 / 2) /\ (1 / 2) < x) -> 0 < x))
270240, 269mpani 762 . . . . . . . . . . . . . . . . . 18 |- (x e. RR -> ((1 / 2) < x -> 0 < x))
271 halfpos2 7223 . . . . . . . . . . . . . . . . . . . 20 |- (x e. RR -> (0 < x <-> 0 < (x / 2)))
27211a1i 8 . . . . . . . . . . . . . . . . . . . . 21 |- (x e. RR -> 0 e. RR)
273 rehalfcl 7220 . . . . . . . . . . . . . . . . . . . . 21 |- (x e. RR -> (x / 2) e. RR)
27414a1i 8 . . . . . . . . . . . . . . . . . . . . 21 |- (x e. RR -> (1 / 2) e. RR)
275 ltadd1 6806 . . . . . . . . . . . . . . . . . . . . 21 |- ((0 e. RR /\ (x / 2) e. RR /\ (1 / 2) e. RR) -> (0 < (x / 2) <-> (0 + (1 / 2)) < ((x / 2) + (1 / 2))))
276272, 273, 274, 275syl111anc 1100 . . . . . . . . . . . . . . . . . . . 20 |- (x e. RR -> (0 < (x / 2) <-> (0 + (1 / 2)) < ((x / 2) + (1 / 2))))
277271, 276bitrd 587 . . . . . . . . . . . . . . . . . . 19 |- (x e. RR -> (0 < x <-> (0 + (1 / 2)) < ((x / 2) + (1 / 2))))
278151addid2i 6484 . . . . . . . . . . . . . . . . . . . 20 |- (0 + (1 / 2)) = (1 / 2)
279278breq1i 3345 . . . . . . . . . . . . . . . . . . 19 |- ((0 + (1 / 2)) < ((x / 2) + (1 / 2)) <-> (1 / 2) < ((x / 2) + (1 / 2)))
280277, 279syl6bb 595 . . . . . . . . . . . . . . . . . 18 |- (x e. RR -> (0 < x <-> (1 / 2) < ((x / 2) + (1 / 2))))
281270, 280sylibd 219 . . . . . . . . . . . . . . . . 17 |- (x e. RR -> ((1 / 2) < x -> (1 / 2) < ((x / 2) + (1 / 2))))
28214, 226mpan 759 . . . . . . . . . . . . . . . . 17 |- (x e. RR -> ((1 / 2) < x <-> -. x <_ (1 / 2)))
283 ltnle 6680 . . . . . . . . . . . . . . . . . 18 |- (((1 / 2) e. RR /\ ((x / 2) + (1 / 2)) e. RR) -> ((1 / 2) < ((x / 2) + (1 / 2)) <-> -. ((x / 2) + (1 / 2)) <_ (1 / 2)))
284 readdcl 6455 . . . . . . . . . . . . . . . . . . 19 |- (((x / 2) e. RR /\ (1 / 2) e. RR) -> ((x / 2) + (1 / 2)) e. RR)
285284, 273, 14sylancl 525 . . . . . . . . . . . . . . . . . 18 |- (x e. RR -> ((x / 2) + (1 / 2)) e. RR)
286283, 14, 285sylancr 526 . . . . . . . . . . . . . . . . 17 |- (x e. RR -> ((1 / 2) < ((x / 2) + (1 / 2)) <-> -. ((x / 2) + (1 / 2)) <_ (1 / 2)))
287281, 282, 2863imtr3d 601 . . . . . . . . . . . . . . . 16 |- (x e. RR -> (-. x <_ (1 / 2) -> -. ((x / 2) + (1 / 2)) <_ (1 / 2)))
28840, 287syl 12 . . . . . . . . . . . . . . 15 |- (x e. (0[,]1) -> (-. x <_ (1 / 2) -> -. ((x / 2) + (1 / 2)) <_ (1 / 2)))
289288imp 377 . . . . . . . . . . . . . 14 |- ((x e. (0[,]1) /\ -. x <_ (1 / 2)) -> -. ((x / 2) + (1 / 2)) <_ (1 / 2))
290289adantll 428 . . . . . . . . . . . . 13 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> -. ((x / 2) + (1 / 2)) <_ (1 / 2))
291 iffalse 2991 . . . . . . . . . . . . 13 |- (-. ((x / 2) + (1 / 2)) <_ (1 / 2) -> if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))) = ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)))
292290, 291syl 12 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))) = ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)))
293 axresscn 6420 . . . . . . . . . . . . . . . . 17 |- RR C_ CC
29439, 293sstri 2626 . . . . . . . . . . . . . . . 16 |- (0[,]1) C_ CC
295294sseli 2617 . . . . . . . . . . . . . . 15 |- (x e. (0[,]1) -> x e. CC)
296 divdir 6933 . . . . . . . . . . . . . . . . . . . . 21 |- ((x e. CC /\ 1 e. CC /\ (2 e. CC /\ 2 =/= 0)) -> ((x + 1) / 2) = ((x / 2) + (1 / 2)))
29745, 47, 296mp3an23 1183 . . . . . . . . . . . . . . . . . . . 20 |- (x e. CC -> ((x + 1) / 2) = ((x / 2) + (1 / 2)))
298297eqcomd 1889 . . . . . . . . . . . . . . . . . . 19 |- (x e. CC -> ((x / 2) + (1 / 2)) = ((x + 1) / 2))
299298opreq2d 4898 . . . . . . . . . . . . . . . . . 18 |- (x e. CC -> (2 x. ((x / 2) + (1 / 2))) = (2 x. ((x + 1) / 2)))
300 peano2cn 6498 . . . . . . . . . . . . . . . . . . 19 |- (x e. CC -> (x + 1) e. CC)
30146a1i 8 . . . . . . . . . . . . . . . . . . 19 |- (x e. CC -> 2 e. CC)
30213a1i 8 . . . . . . . . . . . . . . . . . . 19 |- (x e. CC -> 2 =/= 0)
303 divcan2 6910 . . . . . . . . . . . . . . . . . . 19 |- (((x + 1) e. CC /\ 2 e. CC /\ 2 =/= 0) -> (2 x. ((x + 1) / 2)) = (x + 1))
304300, 301, 302, 303syl111anc 1100 . . . . . . . . . . . . . . . . . 18 |- (x e. CC -> (2 x. ((x + 1) / 2)) = (x + 1))
305299, 304eqtrd 1925 . . . . . . . . . . . . . . . . 17 |- (x e. CC -> (2 x. ((x / 2) + (1 / 2))) = (x + 1))
306305opreq1d 4897 . . . . . . . . . . . . . . . 16 |- (x e. CC -> ((2 x. ((x / 2) + (1 / 2))) - 1) = ((x + 1) - 1))
307 pncan 6557 . . . . . . . . . . . . . . . . 17 |- ((x e. CC /\ 1 e. CC) -> ((x + 1) - 1) = x)
30845, 307mpan2 760 . . . . . . . . . . . . . . . 16 |- (x e. CC -> ((x + 1) - 1) = x)
309306, 308eqtrd 1925 . . . . . . . . . . . . . . 15 |- (x e. CC -> ((2 x. ((x / 2) + (1 / 2))) - 1) = x)
310295, 309syl 12 . . . . . . . . . . . . . 14 |- (x e. (0[,]1) -> ((2 x. ((x / 2) + (1 / 2))) - 1) = x)
311310fveq2d 4685 . . . . . . . . . . . . 13 |- (x e. (0[,]1) -> ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)) = ((G(*p` J)H)` x))
312311ad2antlr 441 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1)) = ((G(*p` J)H)` x))
313 pcoval2 16075 . . . . . . . . . . . . . 14 |- (((J e. Top /\ (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0))) /\ x e. ((1 / 2)[,]1)) -> ((G(*p` J)H)` x) = (H` ((2 x. x) - 1)))
314233biimpri 169 . . . . . . . . . . . . . . . . . . 19 |- ((x e. RR /\ (1 / 2) <_ x /\ x <_ 1) -> x e. ((1 / 2)[,]1))
3153143expa 1067 . . . . . . . . . . . . . . . . . 18 |- (((x e. RR /\ (1 / 2) <_ x) /\ x <_ 1) -> x e. ((1 / 2)[,]1))
316315an1rs 547 . . . . . . . . . . . . . . . . 17 |- (((x e. RR /\ x <_ 1) /\ (1 / 2) <_ x) -> x e. ((1 / 2)[,]1))
317231, 316syldan 516 . . . . . . . . . . . . . . . 16 |- (((x e. RR /\ x <_ 1) /\ -. x <_ (1 / 2)) -> x e. ((1 / 2)[,]1))
3183173adantl2 1033 . . . . . . . . . . . . . . 15 |- (((x e. RR /\ 0 <_ x /\ x <_ 1) /\ -. x <_ (1 / 2)) -> x e. ((1 / 2)[,]1))
319318, 22sylanb 498 . . . . . . . . . . . . . 14 |- ((x e. (0[,]1) /\ -. x <_ (1 / 2)) -> x e. ((1 / 2)[,]1))
320313, 146, 319syl2an 503 . . . . . . . . . . . . 13 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ (x e. (0[,]1) /\ -. x <_ (1 / 2))) -> ((G(*p` J)H)` x) = (H` ((2 x. x) - 1)))
321320anassrs 489 . . . . . . . . . . . 12 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> ((G(*p` J)H)` x) = (H` ((2 x. x) - 1)))
322292, 312, 3213eqtrd 1929 . . . . . . . . . . 11 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> if(((x / 2) + (1 / 2)) <_ (1 / 2), (F` (2 x. ((x / 2) + (1 / 2)))), ((G(*p` J)H)` ((2 x. ((x / 2) + (1 / 2))) - 1))) = (H` ((2 x. x) - 1)))
323267, 322eqtr2d 1926 . . . . . . . . . 10 |- ((((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) /\ -. x <_ (1 / 2)) -> (H` ((2 x. x) - 1)) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2))))
324323ifeq2da 15694 . . . . . . . . 9 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) -> if(x <_ (1 / 2), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))), (H` ((2 x. x) - 1))) = if(x <_ (1 / 2), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2)))))
325225, 324eqtrd 1925 . . . . . . . 8 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) -> if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))) = if(x <_ (1 / 2), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2)))))
326 fvif 15692 . . . . . . . 8 |- ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))) = if(x <_ (1 / 2), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 4), (2 x. x), (x + (1 / 4)))), ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` ((x / 2) + (1 / 2))))
327325, 326syl6eqr 1946 . . . . . . 7 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) -> if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))
328327eqeq2d 1895 . . . . . 6 |- (((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) /\ x e. (0[,]1)) -> (y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))) <-> y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))))
329328pm5.32da 711 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((x e. (0[,]1) /\ y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1)))) <-> (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))))
330329opabbidv 3401 . . . 4 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))))} = {<.x, y>. | (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))})
331 fvex 4689 . . . . . . 7 |- (F` (2 x. v)) e. _V
332 fvex 4689 . . . . . . 7 |- ((G(*p` J)H)` ((2 x. v) - 1)) e. _V
333331, 332ifex 3031 . . . . . 6 |- if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))) e. _V
334333, 62fnopab2 4549 . . . . 5 |- {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} Fn (0[,]1)
33592, 112syl 12 . . . . . . . . . . . 12 |- (x e. (0[,](1 / 2)) -> (x + (1 / 4)) e. (0[,]1))
336 ifcl 3007 . . . . . . . . . . . 12 |- (((2 x. x) e. (0[,]1) /\ (x + (1 / 4)) e. (0[,]1)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
33724, 335, 336syl11anc 524 . . . . . . . . . . 11 |- (x e. (0[,](1 / 2)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
33816, 337sylbir 218 . . . . . . . . . 10 |- ((x e. RR /\ 0 <_ x /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
3393383expa 1067 . . . . . . . . 9 |- (((x e. RR /\ 0 <_ x) /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
3403393adantl3 1034 . . . . . . . 8 |- (((x e. RR /\ 0 <_ x /\ x <_ 1) /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
341340, 22sylanb 498 . . . . . . 7 |- ((x e. (0[,]1) /\ x <_ (1 / 2)) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. (0[,]1))
342341, 255ifclda 15695 . . . . . 6 |- (x e. (0[,]1) -> if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))) e. (0[,]1))
343 eqid 1884 . . . . . 6 |- {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))} = {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}
344 eqid 1884 . . . . . 6 |- {<.x, y>. | (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))} = {<.x, y>. | (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))}
345342, 343, 344fnopabco 15711 . . . . 5 |- ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} Fn (0[,]1) -> {<.x, y>. | (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))} = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}))
346334, 345ax-mp 7 . . . 4 |- {<.x, y>. | (x e. (0[,]1) /\ y = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))}` if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2)))))} = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))})
347330, 346syl6eq 1944 . . 3 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))))} = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}))
348 pcocn 16076 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ (F` 1) = (G` 0))) -> (F(*p` J)G) e. (II Cn J))
3491, 3, 5, 6, 348syl13anc 1102 . . . 4 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F(*p` J)G) e. (II Cn J))
350 pco1 16078 . . . . . 6 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ (F` 1) = (G` 0))) -> ((F(*p` J)G)` 1) = (G` 1))
3511, 3, 5, 6, 350syl13anc 1102 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)` 1) = (G` 1))
352351, 144eqtrd 1925 . . . 4 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)` 1) = (H` 0))
353 pcoval 16073 . . . 4 |- ((J e. Top /\ ((F(*p` J)G) e. (II Cn J) /\ H e. (II Cn J) /\ ((F(*p` J)G)` 1) = (H` 0))) -> ((F(*p` J)G)(*p` J)H) = {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))))})
3541, 349, 143, 352, 353syl13anc 1102 . . 3 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)(*p` J)H) = {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), ((F(*p` J)G)` (2 x. x)), (H` ((2 x. x) - 1))))})
355 pcocn 16076 . . . . . 6 |- ((J e. Top /\ (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0))) -> (G(*p` J)H) e. (II Cn J))
3561, 5, 143, 144, 355syl13anc 1102 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (G(*p` J)H) e. (II Cn J))
357 pco0 16077 . . . . . . 7 |- ((J e. Top /\ (G e. (II Cn J) /\ H e. (II Cn J) /\ (G` 1) = (H` 0))) -> ((G(*p` J)H)` 0) = (G` 0))
3581, 5, 143, 144, 357syl13anc 1102 . . . . . 6 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((G(*p` J)H)` 0) = (G` 0))
3596, 358eqtr4d 1928 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F` 1) = ((G(*p` J)H)` 0))
360 pcoval 16073 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ (G(*p` J)H) e. (II Cn J) /\ (F` 1) = ((G(*p` J)H)` 0))) -> (F(*p` J)(G(*p` J)H)) = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))})
3611, 3, 356, 359, 360syl13anc 1102 . . . 4 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F(*p` J)(G(*p` J)H)) = {<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))})
362361coeq1d 4127 . . 3 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)(G(*p` J)H)) o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}) = ({<.v, w>. | (v e. (0[,]1) /\ w = if(v <_ (1 / 2), (F` (2 x. v)), ((G(*p` J)H)` ((2 x. v) - 1))))} o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}))
363347, 354, 3623eqtr4d 1937 . 2 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)(*p` J)H) = ((F(*p` J)(G(*p` J)H)) o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}))
364 reparpht 16065 . . 3 |- (((J e. Top /\ (F(*p` J)(G(*p` J)H)) e. (II Cn J)) /\ ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))} e. (II Cn II) /\ ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 0) = 0 /\ ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 1) = 1)) -> ((F(*p` J)(G(*p` J)H)) o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))})(~=ph` J)(F(*p` J)(G(*p` J)H)))
365 pcocn 16076 . . . . 5 |- ((J e. Top /\ (F e. (II Cn J) /\ (G(*p` J)H) e. (II Cn J) /\ (F` 1) = ((G(*p` J)H)` 0))) -> (F(*p` J)(G(*p` J)H)) e. (II Cn J))
3661, 3, 356, 359, 365syl13anc 1102 . . . 4 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (F(*p` J)(G(*p` J)H)) e. (II Cn J))
3671, 366jca 310 . . 3 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> (J e. Top /\ (F(*p` J)(G(*p` J)H)) e. (II Cn J)))
368 elicc2 7560 . . . . . . 7 |- ((0 e. RR /\ 1 e. RR) -> ((1 / 2) e. (0[,]1) <-> ((1 / 2) e. RR /\ 0 <_ (1 / 2) /\ (1 / 2) <_ 1)))
36911, 20, 368mp2an 761 . . . . . 6 |- ((1 / 2) e. (0[,]1) <-> ((1 / 2) e. RR /\ 0 <_ (1 / 2) /\ (1 / 2) <_ 1))
370 halflt1 7216 . . . . . . 7 |- (1 / 2) < 1
37114, 20, 370ltleii 6756 . . . . . 6 |- (1 / 2) <_ 1
372369, 14, 241, 371mpbir3an 1052 . . . . 5 |- (1 / 2) e. (0[,]1)
373 oprex 4907 . . . . . 6 |- (2 x. x) e. _V
374 oprex 4907 . . . . . 6 |- (x + (1 / 4)) e. _V
375373, 374ifex 3031 . . . . 5 |- if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) e. _V
376 oprex 4907 . . . . 5 |- ((x / 2) + (1 / 2)) e. _V
377 dfii2 15869 . . . . 5 |- II = (subSp` <.(0[,]1), (topGen` ran (,))>.)
378 eqid 1884 . . . . 5 |- (subSp` <.(0[,](1 / 2)), (topGen` ran (,))>.) = (subSp` <.(0[,](1 / 2)), (topGen` ran (,))>.)
379 eqid 1884 . . . . 5 |- (subSp` <.((1 / 2)[,]1), (topGen` ran (,))>.) = (subSp` <.((1 / 2)[,]1), (topGen` ran (,))>.)
380151, 79addcomi 6475 . . . . . . 7 |- ((1 / 2) + (1 / 4)) = ((1 / 4) + (1 / 2))
38152opreq1i 4892 . . . . . . 7 |- (((1 / 2) / 2) + (1 / 2)) = ((1 / 4) + (1 / 2))
382380, 381eqtr4i 1911 . . . . . 6 |- ((1 / 2) + (1 / 4)) = (((1 / 2) / 2) + (1 / 2))
383 breq1 3341 . . . . . . . 8 |- (x = (1 / 2) -> (x <_ (1 / 4) <-> (1 / 2) <_ (1 / 4)))
384 opreq2 4890 . . . . . . . 8 |- (x = (1 / 2) -> (2 x. x) = (2 x. (1 / 2)))
385 opreq1 4889 . . . . . . . 8 |- (x = (1 / 2) -> (x + (1 / 4)) = ((1 / 2) + (1 / 4)))
386383, 384, 385ifbieq12d 2998 . . . . . . 7 |- (x = (1 / 2) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) = if((1 / 2) <_ (1 / 4), (2 x. (1 / 2)), ((1 / 2) + (1 / 4))))
38712, 41, 12, 41, 12, 41sqrlem15 7937 . . . . . . . . . . 11 |- 2 < (2 + 2)
388 2p2e4 7185 . . . . . . . . . . 11 |- (2 + 2) = 4
389387, 388breqtri 3360 . . . . . . . . . 10 |- 2 < 4
39012, 75, 41, 76ltrecii 7061 . . . . . . . . . 10 |- (2 < 4 <-> (1 / 4) < (1 / 2))
391389, 390mpbi 206 . . . . . . . . 9 |- (1 / 4) < (1 / 2)
39278, 14ltnlei 6754 . . . . . . . . 9 |- ((1 / 4) < (1 / 2) <-> -. (1 / 2) <_ (1 / 4))
393391, 392mpbi 206 . . . . . . . 8 |- -. (1 / 2) <_ (1 / 4)
394 iffalse 2991 . . . . . . . 8 |- (-. (1 / 2) <_ (1 / 4) -> if((1 / 2) <_ (1 / 4), (2 x. (1 / 2)), ((1 / 2) + (1 / 4))) = ((1 / 2) + (1 / 4)))
395393, 394ax-mp 7 . . . . . . 7 |- if((1 / 2) <_ (1 / 4), (2 x. (1 / 2)), ((1 / 2) + (1 / 4))) = ((1 / 2) + (1 / 4))
396386, 395syl6eq 1944 . . . . . 6 |- (x = (1 / 2) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) = ((1 / 2) + (1 / 4)))
397 opreq1 4889 . . . . . . 7 |- (x = (1 / 2) -> (x / 2) = ((1 / 2) / 2))
398397opreq1d 4897 . . . . . 6 |- (x = (1 / 2) -> ((x / 2) + (1 / 2)) = (((1 / 2) / 2) + (1 / 2)))
399382, 396, 3983eqtr4a 1954 . . . . 5 |- (x = (1 / 2) -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) = ((x / 2) + (1 / 2)))
400 eqid 1884 . . . . 5 |- {<.x, y>. | (x e. (0[,](1 / 2)) /\ y = if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))))} = {<.x, y>. | (x e. (0[,](1 / 2)) /\ y = if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))))}
401 eqid 1884 . . . . 5 |- {<.x, y>. | (x e. ((1 / 2)[,]1) /\ y = ((x / 2) + (1 / 2)))} = {<.x, y>. | (x e. ((1 / 2)[,]1) /\ y = ((x / 2) + (1 / 2)))}
402 iitop 15867 . . . . 5 |- II e. Top
403 elicc2 7560 . . . . . . . 8 |- ((0 e. RR /\ (1 / 2) e. RR) -> ((1 / 4) e. (0[,](1 / 2)) <-> ((1 / 4) e. RR /\ 0 <_ (1 / 4) /\ (1 / 4) <_ (1 / 2))))
40411, 14, 403mp2an 761 . . . . . . 7 |- ((1 / 4) e. (0[,](1 / 2)) <-> ((1 / 4) e. RR /\ 0 <_ (1 / 4) /\ (1 / 4) <_ (1 / 2)))
40578, 14, 391ltleii 6756 . . . . . . 7 |- (1 / 4) <_ (1 / 2)
406404, 78, 98, 405mpbir3an 1052 . . . . . 6 |- (1 / 4) e. (0[,](1 / 2))
407 eqid 1884 . . . . . 6 |- (subSp` <.(0[,](1 / 4)), (topGen` ran (,))>.) = (subSp` <.(0[,](1 / 4)), (topGen` ran (,))>.)
408 eqid 1884 . . . . . 6 |- (subSp` <.((1 / 4)[,](1 / 2)), (topGen` ran (,))>.) = (subSp` <.((1 / 4)[,](1 / 2)), (topGen` ran (,))>.)
409792timesi 7187 . . . . . . 7 |- (2 x. (1 / 4)) = ((1 / 4) + (1 / 4))
410 opreq2 4890 . . . . . . 7 |- (x = (1 / 4) -> (2 x. x) = (2 x. (1 / 4)))
411 opreq1 4889 . . . . . . 7 |- (x = (1 / 4) -> (x + (1 / 4)) = ((1 / 4) + (1 / 4)))
412409, 410, 4113eqtr4a 1954 . . . . . 6 |- (x = (1 / 4) -> (2 x. x) = (x + (1 / 4)))
413 eqid 1884 . . . . . 6 |- {<.x, y>. | (x e. (0[,](1 / 4)) /\ y = (2 x. x))} = {<.x, y>. | (x e. (0[,](1 / 4)) /\ y = (2 x. x))}
414 eqid 1884 . . . . . 6 |- {<.x, y>. | (x e. ((1 / 4)[,](1 / 2)) /\ y = (x + (1 / 4)))} = {<.x, y>. | (x e. ((1 / 4)[,](1 / 2)) /\ y = (x + (1 / 4)))}
415 iccssre 7565 . . . . . . . . 9 |- ((0 e. RR /\ (1 / 4) e. RR) -> (0[,](1 / 4)) C_ RR)
41611, 78, 415mp2an 761 . . . . . . . 8 |- (0[,](1 / 4)) C_ RR
417416, 293sstri 2626 . . . . . . 7 |- (0[,](1 / 4)) C_ CC
418 eqid 1884 . . . . . . 7 |- {<.x, y>. | (x e. CC /\ y = (2 x. x))} = {<.x, y>. | (x e. CC /\ y = (2 x. x))}
419417sseli 2617 . . . . . . . . . 10 |- (x e. (0[,](1 / 4)) -> x e. CC)
420181, 46, 419sylancr 526 . . . . . . . . 9 |- (x e. (0[,](1 / 4)) -> (2 x. x) = (x x. 2))
42146mul02i 6595 . . . . . . . . . 10 |- (0 x. 2) = 0
42211, 78, 185, 421, 187iccdili 15862 . . . . . . . . 9 |- (x e. (0[,](1 / 4)) -> (x x. 2) e. (0[,](1 / 2)))
423420, 422eqeltrd 1971 . . . . . . . 8 |- (x e. (0[,](1 / 4)) -> (2 x. x) e. (0[,](1 / 2)))
42411, 14pm3.2i 307 . . . . . . . . . 10 |- (0 e. RR /\ (1 / 2) e. RR)
42511leidi 6790 . . . . . . . . . . 11 |- 0 <_ 0
426425, 371pm3.2i 307 . . . . . . . . . 10 |- (0 <_ 0 /\ (1 / 2) <_ 1)
427 iccss 15855 . . . . . . . . . 10 |- (((0 e. RR /\ 1 e. RR) /\ (0 e. RR /\ (1 / 2) e. RR) /\ (0 <_ 0 /\ (1 / 2) <_ 1)) -> (0[,](1 / 2)) C_ (0[,]1))
42893, 424, 426, 427mp3an 1191 . . . . . . . . 9 |- (0[,](1 / 2)) C_ (0[,]1)
429428sseli 2617 . . . . . . . 8 |- ((2 x. x) e. (0[,](1 / 2)) -> (2 x. x) e. (0[,]1))
430423, 429syl 12 . . . . . . 7 |- (x e. (0[,](1 / 4)) -> (2 x. x) e. (0[,]1))
431418mulc1cncf 8541 . . . . . . . 8 |- (2 e. CC -> {<.x, y>. | (x e. CC /\ y = (2 x. x))} e. (CC-cn->CC))
43246, 431ax-mp 7 . . . . . . 7 |- {<.x, y>. | (x e. CC /\ y = (2 x. x))} e. (CC-cn->CC)
433 stioo 15845 . . . . . . . 8 |- ((0[,](1 / 4)) C_ RR -> (subSp` <.(0[,](1 / 4)), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` ((0[,](1 / 4)) X. (0[,](1 / 4))))))
434416, 433ax-mp 7 . . . . . . 7 |- (subSp` <.(0[,](1 / 4)), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` ((0[,](1 / 4)) X. (0[,](1 / 4)))))
435 df-ii 15866 . . . . . . 7 |- II = (Open` ((abs o. - ) |` ((0[,]1) X. (0[,]1))))
436417, 294, 418, 413, 430, 432, 434, 435cncfres 15895 . . . . . 6 |- {<.x, y>. | (x e. (0[,](1 / 4)) /\ y = (2 x. x))} e. ((subSp` <.(0[,](1 / 4)), (topGen` ran (,))>.) Cn II)
437 iccssre 7565 . . . . . . . . 9 |- (((1 / 4) e. RR /\ (1 / 2) e. RR) -> ((1 / 4)[,](1 / 2)) C_ RR)
43878, 14, 437mp2an 761 . . . . . . . 8 |- ((1 / 4)[,](1 / 2)) C_ RR
439438, 293sstri 2626 . . . . . . 7 |- ((1 / 4)[,](1 / 2)) C_ CC
440 eqid 1884 . . . . . . 7 |- {<.x, y>. | (x e. CC /\ y = (x + (1 / 4)))} = {<.x, y>. | (x e. CC /\ y = (x + (1 / 4)))}
441 eqid 1884 . . . . . . . . 9 |- ((1 / 4) + (1 / 4)) = ((1 / 4) + (1 / 4))
44278, 14, 78, 441, 91iccshftri 15858 . . . . . . . 8 |- (x e. ((1 / 4)[,](1 / 2)) -> (x + (1 / 4)) e. (((1 / 4) + (1 / 4))[,](3 / 4)))
44378, 78readdcli 6487 . . . . . . . . . . 11 |- ((1 / 4) + (1 / 4)) e. RR
444443, 95pm3.2i 307 . . . . . . . . . 10 |- (((1 / 4) + (1 / 4)) e. RR /\ (3 / 4) e. RR)
44578, 78addge0i 6777 . . . . . . . . . . . 12 |- ((0 <_ (1 / 4) /\ 0 <_ (1 / 4)) -> 0 <_ ((1 / 4) + (1 / 4)))
44698, 98, 445mp2an 761 . . . . . . . . . . 11 |- 0 <_ ((1 / 4) + (1 / 4))
447446, 108pm3.2i 307 . . . . . . . . . 10 |- (0 <_ ((1 / 4) + (1 / 4)) /\ (3 / 4) <_ 1)
448 iccss 15855 . . . . . . . . . 10 |- (((0 e. RR /\ 1 e. RR) /\ (((1 / 4) + (1 / 4)) e. RR /\ (3 / 4) e. RR) /\ (0 <_ ((1 / 4) + (1 / 4)) /\ (3 / 4) <_ 1)) -> (((1 / 4) + (1 / 4))[,](3 / 4)) C_ (0[,]1))
44993, 444, 447, 448mp3an 1191 . . . . . . . . 9 |- (((1 / 4) + (1 / 4))[,](3 / 4)) C_ (0[,]1)
450449sseli 2617 . . . . . . . 8 |- ((x + (1 / 4)) e. (((1 / 4) + (1 / 4))[,](3 / 4)) -> (x + (1 / 4)) e. (0[,]1))
451442, 450syl 12 . . . . . . 7 |- (x e. ((1 / 4)[,](1 / 2)) -> (x + (1 / 4)) e. (0[,]1))
452440addccncf 15883 . . . . . . . 8 |- ((1 / 4) e. CC -> {<.x, y>. | (x e. CC /\ y = (x + (1 / 4)))} e. (CC-cn->CC))
45379, 452ax-mp 7 . . . . . . 7 |- {<.x, y>. | (x e. CC /\ y = (x + (1 / 4)))} e. (CC-cn->CC)
454 stioo 15845 . . . . . . . 8 |- (((1 / 4)[,](1 / 2)) C_ RR -> (subSp` <.((1 / 4)[,](1 / 2)), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` (((1 / 4)[,](1 / 2)) X. ((1 / 4)[,](1 / 2))))))
455438, 454ax-mp 7 . . . . . . 7 |- (subSp` <.((1 / 4)[,](1 / 2)), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` (((1 / 4)[,](1 / 2)) X. ((1 / 4)[,](1 / 2)))))
456439, 294, 440, 414, 451, 453, 455, 435cncfres 15895 . . . . . 6 |- {<.x, y>. | (x e. ((1 / 4)[,](1 / 2)) /\ y = (x + (1 / 4)))} e. ((subSp` <.((1 / 4)[,](1 / 2)), (topGen` ran (,))>.) Cn II)
45711, 14, 406, 373, 374, 400, 378, 407, 408, 412, 413, 414, 402, 436, 456piececn 15894 . . . . 5 |- {<.x, y>. | (x e. (0[,](1 / 2)) /\ y = if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))))} e. ((subSp` <.(0[,](1 / 2)), (topGen` ran (,))>.) Cn II)
458 iccssre 7565 . . . . . . . 8 |- (((1 / 2) e. RR /\ 1 e. RR) -> ((1 / 2)[,]1) C_ RR)
45914, 20, 458mp2an 761 . . . . . . 7 |- ((1 / 2)[,]1) C_ RR
460459, 293sstri 2626 . . . . . 6 |- ((1 / 2)[,]1) C_ CC
461 eqid 1884 . . . . . 6 |- {<.x, y>. | (x e. CC /\ y = ((x / 2) + (1 / 2)))} = {<.x, y>. | (x e. CC /\ y = ((x / 2) + (1 / 2)))}
462 eqid 1884 . . . . . . . . . 10 |- {<.x, v>. | (x e. CC /\ v = (x / 2))} = {<.x, v>. | (x e. CC /\ v = (x / 2))}
463 halfcl 7219 . . . . . . . . . 10 |- (x e. CC -> (x / 2) e. CC)
464462, 463fopab 4800 . . . . . . . . 9 |- {<.x, v>. | (x e. CC /\ v = (x / 2))}:CC-->CC
465 frn 4569 . . . . . . . . 9 |- ({<.x, v>. | (x e. CC /\ v = (x / 2))}:CC-->CC -> ran {<.x, v>. | (x e. CC /\ v = (x / 2))} C_ CC)
466464, 465ax-mp 7 . . . . . . . 8 |- ran {<.x, v>. | (x e. CC /\ v = (x / 2))} C_ CC
467 oprex 4907 . . . . . . . . 9 |- (x / 2) e. _V
468 oprex 4907 . . . . . . . . 9 |- (w + (1 / 2)) e. _V
469 opreq1 4889 . . . . . . . . 9 |- (w = (x / 2) -> (w + (1 / 2)) = ((x / 2) + (1 / 2)))
470 eqid 1884 . . . . . . . . 9 |- {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} = {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))}
471467, 468, 376, 469, 462, 470, 461fopabco 4805 . . . . . . . 8 |- (ran {<.x, v>. | (x e. CC /\ v = (x / 2))} C_ CC -> ({<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} o. {<.x, v>. | (x e. CC /\ v = (x / 2))}) = {<.x, y>. | (x e. CC /\ y = ((x / 2) + (1 / 2)))})
472466, 471ax-mp 7 . . . . . . 7 |- ({<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} o. {<.x, v>. | (x e. CC /\ v = (x / 2))}) = {<.x, y>. | (x e. CC /\ y = ((x / 2) + (1 / 2)))}
473 ssid 2634 . . . . . . . . 9 |- CC C_ CC
474473, 473, 4733pm3.2i 1048 . . . . . . . 8 |- (CC C_ CC /\ CC C_ CC /\ CC C_ CC)
475462divccncf 8542 . . . . . . . . . 10 |- ((2 e. CC /\ 2 =/= 0) -> {<.x, v>. | (x e. CC /\ v = (x / 2))} e. (CC-cn->CC))
47646, 13, 475mp2an 761 . . . . . . . . 9 |- {<.x, v>. | (x e. CC /\ v = (x / 2))} e. (CC-cn->CC)
477470addccncf 15883 . . . . . . . . . 10 |- ((1 / 2) e. CC -> {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} e. (CC-cn->CC))
478151, 477ax-mp 7 . . . . . . . . 9 |- {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} e. (CC-cn->CC)
479476, 478pm3.2i 307 . . . . . . . 8 |- ({<.x, v>. | (x e. CC /\ v = (x / 2))} e. (CC-cn->CC) /\ {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} e. (CC-cn->CC))
480 cncfco 15887 . . . . . . . 8 |- (((CC C_ CC /\ CC C_ CC /\ CC C_ CC) /\ ({<.x, v>. | (x e. CC /\ v = (x / 2))} e. (CC-cn->CC) /\ {<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} e. (CC-cn->CC))) -> ({<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} o. {<.x, v>. | (x e. CC /\ v = (x / 2))}) e. (CC-cn->CC))
481474, 479, 480mp2an 761 . . . . . . 7 |- ({<.w, z>. | (w e. CC /\ z = (w + (1 / 2)))} o. {<.x, v>. | (x e. CC /\ v = (x / 2))}) e. (CC-cn->CC)
482472, 481eqeltrri 1968 . . . . . 6 |- {<.x, y>. | (x e. CC /\ y = ((x / 2) + (1 / 2)))} e. (CC-cn->CC)
483 stioo 15845 . . . . . . 7 |- (((1 / 2)[,]1) C_ RR -> (subSp` <.((1 / 2)[,]1), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` (((1 / 2)[,]1) X. ((1 / 2)[,]1)))))
484459, 483ax-mp 7 . . . . . 6 |- (subSp` <.((1 / 2)[,]1), (topGen` ran (,))>.) = (Open` ((abs o. - ) |` (((1 / 2)[,]1) X. ((1 / 2)[,]1))))
485460, 294, 461, 401, 249, 482, 484, 435cncfres 15895 . . . . 5 |- {<.x, y>. | (x e. ((1 / 2)[,]1) /\ y = ((x / 2) + (1 / 2)))} e. ((subSp` <.((1 / 2)[,]1), (topGen` ran (,))>.) Cn II)
48611, 20, 372, 375, 376, 343, 377, 378, 379, 399, 400, 401, 402, 457, 485piececn 15894 . . . 4 |- {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))} e. (II Cn II)
487 lt01 6871 . . . . . . . 8 |- 0 < 1
48811, 20, 487ltleii 6756 . . . . . . 7 |- 0 <_ 1
489 lbicc2 7573 . . . . . . 7 |- ((0 e. RR /\ 1 e. RR /\ 0 <_ 1) -> 0 e. (0[,]1))
49011, 20, 488, 489mp3an 1191 . . . . . 6 |- 0 e. (0[,]1)
491 breq1 3341 . . . . . . . 8 |- (x = 0 -> (x <_ (1 / 2) <-> 0 <_ (1 / 2)))
492 breq1 3341 . . . . . . . . 9 |- (x = 0 -> (x <_ (1 / 4) <-> 0 <_ (1 / 4)))
493 opreq2 4890 . . . . . . . . 9 |- (x = 0 -> (2 x. x) = (2 x. 0))
494 opreq1 4889 . . . . . . . . 9 |- (x = 0 -> (x + (1 / 4)) = (0 + (1 / 4)))
495492, 493, 494ifbieq12d 2998 . . . . . . . 8 |- (x = 0 -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) = if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))))
496 opreq1 4889 . . . . . . . . 9 |- (x = 0 -> (x / 2) = (0 / 2))
497496opreq1d 4897 . . . . . . . 8 |- (x = 0 -> ((x / 2) + (1 / 2)) = ((0 / 2) + (1 / 2)))
498491, 495, 497ifbieq12d 2998 . . . . . . 7 |- (x = 0 -> if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))) = if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2))))
499 oprex 4907 . . . . . . . . 9 |- (2 x. 0) e. _V
500 oprex 4907 . . . . . . . . 9 |- (0 + (1 / 4)) e. _V
501499, 500ifex 3031 . . . . . . . 8 |- if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))) e. _V
502 oprex 4907 . . . . . . . 8 |- ((0 / 2) + (1 / 2)) e. _V
503501, 502ifex 3031 . . . . . . 7 |- if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2))) e. _V
504498, 343, 503fvopab4 4743 . . . . . 6 |- (0 e. (0[,]1) -> ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 0) = if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2))))
505490, 504ax-mp 7 . . . . 5 |- ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 0) = if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2)))
506 iftrue 2989 . . . . . 6 |- (0 <_ (1 / 2) -> if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2))) = if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))))
507241, 506ax-mp 7 . . . . 5 |- if(0 <_ (1 / 2), if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))), ((0 / 2) + (1 / 2))) = if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4)))
508 iftrue 2989 . . . . . . 7 |- (0 <_ (1 / 4) -> if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))) = (2 x. 0))
50998, 508ax-mp 7 . . . . . 6 |- if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))) = (2 x. 0)
51046mul01i 6594 . . . . . 6 |- (2 x. 0) = 0
511509, 510eqtri 1908 . . . . 5 |- if(0 <_ (1 / 4), (2 x. 0), (0 + (1 / 4))) = 0
512505, 507, 5113eqtri 1912 . . . 4 |- ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 0) = 0
513 ubicc2 7574 . . . . . . 7 |- ((0 e. RR /\ 1 e. RR /\ 0 <_ 1) -> 1 e. (0[,]1))
51411, 20, 488, 513mp3an 1191 . . . . . 6 |- 1 e. (0[,]1)
515 breq1 3341 . . . . . . . 8 |- (x = 1 -> (x <_ (1 / 2) <-> 1 <_ (1 / 2)))
516 breq1 3341 . . . . . . . . 9 |- (x = 1 -> (x <_ (1 / 4) <-> 1 <_ (1 / 4)))
517 opreq2 4890 . . . . . . . . 9 |- (x = 1 -> (2 x. x) = (2 x. 1))
518 opreq1 4889 . . . . . . . . 9 |- (x = 1 -> (x + (1 / 4)) = (1 + (1 / 4)))
519516, 517, 518ifbieq12d 2998 . . . . . . . 8 |- (x = 1 -> if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))) = if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))))
520 opreq1 4889 . . . . . . . . 9 |- (x = 1 -> (x / 2) = (1 / 2))
521520opreq1d 4897 . . . . . . . 8 |- (x = 1 -> ((x / 2) + (1 / 2)) = ((1 / 2) + (1 / 2)))
522515, 519, 521ifbieq12d 2998 . . . . . . 7 |- (x = 1 -> if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))) = if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2))))
523 oprex 4907 . . . . . . . . 9 |- (2 x. 1) e. _V
524 oprex 4907 . . . . . . . . 9 |- (1 + (1 / 4)) e. _V
525523, 524ifex 3031 . . . . . . . 8 |- if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))) e. _V
526 oprex 4907 . . . . . . . 8 |- ((1 / 2) + (1 / 2)) e. _V
527525, 526ifex 3031 . . . . . . 7 |- if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2))) e. _V
528522, 343, 527fvopab4 4743 . . . . . 6 |- (1 e. (0[,]1) -> ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 1) = if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2))))
529514, 528ax-mp 7 . . . . 5 |- ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 1) = if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2)))
53014, 20ltnlei 6754 . . . . . . 7 |- ((1 / 2) < 1 <-> -. 1 <_ (1 / 2))
531370, 530mpbi 206 . . . . . 6 |- -. 1 <_ (1 / 2)
532 iffalse 2991 . . . . . 6 |- (-. 1 <_ (1 / 2) -> if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2))) = ((1 / 2) + (1 / 2)))
533531, 532ax-mp 7 . . . . 5 |- if(1 <_ (1 / 2), if(1 <_ (1 / 4), (2 x. 1), (1 + (1 / 4))), ((1 / 2) + (1 / 2))) = ((1 / 2) + (1 / 2))
534529, 533, 1643eqtri 1912 . . . 4 |- ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 1) = 1
535486, 512, 5343pm3.2i 1048 . . 3 |- ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))} e. (II Cn II) /\ ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 0) = 0 /\ ({<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))}` 1) = 1)
536364, 367, 535sylancl 525 . 2 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)(G(*p` J)H)) o. {<.x, y>. | (x e. (0[,]1) /\ y = if(x <_ (1 / 2), if(x <_ (1 / 4), (2 x. x), (x + (1 / 4))), ((x / 2) + (1 / 2))))})(~=ph` J)(F(*p` J)(G(*p` J)H)))
537363, 536eqbrtrd 3357 1 |- ((J e. Top /\ (F e. (II Cn J) /\ G e. (II Cn J) /\ H e. (II Cn J)) /\ ((F` 1) = (G` 0) /\ (G` 1) = (H` 0))) -> ((F(*p` J)G)(*p` J)H)(~=ph` J)(F(*p` J)(G(*p` J)H)))
Colors of variables: wff set class
Syntax hints:  -. wn 2   -> wi 3   <-> wb 163   /\ wa 240   /\ w3a 858   = wceq 1298   e. wcel 1300   =/= wne 2017   C_ wss 2593  ifcif 2982  <.cop 3046   class class class wbr 3338  {copab 3395   X. cxp 3984  ran crn 3987   |` cres 3988   o. ccom 3990   Fn wfn 3993  -->wf 3994  ` cfv 3998  (class class class)co 4884  CCcc 6384  RRcr 6385  0cc0 6386  1c1 6387   + caddc 6389   x. cmul 6391   - cmin 6445   / cdiv 6447   <_ cle 6448   < clt 6653  2c2 7145  3c3 7146  4c4 7147  (,)cioo 7524  [,]cicc 7527  abscabs 8000  -cn->ccncf 8524  Topctop 8857  topGenctg 8860   Cn ccn 9028  Opencopn 9069  subSpcsubsp 10242  IIcii 15865  ~=phcphtpc 16044  *pcpco 16067
This theorem is referenced by:  pi1gp 16095
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-5 1302  ax-7 1304  ax-gen 1305  ax-8 1306  ax-9 1307  ax-10 1308  ax-11 1309  ax-12 1310  ax-13 1311  ax-14 1312  ax-17 1317  ax-4 1319  ax-5o 1321  ax-6o 1324  ax-9o 1481  ax-10o 1500  ax-16 1580  ax-11o 1588  ax-ext 1865  ax-rep 3428  ax-sep 3438  ax-nul 3445  ax-pow 3481  ax-pr 3524  ax-un 3790  ax-reg 5695  ax-inf2 5731  ax-ac 5906
This theorem depends on definitions:  df-bi 164  df-or 241  df-an 242  df-3or 859  df-3an 860  df-ex 1327  df-sb 1536  df-eu 1775  df-mo 1776  df-clab 1872  df-cleq 1877  df-clel 1880  df-ne 2019  df-nel 2020  df-ral 2109  df-rex 2110  df-reu 2111  df-rab 2112  df-v 2294  df-sbc 2454  df-csb 2541  df-dif 2597  df-un 2600  df-in 2603  df-ss 2605  df-pss 2607  df-nul 2876  df-if 2983  df-pw 3035  df-sn 3049  df-pr 3050  df-tp 3052  df-op 3053  df-uni 3178  df-int 3215  df-iun 3257  df-iin 3258  df-br 3339  df-opab 3396  df-tr 3412  df-eprel 3583  df-id 3586  df-po 3591  df-so 3604  df-fr 3625  df-we 3644  df-ord 3660  df-on 3661  df-lim 3662  df-suc 3663  df-om 3950  df-xp 4000  df-rel 4001  df-cnv 4002  df-co 4003  df-dm 4004  df-rn 4005  df-res 4006  df-ima 4007  df-fun 4008  df-fn 4009  df-f 4010  df-f1 4011  df-fo 4012  df-f1o 4013  df-fv 4014  df-opr 4886  df-oprab 4887  df-mpt 5006  df-1st 5020  df-2nd 5021  df-iota 5089  df-rdg 5140  df-1o 5177  df-oadd 5179  df-omul 5180  df-er 5318  df-ec 5320  df-qs 5323  df-map 5383  df-en 5427  df-dom 5428  df-sdom 5429  df-undef 5556  df-riota 5560  df-sup 5664  df-r1 5750  df-rank 5751  df-ni 6152  df-pli 6153  df-mi 6154  df-lti 6155  df-plpq 6187  df-mpq 6188  df-enq 6189  df-nq 6190  df-plq 6191  df-mq 6192  df-rq 6193  df-ltq 6194  df-1q 6195  df-np 6238  df-1p 6239  df-plp 6240  df-mp 6241  df-ltp 6242  df-plpr 6316  df-mpr 6317  df-enr 6318  df-nr 6319  df-plr 6320  df-mr 6321  df-ltr 6322  df-0r 6323  df-1r 6324  df-m1r 6325  df-c 6392  df-0 6393  df-1 6394  df-i 6395  df-r 6396  df-plus 6397  df-mul 6398  df-lt 6399  df-sub 6511  df-neg 6513  df-pnf 6654  df-mnf 6655  df-xr 6656  df-ltxr 6657  df-le 6658  df-div 6892  df-n 7108  df-2 7154  df-3 7155  df-4 7156  df-rp 7232  df-n0 7309  df-z 7345  df-q 7436  df-fl 7463  df-ioo 7528  df-icc 7531  df-uz 7587  df-seq1 7721  df-exp 7812  df-sqr 7920  df-re 8001  df-im 8002  df-cj 8003  df-abs 8004  df-clim 8235  df-cncf 8525  df-top 8861  df-topsp 8862  df-bases 8863  df-topgen 8864  df-tx 8931  df-cld 8939  df-cn 9030  df-cnp 9031  df-met 9070  df-bl 9072  df-opn 9073  df-lm 9200  df-subsp 10243  df-ii 15866  df-phtpy 16045  df-phtpc 16057  df-pco 16069
Copyright terms: Public domain