MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  pcorevlem Structured version   Visualization version   GIF version

Theorem pcorevlem 23622
Description: Lemma for pcorev 23623. Prove continuity of the homotopy function. (Contributed by Jeff Madsen, 11-Jun-2010.) (Proof shortened by Mario Carneiro, 8-Jun-2014.)
Hypotheses
Ref Expression
pcorev.1 𝐺 = (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥)))
pcorev.2 𝑃 = ((0[,]1) × {(𝐹‘1)})
pcorevlem.3 𝐻 = (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))))
Assertion
Ref Expression
pcorevlem (𝐹 ∈ (II Cn 𝐽) → (𝐻 ∈ ((𝐺(*𝑝𝐽)𝐹)(PHtpy‘𝐽)𝑃) ∧ (𝐺(*𝑝𝐽)𝐹)( ≃ph𝐽)𝑃))
Distinct variable groups:   𝑡,𝑠,𝑥,𝐹   𝐺,𝑠,𝑡   𝐽,𝑠,𝑡,𝑥   𝑃,𝑠,𝑡,𝑥
Allowed substitution hints:   𝐺(𝑥)   𝐻(𝑥,𝑡,𝑠)

Proof of Theorem pcorevlem
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 pcorev.1 . . . . 5 𝐺 = (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥)))
2 iitopon 23479 . . . . . . 7 II ∈ (TopOn‘(0[,]1))
32a1i 11 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → II ∈ (TopOn‘(0[,]1)))
4 iirevcn 23526 . . . . . . 7 (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II)
54a1i 11 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II))
6 id 22 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → 𝐹 ∈ (II Cn 𝐽))
73, 5, 6cnmpt11f 22264 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥))) ∈ (II Cn 𝐽))
81, 7eqeltrid 2915 . . . 4 (𝐹 ∈ (II Cn 𝐽) → 𝐺 ∈ (II Cn 𝐽))
9 1elunit 12848 . . . . 5 1 ∈ (0[,]1)
10 oveq2 7156 . . . . . . . 8 (𝑥 = 1 → (1 − 𝑥) = (1 − 1))
11 1m1e0 11701 . . . . . . . 8 (1 − 1) = 0
1210, 11syl6eq 2870 . . . . . . 7 (𝑥 = 1 → (1 − 𝑥) = 0)
1312fveq2d 6667 . . . . . 6 (𝑥 = 1 → (𝐹‘(1 − 𝑥)) = (𝐹‘0))
14 fvex 6676 . . . . . 6 (𝐹‘0) ∈ V
1513, 1, 14fvmpt 6761 . . . . 5 (1 ∈ (0[,]1) → (𝐺‘1) = (𝐹‘0))
169, 15mp1i 13 . . . 4 (𝐹 ∈ (II Cn 𝐽) → (𝐺‘1) = (𝐹‘0))
178, 6, 16pcocn 23613 . . 3 (𝐹 ∈ (II Cn 𝐽) → (𝐺(*𝑝𝐽)𝐹) ∈ (II Cn 𝐽))
18 cntop2 21841 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ Top)
19 toptopon2 21518 . . . . . 6 (𝐽 ∈ Top ↔ 𝐽 ∈ (TopOn‘ 𝐽))
2018, 19sylib 220 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ (TopOn‘ 𝐽))
21 iiuni 23481 . . . . . . 7 (0[,]1) = II
22 eqid 2819 . . . . . . 7 𝐽 = 𝐽
2321, 22cnf 21846 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → 𝐹:(0[,]1)⟶ 𝐽)
24 ffvelrn 6842 . . . . . 6 ((𝐹:(0[,]1)⟶ 𝐽 ∧ 1 ∈ (0[,]1)) → (𝐹‘1) ∈ 𝐽)
2523, 9, 24sylancl 588 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) ∈ 𝐽)
26 pcorev.2 . . . . . 6 𝑃 = ((0[,]1) × {(𝐹‘1)})
2726pcoptcl 23617 . . . . 5 ((𝐽 ∈ (TopOn‘ 𝐽) ∧ (𝐹‘1) ∈ 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
2820, 25, 27syl2anc 586 . . . 4 (𝐹 ∈ (II Cn 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
2928simp1d 1136 . . 3 (𝐹 ∈ (II Cn 𝐽) → 𝑃 ∈ (II Cn 𝐽))
30 pcorevlem.3 . . . 4 𝐻 = (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))))
31 eqid 2819 . . . . . 6 (topGen‘ran (,)) = (topGen‘ran (,))
32 eqid 2819 . . . . . 6 ((topGen‘ran (,)) ↾t (0[,](1 / 2))) = ((topGen‘ran (,)) ↾t (0[,](1 / 2)))
33 eqid 2819 . . . . . 6 ((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) = ((topGen‘ran (,)) ↾t ((1 / 2)[,]1))
34 dfii2 23482 . . . . . 6 II = ((topGen‘ran (,)) ↾t (0[,]1))
35 0red 10636 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → 0 ∈ ℝ)
36 1red 10634 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → 1 ∈ ℝ)
37 halfre 11843 . . . . . . . 8 (1 / 2) ∈ ℝ
38 halfge0 11846 . . . . . . . 8 0 ≤ (1 / 2)
39 1re 10633 . . . . . . . . 9 1 ∈ ℝ
40 halflt1 11847 . . . . . . . . 9 (1 / 2) < 1
4137, 39, 40ltleii 10755 . . . . . . . 8 (1 / 2) ≤ 1
42 elicc01 12846 . . . . . . . 8 ((1 / 2) ∈ (0[,]1) ↔ ((1 / 2) ∈ ℝ ∧ 0 ≤ (1 / 2) ∧ (1 / 2) ≤ 1))
4337, 38, 41, 42mpbir3an 1335 . . . . . . 7 (1 / 2) ∈ (0[,]1)
4443a1i 11 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → (1 / 2) ∈ (0[,]1))
45 simprl 769 . . . . . . . . . . 11 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → 𝑠 = (1 / 2))
4645oveq2d 7164 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (2 · (1 / 2)))
47 2cn 11704 . . . . . . . . . . 11 2 ∈ ℂ
48 2ne0 11733 . . . . . . . . . . 11 2 ≠ 0
4947, 48recidi 11363 . . . . . . . . . 10 (2 · (1 / 2)) = 1
5046, 49syl6eq 2870 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = 1)
5150oveq1d 7163 . . . . . . . . . . . 12 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = (1 − 1))
5251, 11syl6eq 2870 . . . . . . . . . . 11 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = 0)
5352oveq2d 7164 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = (1 − 0))
54 1m0e1 11750 . . . . . . . . . 10 (1 − 0) = 1
5553, 54syl6eq 2870 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = 1)
5650, 55eqtr4d 2857 . . . . . . . 8 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (1 − ((2 · 𝑠) − 1)))
5756oveq2d 7164 . . . . . . 7 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
5857oveq2d 7164 . . . . . 6 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
59 retopon 23364 . . . . . . . . 9 (topGen‘ran (,)) ∈ (TopOn‘ℝ)
60 0re 10635 . . . . . . . . . 10 0 ∈ ℝ
61 iccssre 12810 . . . . . . . . . 10 ((0 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (0[,](1 / 2)) ⊆ ℝ)
6260, 37, 61mp2an 690 . . . . . . . . 9 (0[,](1 / 2)) ⊆ ℝ
63 resttopon 21761 . . . . . . . . 9 (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ (0[,](1 / 2)) ⊆ ℝ) → ((topGen‘ran (,)) ↾t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
6459, 62, 63mp2an 690 . . . . . . . 8 ((topGen‘ran (,)) ↾t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2)))
6564a1i 11 . . . . . . 7 (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
6665, 3cnmpt2nd 22269 . . . . . . . . 9 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn II))
67 oveq2 7156 . . . . . . . . 9 (𝑥 = 𝑡 → (1 − 𝑥) = (1 − 𝑡))
6865, 3, 66, 3, 5, 67cnmpt21 22271 . . . . . . . 8 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn II))
6965, 3cnmpt1st 22268 . . . . . . . . 9 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn ((topGen‘ran (,)) ↾t (0[,](1 / 2)))))
7032iihalf1cn 23528 . . . . . . . . . 10 (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾t (0[,](1 / 2))) Cn II)
7170a1i 11 . . . . . . . . 9 (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾t (0[,](1 / 2))) Cn II))
72 oveq2 7156 . . . . . . . . 9 (𝑥 = 𝑠 → (2 · 𝑥) = (2 · 𝑠))
7365, 3, 69, 65, 71, 72cnmpt21 22271 . . . . . . . 8 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (2 · 𝑠)) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn II))
74 iimulcn 23534 . . . . . . . . 9 (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×t II) Cn II)
7574a1i 11 . . . . . . . 8 (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×t II) Cn II))
76 oveq12 7157 . . . . . . . 8 ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (2 · 𝑠)) → (𝑥 · 𝑦) = ((1 − 𝑡) · (2 · 𝑠)))
7765, 3, 68, 73, 3, 3, 75, 76cnmpt22 22274 . . . . . . 7 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (2 · 𝑠))) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn II))
78 oveq2 7156 . . . . . . 7 (𝑥 = ((1 − 𝑡) · (2 · 𝑠)) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
7965, 3, 77, 3, 5, 78cnmpt21 22271 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (2 · 𝑠)))) ∈ ((((topGen‘ran (,)) ↾t (0[,](1 / 2))) ×t II) Cn II))
80 iccssre 12810 . . . . . . . . . 10 (((1 / 2) ∈ ℝ ∧ 1 ∈ ℝ) → ((1 / 2)[,]1) ⊆ ℝ)
8137, 39, 80mp2an 690 . . . . . . . . 9 ((1 / 2)[,]1) ⊆ ℝ
82 resttopon 21761 . . . . . . . . 9 (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ ((1 / 2)[,]1) ⊆ ℝ) → ((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
8359, 81, 82mp2an 690 . . . . . . . 8 ((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1))
8483a1i 11 . . . . . . 7 (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
8584, 3cnmpt2nd 22269 . . . . . . . . 9 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
8684, 3, 85, 3, 5, 67cnmpt21 22271 . . . . . . . 8 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
8784, 3cnmpt1st 22268 . . . . . . . . . 10 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn ((topGen‘ran (,)) ↾t ((1 / 2)[,]1))))
8833iihalf2cn 23530 . . . . . . . . . . 11 (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) Cn II)
8988a1i 11 . . . . . . . . . 10 (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) Cn II))
9072oveq1d 7163 . . . . . . . . . 10 (𝑥 = 𝑠 → ((2 · 𝑥) − 1) = ((2 · 𝑠) − 1))
9184, 3, 87, 84, 89, 90cnmpt21 22271 . . . . . . . . 9 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((2 · 𝑠) − 1)) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
92 oveq2 7156 . . . . . . . . 9 (𝑥 = ((2 · 𝑠) − 1) → (1 − 𝑥) = (1 − ((2 · 𝑠) − 1)))
9384, 3, 91, 3, 5, 92cnmpt21 22271 . . . . . . . 8 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((2 · 𝑠) − 1))) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
94 oveq12 7157 . . . . . . . 8 ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (1 − ((2 · 𝑠) − 1))) → (𝑥 · 𝑦) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
9584, 3, 86, 93, 3, 3, 75, 94cnmpt22 22274 . . . . . . 7 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
96 oveq2 7156 . . . . . . 7 (𝑥 = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
9784, 3, 95, 3, 5, 96cnmpt21 22271 . . . . . 6 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) ∈ ((((topGen‘ran (,)) ↾t ((1 / 2)[,]1)) ×t II) Cn II))
9831, 32, 33, 34, 35, 36, 44, 3, 58, 79, 97cnmpopc 23524 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) ∈ ((II ×t II) Cn II))
993, 3, 98, 6cnmpt21f 22272 . . . 4 (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))))) ∈ ((II ×t II) Cn 𝐽))
10030, 99eqeltrid 2915 . . 3 (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((II ×t II) Cn 𝐽))
101 simpr 487 . . . . 5 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → 𝑦 ∈ (0[,]1))
102 0elunit 12847 . . . . 5 0 ∈ (0[,]1)
103 simpl 485 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 0) → 𝑠 = 𝑦)
104103breq1d 5067 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 0) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
105 simpr 487 . . . . . . . . . . . 12 ((𝑠 = 𝑦𝑡 = 0) → 𝑡 = 0)
106105oveq2d 7164 . . . . . . . . . . 11 ((𝑠 = 𝑦𝑡 = 0) → (1 − 𝑡) = (1 − 0))
107106, 54syl6eq 2870 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 0) → (1 − 𝑡) = 1)
108103oveq2d 7164 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 0) → (2 · 𝑠) = (2 · 𝑦))
109107, 108oveq12d 7166 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 0) → ((1 − 𝑡) · (2 · 𝑠)) = (1 · (2 · 𝑦)))
110109oveq2d 7164 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 0) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (1 · (2 · 𝑦))))
111108oveq1d 7163 . . . . . . . . . . 11 ((𝑠 = 𝑦𝑡 = 0) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
112111oveq2d 7164 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 0) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
113107, 112oveq12d 7166 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 0) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (1 · (1 − ((2 · 𝑦) − 1))))
114113oveq2d 7164 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 0) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
115104, 110, 114ifbieq12d 4492 . . . . . . 7 ((𝑠 = 𝑦𝑡 = 0) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))))
116115fveq2d 6667 . . . . . 6 ((𝑠 = 𝑦𝑡 = 0) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
117 fvex 6676 . . . . . 6 (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
118116, 30, 117ovmpoa 7297 . . . . 5 ((𝑦 ∈ (0[,]1) ∧ 0 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
119101, 102, 118sylancl 588 . . . 4 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
120 iftrue 4471 . . . . . . . 8 (𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
121120adantl 484 . . . . . . 7 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
122121fveq2d 6667 . . . . . 6 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
123 elii1 23531 . . . . . . . 8 (𝑦 ∈ (0[,](1 / 2)) ↔ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2)))
1248, 6pcoval1 23609 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐺‘(2 · 𝑦)))
125 iihalf1 23527 . . . . . . . . . . 11 (𝑦 ∈ (0[,](1 / 2)) → (2 · 𝑦) ∈ (0[,]1))
126125adantl 484 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (2 · 𝑦) ∈ (0[,]1))
127 oveq2 7156 . . . . . . . . . . . . 13 (𝑥 = (2 · 𝑦) → (1 − 𝑥) = (1 − (2 · 𝑦)))
128127fveq2d 6667 . . . . . . . . . . . 12 (𝑥 = (2 · 𝑦) → (𝐹‘(1 − 𝑥)) = (𝐹‘(1 − (2 · 𝑦))))
129 fvex 6676 . . . . . . . . . . . 12 (𝐹‘(1 − (2 · 𝑦))) ∈ V
130128, 1, 129fvmpt 6761 . . . . . . . . . . 11 ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (2 · 𝑦))))
131 unitssre 12877 . . . . . . . . . . . . . . . 16 (0[,]1) ⊆ ℝ
132131sseli 3961 . . . . . . . . . . . . . . 15 ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℝ)
133132recnd 10661 . . . . . . . . . . . . . 14 ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
134133mulid2d 10651 . . . . . . . . . . . . 13 ((2 · 𝑦) ∈ (0[,]1) → (1 · (2 · 𝑦)) = (2 · 𝑦))
135134oveq2d 7164 . . . . . . . . . . . 12 ((2 · 𝑦) ∈ (0[,]1) → (1 − (1 · (2 · 𝑦))) = (1 − (2 · 𝑦)))
136135fveq2d 6667 . . . . . . . . . . 11 ((2 · 𝑦) ∈ (0[,]1) → (𝐹‘(1 − (1 · (2 · 𝑦)))) = (𝐹‘(1 − (2 · 𝑦))))
137130, 136eqtr4d 2857 . . . . . . . . . 10 ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
138126, 137syl 17 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
139124, 138eqtrd 2854 . . . . . . . 8 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
140123, 139sylan2br 596 . . . . . . 7 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2))) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
141140anassrs 470 . . . . . 6 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
142122, 141eqtr4d 2857 . . . . 5 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*𝑝𝐽)𝐹)‘𝑦))
143 iffalse 4474 . . . . . . . 8 𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
144143adantl 484 . . . . . . 7 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
145144fveq2d 6667 . . . . . 6 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
146 elii2 23532 . . . . . . . 8 ((𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2)) → 𝑦 ∈ ((1 / 2)[,]1))
1478, 6, 16pcoval2 23612 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘((2 · 𝑦) − 1)))
148 iihalf2 23529 . . . . . . . . . . . 12 (𝑦 ∈ ((1 / 2)[,]1) → ((2 · 𝑦) − 1) ∈ (0[,]1))
149148adantl 484 . . . . . . . . . . 11 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) ∈ (0[,]1))
150 ax-1cn 10587 . . . . . . . . . . . . . . 15 1 ∈ ℂ
151131sseli 3961 . . . . . . . . . . . . . . . 16 (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℝ)
152151recnd 10661 . . . . . . . . . . . . . . 15 (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℂ)
153 subcl 10877 . . . . . . . . . . . . . . 15 ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
154150, 152, 153sylancr 589 . . . . . . . . . . . . . 14 (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
155154mulid2d 10651 . . . . . . . . . . . . 13 (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 · (1 − ((2 · 𝑦) − 1))) = (1 − ((2 · 𝑦) − 1)))
156155oveq2d 7164 . . . . . . . . . . . 12 (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 · (1 − ((2 · 𝑦) − 1)))) = (1 − (1 − ((2 · 𝑦) − 1))))
157 nncan 10907 . . . . . . . . . . . . 13 ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
158150, 152, 157sylancr 589 . . . . . . . . . . . 12 (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
159156, 158eqtr2d 2855 . . . . . . . . . . 11 (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
160149, 159syl 17 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
161160fveq2d 6667 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → (𝐹‘((2 · 𝑦) − 1)) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
162147, 161eqtrd 2854 . . . . . . . 8 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
163146, 162sylan2 594 . . . . . . 7 ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2))) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
164163anassrs 470 . . . . . 6 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → ((𝐺(*𝑝𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
165145, 164eqtr4d 2857 . . . . 5 (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*𝑝𝐽)𝐹)‘𝑦))
166142, 165pm2.61dan 811 . . . 4 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*𝑝𝐽)𝐹)‘𝑦))
167119, 166eqtrd 2854 . . 3 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = ((𝐺(*𝑝𝐽)𝐹)‘𝑦))
168131sseli 3961 . . . . . . . . . . . . 13 (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℝ)
169168recnd 10661 . . . . . . . . . . . 12 (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℂ)
170 mulcl 10613 . . . . . . . . . . . 12 ((2 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (2 · 𝑦) ∈ ℂ)
17147, 169, 170sylancr 589 . . . . . . . . . . 11 (𝑦 ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
172171adantl 484 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (2 · 𝑦) ∈ ℂ)
173172mul02d 10830 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (2 · 𝑦)) = 0)
174173oveq2d 7164 . . . . . . . 8 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = (1 − 0))
175174, 54syl6eq 2870 . . . . . . 7 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = 1)
176 subcl 10877 . . . . . . . . . . . 12 (((2 · 𝑦) ∈ ℂ ∧ 1 ∈ ℂ) → ((2 · 𝑦) − 1) ∈ ℂ)
177172, 150, 176sylancl 588 . . . . . . . . . . 11 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → ((2 · 𝑦) − 1) ∈ ℂ)
178150, 177, 153sylancr 589 . . . . . . . . . 10 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
179178mul02d 10830 . . . . . . . . 9 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (1 − ((2 · 𝑦) − 1))) = 0)
180179oveq2d 7164 . . . . . . . 8 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = (1 − 0))
181180, 54syl6eq 2870 . . . . . . 7 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = 1)
182175, 181ifeq12d 4485 . . . . . 6 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = if(𝑦 ≤ (1 / 2), 1, 1))
183 ifid 4504 . . . . . 6 if(𝑦 ≤ (1 / 2), 1, 1) = 1
184182, 183syl6eq 2870 . . . . 5 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = 1)
185184fveq2d 6667 . . . 4 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘1))
186 simpl 485 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 1) → 𝑠 = 𝑦)
187186breq1d 5067 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 1) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
188 simpr 487 . . . . . . . . . . . 12 ((𝑠 = 𝑦𝑡 = 1) → 𝑡 = 1)
189188oveq2d 7164 . . . . . . . . . . 11 ((𝑠 = 𝑦𝑡 = 1) → (1 − 𝑡) = (1 − 1))
190189, 11syl6eq 2870 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 1) → (1 − 𝑡) = 0)
191186oveq2d 7164 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 1) → (2 · 𝑠) = (2 · 𝑦))
192190, 191oveq12d 7166 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 1) → ((1 − 𝑡) · (2 · 𝑠)) = (0 · (2 · 𝑦)))
193192oveq2d 7164 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 1) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (0 · (2 · 𝑦))))
194191oveq1d 7163 . . . . . . . . . . 11 ((𝑠 = 𝑦𝑡 = 1) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
195194oveq2d 7164 . . . . . . . . . 10 ((𝑠 = 𝑦𝑡 = 1) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
196190, 195oveq12d 7166 . . . . . . . . 9 ((𝑠 = 𝑦𝑡 = 1) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (0 · (1 − ((2 · 𝑦) − 1))))
197196oveq2d 7164 . . . . . . . 8 ((𝑠 = 𝑦𝑡 = 1) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (0 · (1 − ((2 · 𝑦) − 1)))))
198187, 193, 197ifbieq12d 4492 . . . . . . 7 ((𝑠 = 𝑦𝑡 = 1) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))))
199198fveq2d 6667 . . . . . 6 ((𝑠 = 𝑦𝑡 = 1) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
200 fvex 6676 . . . . . 6 (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
201199, 30, 200ovmpoa 7297 . . . . 5 ((𝑦 ∈ (0[,]1) ∧ 1 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
202101, 9, 201sylancl 588 . . . 4 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
20326fveq1i 6664 . . . . 5 (𝑃𝑦) = (((0[,]1) × {(𝐹‘1)})‘𝑦)
204 fvex 6676 . . . . . . 7 (𝐹‘1) ∈ V
205204fvconst2 6959 . . . . . 6 (𝑦 ∈ (0[,]1) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
206205adantl 484 . . . . 5 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
207203, 206syl5eq 2866 . . . 4 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑃𝑦) = (𝐹‘1))
208185, 202, 2073eqtr4d 2864 . . 3 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝑃𝑦))
209 simpl 485 . . . . . . . . . . 11 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 = 0)
210209, 38eqbrtrdi 5096 . . . . . . . . . 10 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 ≤ (1 / 2))
211210iftrued 4473 . . . . . . . . 9 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
212 simpr 487 . . . . . . . . . . . 12 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
213212oveq2d 7164 . . . . . . . . . . 11 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
214209oveq2d 7164 . . . . . . . . . . . 12 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 0))
215 2t0e0 11798 . . . . . . . . . . . 12 (2 · 0) = 0
216214, 215syl6eq 2870 . . . . . . . . . . 11 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 0)
217213, 216oveq12d 7166 . . . . . . . . . 10 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑦) · 0))
218217oveq2d 7164 . . . . . . . . 9 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑦) · 0)))
219211, 218eqtrd 2854 . . . . . . . 8 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
220219fveq2d 6667 . . . . . . 7 ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
221 fvex 6676 . . . . . . 7 (𝐹‘(1 − ((1 − 𝑦) · 0))) ∈ V
222220, 30, 221ovmpoa 7297 . . . . . 6 ((0 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
223102, 222mpan 688 . . . . 5 (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
224 subcl 10877 . . . . . . . . . 10 ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
225150, 169, 224sylancr 589 . . . . . . . . 9 (𝑦 ∈ (0[,]1) → (1 − 𝑦) ∈ ℂ)
226225mul01d 10831 . . . . . . . 8 (𝑦 ∈ (0[,]1) → ((1 − 𝑦) · 0) = 0)
227226oveq2d 7164 . . . . . . 7 (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = (1 − 0))
228227, 54syl6eq 2870 . . . . . 6 (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = 1)
229228fveq2d 6667 . . . . 5 (𝑦 ∈ (0[,]1) → (𝐹‘(1 − ((1 − 𝑦) · 0))) = (𝐹‘1))
230223, 229eqtrd 2854 . . . 4 (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘1))
2318, 6pco0 23610 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*𝑝𝐽)𝐹)‘0) = (𝐺‘0))
232 oveq2 7156 . . . . . . . . 9 (𝑥 = 0 → (1 − 𝑥) = (1 − 0))
233232, 54syl6eq 2870 . . . . . . . 8 (𝑥 = 0 → (1 − 𝑥) = 1)
234233fveq2d 6667 . . . . . . 7 (𝑥 = 0 → (𝐹‘(1 − 𝑥)) = (𝐹‘1))
235234, 1, 204fvmpt 6761 . . . . . 6 (0 ∈ (0[,]1) → (𝐺‘0) = (𝐹‘1))
236102, 235ax-mp 5 . . . . 5 (𝐺‘0) = (𝐹‘1)
237231, 236syl6req 2871 . . . 4 (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*𝑝𝐽)𝐹)‘0))
238230, 237sylan9eqr 2876 . . 3 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = ((𝐺(*𝑝𝐽)𝐹)‘0))
23937, 39ltnlei 10753 . . . . . . . . . . . 12 ((1 / 2) < 1 ↔ ¬ 1 ≤ (1 / 2))
24040, 239mpbi 232 . . . . . . . . . . 11 ¬ 1 ≤ (1 / 2)
241 simpl 485 . . . . . . . . . . . 12 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑠 = 1)
242241breq1d 5067 . . . . . . . . . . 11 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝑠 ≤ (1 / 2) ↔ 1 ≤ (1 / 2)))
243240, 242mtbiri 329 . . . . . . . . . 10 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ¬ 𝑠 ≤ (1 / 2))
244243iffalsed 4476 . . . . . . . . 9 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
245 simpr 487 . . . . . . . . . . . 12 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
246245oveq2d 7164 . . . . . . . . . . 11 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
247241oveq2d 7164 . . . . . . . . . . . . . . . 16 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 1))
248 2t1e2 11792 . . . . . . . . . . . . . . . 16 (2 · 1) = 2
249247, 248syl6eq 2870 . . . . . . . . . . . . . . 15 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 2)
250249oveq1d 7163 . . . . . . . . . . . . . 14 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = (2 − 1))
251 2m1e1 11755 . . . . . . . . . . . . . 14 (2 − 1) = 1
252250, 251syl6eq 2870 . . . . . . . . . . . . 13 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = 1)
253252oveq2d 7164 . . . . . . . . . . . 12 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = (1 − 1))
254253, 11syl6eq 2870 . . . . . . . . . . 11 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = 0)
255246, 254oveq12d 7166 . . . . . . . . . 10 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = ((1 − 𝑦) · 0))
256255oveq2d 7164 . . . . . . . . 9 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − ((1 − 𝑦) · 0)))
257244, 256eqtrd 2854 . . . . . . . 8 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
258257fveq2d 6667 . . . . . . 7 ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
259258, 30, 221ovmpoa 7297 . . . . . 6 ((1 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
2609, 259mpan 688 . . . . 5 (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
261260, 229eqtrd 2854 . . . 4 (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘1))
2628, 6pco1 23611 . . . . 5 (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*𝑝𝐽)𝐹)‘1) = (𝐹‘1))
263262eqcomd 2825 . . . 4 (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*𝑝𝐽)𝐹)‘1))
264261, 263sylan9eqr 2876 . . 3 ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = ((𝐺(*𝑝𝐽)𝐹)‘1))
26517, 29, 100, 167, 208, 238, 264isphtpy2d 23583 . 2 (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((𝐺(*𝑝𝐽)𝐹)(PHtpy‘𝐽)𝑃))
266265ne0d 4299 . . 3 (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*𝑝𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅)
267 isphtpc 23590 . . 3 ((𝐺(*𝑝𝐽)𝐹)( ≃ph𝐽)𝑃 ↔ ((𝐺(*𝑝𝐽)𝐹) ∈ (II Cn 𝐽) ∧ 𝑃 ∈ (II Cn 𝐽) ∧ ((𝐺(*𝑝𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅))
26817, 29, 266, 267syl3anbrc 1337 . 2 (𝐹 ∈ (II Cn 𝐽) → (𝐺(*𝑝𝐽)𝐹)( ≃ph𝐽)𝑃)
269265, 268jca 514 1 (𝐹 ∈ (II Cn 𝐽) → (𝐻 ∈ ((𝐺(*𝑝𝐽)𝐹)(PHtpy‘𝐽)𝑃) ∧ (𝐺(*𝑝𝐽)𝐹)( ≃ph𝐽)𝑃))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  w3a 1081   = wceq 1530  wcel 2107  wne 3014  wss 3934  c0 4289  ifcif 4465  {csn 4559   cuni 4830   class class class wbr 5057  cmpt 5137   × cxp 5546  ran crn 5549  wf 6344  cfv 6348  (class class class)co 7148  cmpo 7150  cc 10527  cr 10528  0cc0 10529  1c1 10530   · cmul 10534   < clt 10667  cle 10668  cmin 10862   / cdiv 11289  2c2 11684  (,)cioo 12730  [,]cicc 12733  t crest 16686  topGenctg 16703  Topctop 21493  TopOnctopon 21510   Cn ccn 21824   ×t ctx 22160  IIcii 23475  PHtpycphtpy 23564  phcphtpc 23565  *𝑝cpco 23596
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1904  ax-6 1963  ax-7 2008  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2153  ax-12 2169  ax-ext 2791  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7453  ax-cnex 10585  ax-resscn 10586  ax-1cn 10587  ax-icn 10588  ax-addcl 10589  ax-addrcl 10590  ax-mulcl 10591  ax-mulrcl 10592  ax-mulcom 10593  ax-addass 10594  ax-mulass 10595  ax-distr 10596  ax-i2m1 10597  ax-1ne0 10598  ax-1rid 10599  ax-rnegex 10600  ax-rrecex 10601  ax-cnre 10602  ax-pre-lttri 10603  ax-pre-lttrn 10604  ax-pre-ltadd 10605  ax-pre-mulgt0 10606  ax-pre-sup 10607  ax-mulf 10609
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1082  df-3an 1083  df-tru 1533  df-ex 1774  df-nf 1778  df-sb 2063  df-mo 2616  df-eu 2648  df-clab 2798  df-cleq 2812  df-clel 2891  df-nfc 2961  df-ne 3015  df-nel 3122  df-ral 3141  df-rex 3142  df-reu 3143  df-rmo 3144  df-rab 3145  df-v 3495  df-sbc 3771  df-csb 3882  df-dif 3937  df-un 3939  df-in 3941  df-ss 3950  df-pss 3952  df-nul 4290  df-if 4466  df-pw 4539  df-sn 4560  df-pr 4562  df-tp 4564  df-op 4566  df-uni 4831  df-int 4868  df-iun 4912  df-iin 4913  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-se 5508  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-isom 6357  df-riota 7106  df-ov 7151  df-oprab 7152  df-mpo 7153  df-of 7401  df-om 7573  df-1st 7681  df-2nd 7682  df-supp 7823  df-wrecs 7939  df-recs 8000  df-rdg 8038  df-1o 8094  df-2o 8095  df-oadd 8098  df-er 8281  df-map 8400  df-ixp 8454  df-en 8502  df-dom 8503  df-sdom 8504  df-fin 8505  df-fsupp 8826  df-fi 8867  df-sup 8898  df-inf 8899  df-oi 8966  df-card 9360  df-pnf 10669  df-mnf 10670  df-xr 10671  df-ltxr 10672  df-le 10673  df-sub 10864  df-neg 10865  df-div 11290  df-nn 11631  df-2 11692  df-3 11693  df-4 11694  df-5 11695  df-6 11696  df-7 11697  df-8 11698  df-9 11699  df-n0 11890  df-z 11974  df-dec 12091  df-uz 12236  df-q 12341  df-rp 12382  df-xneg 12499  df-xadd 12500  df-xmul 12501  df-ioo 12734  df-icc 12737  df-fz 12885  df-fzo 13026  df-seq 13362  df-exp 13422  df-hash 13683  df-cj 14450  df-re 14451  df-im 14452  df-sqrt 14586  df-abs 14587  df-struct 16477  df-ndx 16478  df-slot 16479  df-base 16481  df-sets 16482  df-ress 16483  df-plusg 16570  df-mulr 16571  df-starv 16572  df-sca 16573  df-vsca 16574  df-ip 16575  df-tset 16576  df-ple 16577  df-ds 16579  df-unif 16580  df-hom 16581  df-cco 16582  df-rest 16688  df-topn 16689  df-0g 16707  df-gsum 16708  df-topgen 16709  df-pt 16710  df-prds 16713  df-xrs 16767  df-qtop 16772  df-imas 16773  df-xps 16775  df-mre 16849  df-mrc 16850  df-acs 16852  df-mgm 17844  df-sgrp 17893  df-mnd 17904  df-submnd 17949  df-mulg 18217  df-cntz 18439  df-cmn 18900  df-psmet 20529  df-xmet 20530  df-met 20531  df-bl 20532  df-mopn 20533  df-cnfld 20538  df-top 21494  df-topon 21511  df-topsp 21533  df-bases 21546  df-cld 21619  df-cn 21827  df-cnp 21828  df-tx 22162  df-hmeo 22355  df-xms 22922  df-ms 22923  df-tms 22924  df-ii 23477  df-htpy 23566  df-phtpy 23567  df-phtpc 23588  df-pco 23601
This theorem is referenced by:  pcorev  23623
  Copyright terms: Public domain W3C validator