pcorevlem - Metamath Proof Explorer

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

Theorem pcorevlem 23631

Description: Lemma for pcorev 23632. 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.

Step	Hyp	Ref	Expression
1		pcorev.1	. . . . 5 ⊢ 𝐺 = (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥)))
2		iitopon 23484	. . . . . . 7 ⊢ II ∈ (TopOn‘(0[,]1))
3	2	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → II ∈ (TopOn‘(0[,]1)))
4		iirevcn 23535	. . . . . . 7 ⊢ (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II)
5	4	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II))
6		id 22	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐹 ∈ (II Cn 𝐽))
7	3, 5, 6	cnmpt11f 22269	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥))) ∈ (II Cn 𝐽))
8	1, 7	eqeltrid 2894	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐺 ∈ (II Cn 𝐽))
9		1elunit 12848	. . . . 5 ⊢ 1 ∈ (0[,]1)
10		oveq2 7143	. . . . . . . 8 ⊢ (𝑥 = 1 → (1 − 𝑥) = (1 − 1))
11		1m1e0 11697	. . . . . . . 8 ⊢ (1 − 1) = 0
12	10, 11	eqtrdi 2849	. . . . . . 7 ⊢ (𝑥 = 1 → (1 − 𝑥) = 0)
13	12	fveq2d 6649	. . . . . 6 ⊢ (𝑥 = 1 → (𝐹‘(1 − 𝑥)) = (𝐹‘0))
14		fvex 6658	. . . . . 6 ⊢ (𝐹‘0) ∈ V
15	13, 1, 14	fvmpt 6745	. . . . 5 ⊢ (1 ∈ (0[,]1) → (𝐺‘1) = (𝐹‘0))
16	9, 15	mp1i 13	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺‘1) = (𝐹‘0))
17	8, 6, 16	pcocn 23622	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺(*_𝑝‘𝐽)𝐹) ∈ (II Cn 𝐽))
18		cntop2 21846	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ Top)
19		toptopon2 21523	. . . . . 6 ⊢ (𝐽 ∈ Top ↔ 𝐽 ∈ (TopOn‘∪ 𝐽))
20	18, 19	sylib 221	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ (TopOn‘∪ 𝐽))
21		iiuni 23486	. . . . . . 7 ⊢ (0[,]1) = ∪ II
22		eqid 2798	. . . . . . 7 ⊢ ∪ 𝐽 = ∪ 𝐽
23	21, 22	cnf 21851	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐹:(0[,]1)⟶∪ 𝐽)
24		ffvelrn 6826	. . . . . 6 ⊢ ((𝐹:(0[,]1)⟶∪ 𝐽 ∧ 1 ∈ (0[,]1)) → (𝐹‘1) ∈ ∪ 𝐽)
25	23, 9, 24	sylancl 589	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) ∈ ∪ 𝐽)
26		pcorev.2	. . . . . 6 ⊢ 𝑃 = ((0[,]1) × {(𝐹‘1)})
27	26	pcoptcl 23626	. . . . 5 ⊢ ((𝐽 ∈ (TopOn‘∪ 𝐽) ∧ (𝐹‘1) ∈ ∪ 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
28	20, 25, 27	syl2anc 587	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
29	28	simp1d 1139	. . 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 2798	. . . . . 6 ⊢ (topGen‘ran (,)) = (topGen‘ran (,))
32		eqid 2798	. . . . . 6 ⊢ ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) = ((topGen‘ran (,)) ↾_t (0[,](1 / 2)))
33		eqid 2798	. . . . . 6 ⊢ ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) = ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1))
34		dfii2 23487	. . . . . 6 ⊢ II = ((topGen‘ran (,)) ↾_t (0[,]1))
35		0red 10633	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 0 ∈ ℝ)
36		1red 10631	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 1 ∈ ℝ)
37		halfre 11839	. . . . . . . 8 ⊢ (1 / 2) ∈ ℝ
38		halfge0 11842	. . . . . . . 8 ⊢ 0 ≤ (1 / 2)
39		1re 10630	. . . . . . . . 9 ⊢ 1 ∈ ℝ
40		halflt1 11843	. . . . . . . . 9 ⊢ (1 / 2) < 1
41	37, 39, 40	ltleii 10752	. . . . . . . 8 ⊢ (1 / 2) ≤ 1
42		elicc01 12844	. . . . . . . 8 ⊢ ((1 / 2) ∈ (0[,]1) ↔ ((1 / 2) ∈ ℝ ∧ 0 ≤ (1 / 2) ∧ (1 / 2) ≤ 1))
43	37, 38, 41, 42	mpbir3an 1338	. . . . . . 7 ⊢ (1 / 2) ∈ (0[,]1)
44	43	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (1 / 2) ∈ (0[,]1))
45		simprl 770	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → 𝑠 = (1 / 2))
46	45	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (2 · (1 / 2)))
47		2cn 11700	. . . . . . . . . . 11 ⊢ 2 ∈ ℂ
48		2ne0 11729	. . . . . . . . . . 11 ⊢ 2 ≠ 0
49	47, 48	recidi 11360	. . . . . . . . . 10 ⊢ (2 · (1 / 2)) = 1
50	46, 49	eqtrdi 2849	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = 1)
51	50	oveq1d 7150	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = (1 − 1))
52	51, 11	eqtrdi 2849	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = 0)
53	52	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = (1 − 0))
54		1m0e1 11746	. . . . . . . . . 10 ⊢ (1 − 0) = 1
55	53, 54	eqtrdi 2849	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = 1)
56	50, 55	eqtr4d 2836	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (1 − ((2 · 𝑠) − 1)))
57	56	oveq2d 7151	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
58	57	oveq2d 7151	. . . . . 6 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
59		retopon 23369	. . . . . . . . 9 ⊢ (topGen‘ran (,)) ∈ (TopOn‘ℝ)
60		0re 10632	. . . . . . . . . 10 ⊢ 0 ∈ ℝ
61		iccssre 12807	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (0[,](1 / 2)) ⊆ ℝ)
62	60, 37, 61	mp2an 691	. . . . . . . . 9 ⊢ (0[,](1 / 2)) ⊆ ℝ
63		resttopon 21766	. . . . . . . . 9 ⊢ (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ (0[,](1 / 2)) ⊆ ℝ) → ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
64	59, 62, 63	mp2an 691	. . . . . . . 8 ⊢ ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2)))
65	64	a1i 11	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
66	65, 3	cnmpt2nd 22274	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
67		oveq2 7143	. . . . . . . . 9 ⊢ (𝑥 = 𝑡 → (1 − 𝑥) = (1 − 𝑡))
68	65, 3, 66, 3, 5, 67	cnmpt21 22276	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
69	65, 3	cnmpt1st 22273	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn ((topGen‘ran (,)) ↾_t (0[,](1 / 2)))))
70	32	iihalf1cn 23537	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾_t (0[,](1 / 2))) Cn II)
71	70	a1i 11	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾_t (0[,](1 / 2))) Cn II))
72		oveq2 7143	. . . . . . . . 9 ⊢ (𝑥 = 𝑠 → (2 · 𝑥) = (2 · 𝑠))
73	65, 3, 69, 65, 71, 72	cnmpt21 22276	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (2 · 𝑠)) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
74		iimulcn 23543	. . . . . . . . 9 ⊢ (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×_t II) Cn II)
75	74	a1i 11	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×_t II) Cn II))
76		oveq12 7144	. . . . . . . 8 ⊢ ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (2 · 𝑠)) → (𝑥 · 𝑦) = ((1 − 𝑡) · (2 · 𝑠)))
77	65, 3, 68, 73, 3, 3, 75, 76	cnmpt22 22279	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (2 · 𝑠))) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
78		oveq2 7143	. . . . . . 7 ⊢ (𝑥 = ((1 − 𝑡) · (2 · 𝑠)) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
79	65, 3, 77, 3, 5, 78	cnmpt21 22276	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (2 · 𝑠)))) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
80		iccssre 12807	. . . . . . . . . 10 ⊢ (((1 / 2) ∈ ℝ ∧ 1 ∈ ℝ) → ((1 / 2)[,]1) ⊆ ℝ)
81	37, 39, 80	mp2an 691	. . . . . . . . 9 ⊢ ((1 / 2)[,]1) ⊆ ℝ
82		resttopon 21766	. . . . . . . . 9 ⊢ (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ ((1 / 2)[,]1) ⊆ ℝ) → ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
83	59, 81, 82	mp2an 691	. . . . . . . 8 ⊢ ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1))
84	83	a1i 11	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
85	84, 3	cnmpt2nd 22274	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
86	84, 3, 85, 3, 5, 67	cnmpt21 22276	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
87	84, 3	cnmpt1st 22273	. . . . . . . . . 10 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1))))
88	33	iihalf2cn 23539	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) Cn II)
89	88	a1i 11	. . . . . . . . . 10 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) Cn II))
90	72	oveq1d 7150	. . . . . . . . . 10 ⊢ (𝑥 = 𝑠 → ((2 · 𝑥) − 1) = ((2 · 𝑠) − 1))
91	84, 3, 87, 84, 89, 90	cnmpt21 22276	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((2 · 𝑠) − 1)) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
92		oveq2 7143	. . . . . . . . 9 ⊢ (𝑥 = ((2 · 𝑠) − 1) → (1 − 𝑥) = (1 − ((2 · 𝑠) − 1)))
93	84, 3, 91, 3, 5, 92	cnmpt21 22276	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((2 · 𝑠) − 1))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
94		oveq12 7144	. . . . . . . 8 ⊢ ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (1 − ((2 · 𝑠) − 1))) → (𝑥 · 𝑦) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
95	84, 3, 86, 93, 3, 3, 75, 94	cnmpt22 22279	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
96		oveq2 7143	. . . . . . 7 ⊢ (𝑥 = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
97	84, 3, 95, 3, 5, 96	cnmpt21 22276	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
98	31, 32, 33, 34, 35, 36, 44, 3, 58, 79, 97	cnmpopc 23533	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) ∈ ((II ×_t II) Cn II))
99	3, 3, 98, 6	cnmpt21f 22277	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))))) ∈ ((II ×_t II) Cn 𝐽))
100	30, 99	eqeltrid 2894	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((II ×_t II) Cn 𝐽))
101		simpr 488	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → 𝑦 ∈ (0[,]1))
102		0elunit 12847	. . . . 5 ⊢ 0 ∈ (0[,]1)
103		simpl 486	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → 𝑠 = 𝑦)
104	103	breq1d 5040	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
105		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → 𝑡 = 0)
106	105	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − 𝑡) = (1 − 0))
107	106, 54	eqtrdi 2849	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − 𝑡) = 1)
108	103	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (2 · 𝑠) = (2 · 𝑦))
109	107, 108	oveq12d 7153	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((1 − 𝑡) · (2 · 𝑠)) = (1 · (2 · 𝑦)))
110	109	oveq2d 7151	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (1 · (2 · 𝑦))))
111	108	oveq1d 7150	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
112	111	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
113	107, 112	oveq12d 7153	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (1 · (1 − ((2 · 𝑦) − 1))))
114	113	oveq2d 7151	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
115	104, 110, 114	ifbieq12d 4452	. . . . . . 7 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))))
116	115	fveq2d 6649	. . . . . 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 6658	. . . . . 6 ⊢ (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
118	116, 30, 117	ovmpoa 7284	. . . . 5 ⊢ ((𝑦 ∈ (0[,]1) ∧ 0 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
119	101, 102, 118	sylancl 589	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
120		iftrue 4431	. . . . . . . 8 ⊢ (𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
121	120	adantl 485	. . . . . . 7 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
122	121	fveq2d 6649	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
123		elii1 23540	. . . . . . . 8 ⊢ (𝑦 ∈ (0[,](1 / 2)) ↔ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2)))
124	8, 6	pcoval1 23618	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐺‘(2 · 𝑦)))
125		iihalf1 23536	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0[,](1 / 2)) → (2 · 𝑦) ∈ (0[,]1))
126	125	adantl 485	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (2 · 𝑦) ∈ (0[,]1))
127		oveq2 7143	. . . . . . . . . . . . 13 ⊢ (𝑥 = (2 · 𝑦) → (1 − 𝑥) = (1 − (2 · 𝑦)))
128	127	fveq2d 6649	. . . . . . . . . . . 12 ⊢ (𝑥 = (2 · 𝑦) → (𝐹‘(1 − 𝑥)) = (𝐹‘(1 − (2 · 𝑦))))
129		fvex 6658	. . . . . . . . . . . 12 ⊢ (𝐹‘(1 − (2 · 𝑦))) ∈ V
130	128, 1, 129	fvmpt 6745	. . . . . . . . . . 11 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (2 · 𝑦))))
131		unitssre 12877	. . . . . . . . . . . . . . . 16 ⊢ (0[,]1) ⊆ ℝ
132	131	sseli 3911	. . . . . . . . . . . . . . 15 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℝ)
133	132	recnd 10658	. . . . . . . . . . . . . 14 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
134	133	mulid2d 10648	. . . . . . . . . . . . 13 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (1 · (2 · 𝑦)) = (2 · 𝑦))
135	134	oveq2d 7151	. . . . . . . . . . . 12 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (1 − (1 · (2 · 𝑦))) = (1 − (2 · 𝑦)))
136	135	fveq2d 6649	. . . . . . . . . . 11 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐹‘(1 − (1 · (2 · 𝑦)))) = (𝐹‘(1 − (2 · 𝑦))))
137	130, 136	eqtr4d 2836	. . . . . . . . . 10 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
138	126, 137	syl 17	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
139	124, 138	eqtrd 2833	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
140	123, 139	sylan2br 597	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
141	140	anassrs 471	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
142	122, 141	eqtr4d 2836	. . . . 5 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
143		iffalse 4434	. . . . . . . 8 ⊢ (¬ 𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
144	143	adantl 485	. . . . . . 7 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
145	144	fveq2d 6649	. . . . . 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 23541	. . . . . . . 8 ⊢ ((𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2)) → 𝑦 ∈ ((1 / 2)[,]1))
147	8, 6, 16	pcoval2 23621	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘((2 · 𝑦) − 1)))
148		iihalf2 23538	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((1 / 2)[,]1) → ((2 · 𝑦) − 1) ∈ (0[,]1))
149	148	adantl 485	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) ∈ (0[,]1))
150		ax-1cn 10584	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℂ
151	131	sseli 3911	. . . . . . . . . . . . . . . 16 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℝ)
152	151	recnd 10658	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℂ)
153		subcl 10874	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
154	150, 152, 153	sylancr 590	. . . . . . . . . . . . . 14 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
155	154	mulid2d 10648	. . . . . . . . . . . . 13 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 · (1 − ((2 · 𝑦) − 1))) = (1 − ((2 · 𝑦) − 1)))
156	155	oveq2d 7151	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 · (1 − ((2 · 𝑦) − 1)))) = (1 − (1 − ((2 · 𝑦) − 1))))
157		nncan 10904	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
158	150, 152, 157	sylancr 590	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
159	156, 158	eqtr2d 2834	. . . . . . . . . . 11 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
160	149, 159	syl 17	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
161	160	fveq2d 6649	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → (𝐹‘((2 · 𝑦) − 1)) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
162	147, 161	eqtrd 2833	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
163	146, 162	sylan2 595	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
164	163	anassrs 471	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
165	145, 164	eqtr4d 2836	. . . . 5 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
166	142, 165	pm2.61dan 812	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
167	119, 166	eqtrd 2833	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
168	131	sseli 3911	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℝ)
169	168	recnd 10658	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℂ)
170		mulcl 10610	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (2 · 𝑦) ∈ ℂ)
171	47, 169, 170	sylancr 590	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
172	171	adantl 485	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (2 · 𝑦) ∈ ℂ)
173	172	mul02d 10827	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (2 · 𝑦)) = 0)
174	173	oveq2d 7151	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = (1 − 0))
175	174, 54	eqtrdi 2849	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = 1)
176		subcl 10874	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) ∈ ℂ ∧ 1 ∈ ℂ) → ((2 · 𝑦) − 1) ∈ ℂ)
177	172, 150, 176	sylancl 589	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → ((2 · 𝑦) − 1) ∈ ℂ)
178	150, 177, 153	sylancr 590	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
179	178	mul02d 10827	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (1 − ((2 · 𝑦) − 1))) = 0)
180	179	oveq2d 7151	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = (1 − 0))
181	180, 54	eqtrdi 2849	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = 1)
182	175, 181	ifeq12d 4445	. . . . . 6 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = if(𝑦 ≤ (1 / 2), 1, 1))
183		ifid 4464	. . . . . 6 ⊢ if(𝑦 ≤ (1 / 2), 1, 1) = 1
184	182, 183	eqtrdi 2849	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = 1)
185	184	fveq2d 6649	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘1))
186		simpl 486	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → 𝑠 = 𝑦)
187	186	breq1d 5040	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
188		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → 𝑡 = 1)
189	188	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − 𝑡) = (1 − 1))
190	189, 11	eqtrdi 2849	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − 𝑡) = 0)
191	186	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (2 · 𝑠) = (2 · 𝑦))
192	190, 191	oveq12d 7153	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((1 − 𝑡) · (2 · 𝑠)) = (0 · (2 · 𝑦)))
193	192	oveq2d 7151	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (0 · (2 · 𝑦))))
194	191	oveq1d 7150	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
195	194	oveq2d 7151	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
196	190, 195	oveq12d 7153	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (0 · (1 − ((2 · 𝑦) − 1))))
197	196	oveq2d 7151	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (0 · (1 − ((2 · 𝑦) − 1)))))
198	187, 193, 197	ifbieq12d 4452	. . . . . . 7 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))))
199	198	fveq2d 6649	. . . . . 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 6658	. . . . . 6 ⊢ (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
201	199, 30, 200	ovmpoa 7284	. . . . 5 ⊢ ((𝑦 ∈ (0[,]1) ∧ 1 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
202	101, 9, 201	sylancl 589	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
203	26	fveq1i 6646	. . . . 5 ⊢ (𝑃‘𝑦) = (((0[,]1) × {(𝐹‘1)})‘𝑦)
204		fvex 6658	. . . . . . 7 ⊢ (𝐹‘1) ∈ V
205	204	fvconst2 6943	. . . . . 6 ⊢ (𝑦 ∈ (0[,]1) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
206	205	adantl 485	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
207	203, 206	syl5eq 2845	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑃‘𝑦) = (𝐹‘1))
208	185, 202, 207	3eqtr4d 2843	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝑃‘𝑦))
209		simpl 486	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 = 0)
210	209, 38	eqbrtrdi 5069	. . . . . . . . . 10 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 ≤ (1 / 2))
211	210	iftrued 4433	. . . . . . . . 9 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
212		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
213	212	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
214	209	oveq2d 7151	. . . . . . . . . . . 12 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 0))
215		2t0e0 11794	. . . . . . . . . . . 12 ⊢ (2 · 0) = 0
216	214, 215	eqtrdi 2849	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 0)
217	213, 216	oveq12d 7153	. . . . . . . . . 10 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑦) · 0))
218	217	oveq2d 7151	. . . . . . . . 9 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑦) · 0)))
219	211, 218	eqtrd 2833	. . . . . . . 8 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
220	219	fveq2d 6649	. . . . . . 7 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
221		fvex 6658	. . . . . . 7 ⊢ (𝐹‘(1 − ((1 − 𝑦) · 0))) ∈ V
222	220, 30, 221	ovmpoa 7284	. . . . . 6 ⊢ ((0 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
223	102, 222	mpan 689	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
224		subcl 10874	. . . . . . . . . 10 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
225	150, 169, 224	sylancr 590	. . . . . . . . 9 ⊢ (𝑦 ∈ (0[,]1) → (1 − 𝑦) ∈ ℂ)
226	225	mul01d 10828	. . . . . . . 8 ⊢ (𝑦 ∈ (0[,]1) → ((1 − 𝑦) · 0) = 0)
227	226	oveq2d 7151	. . . . . . 7 ⊢ (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = (1 − 0))
228	227, 54	eqtrdi 2849	. . . . . 6 ⊢ (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = 1)
229	228	fveq2d 6649	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (𝐹‘(1 − ((1 − 𝑦) · 0))) = (𝐹‘1))
230	223, 229	eqtrd 2833	. . . 4 ⊢ (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘1))
231	8, 6	pco0 23619	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)‘0) = (𝐺‘0))
232		oveq2 7143	. . . . . . . . 9 ⊢ (𝑥 = 0 → (1 − 𝑥) = (1 − 0))
233	232, 54	eqtrdi 2849	. . . . . . . 8 ⊢ (𝑥 = 0 → (1 − 𝑥) = 1)
234	233	fveq2d 6649	. . . . . . 7 ⊢ (𝑥 = 0 → (𝐹‘(1 − 𝑥)) = (𝐹‘1))
235	234, 1, 204	fvmpt 6745	. . . . . 6 ⊢ (0 ∈ (0[,]1) → (𝐺‘0) = (𝐹‘1))
236	102, 235	ax-mp 5	. . . . 5 ⊢ (𝐺‘0) = (𝐹‘1)
237	231, 236	eqtr2di 2850	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*_𝑝‘𝐽)𝐹)‘0))
238	230, 237	sylan9eqr 2855	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = ((𝐺(*_𝑝‘𝐽)𝐹)‘0))
239	37, 39	ltnlei 10750	. . . . . . . . . . . 12 ⊢ ((1 / 2) < 1 ↔ ¬ 1 ≤ (1 / 2))
240	40, 239	mpbi 233	. . . . . . . . . . 11 ⊢ ¬ 1 ≤ (1 / 2)
241		simpl 486	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑠 = 1)
242	241	breq1d 5040	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝑠 ≤ (1 / 2) ↔ 1 ≤ (1 / 2)))
243	240, 242	mtbiri 330	. . . . . . . . . 10 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ¬ 𝑠 ≤ (1 / 2))
244	243	iffalsed 4436	. . . . . . . . 9 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
245		simpr 488	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
246	245	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
247	241	oveq2d 7151	. . . . . . . . . . . . . . . 16 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 1))
248		2t1e2 11788	. . . . . . . . . . . . . . . 16 ⊢ (2 · 1) = 2
249	247, 248	eqtrdi 2849	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 2)
250	249	oveq1d 7150	. . . . . . . . . . . . . 14 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = (2 − 1))
251		2m1e1 11751	. . . . . . . . . . . . . 14 ⊢ (2 − 1) = 1
252	250, 251	eqtrdi 2849	. . . . . . . . . . . . 13 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = 1)
253	252	oveq2d 7151	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = (1 − 1))
254	253, 11	eqtrdi 2849	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = 0)
255	246, 254	oveq12d 7153	. . . . . . . . . 10 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = ((1 − 𝑦) · 0))
256	255	oveq2d 7151	. . . . . . . . 9 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − ((1 − 𝑦) · 0)))
257	244, 256	eqtrd 2833	. . . . . . . 8 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
258	257	fveq2d 6649	. . . . . . 7 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
259	258, 30, 221	ovmpoa 7284	. . . . . 6 ⊢ ((1 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
260	9, 259	mpan 689	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
261	260, 229	eqtrd 2833	. . . 4 ⊢ (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘1))
262	8, 6	pco1 23620	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)‘1) = (𝐹‘1))
263	262	eqcomd 2804	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*_𝑝‘𝐽)𝐹)‘1))
264	261, 263	sylan9eqr 2855	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = ((𝐺(*_𝑝‘𝐽)𝐹)‘1))
265	17, 29, 100, 167, 208, 238, 264	isphtpy2d 23592	. 2 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃))
266	265	ne0d 4251	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅)
267		isphtpc 23599	. . 3 ⊢ ((𝐺(_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃 ↔ ((𝐺(_𝑝‘𝐽)𝐹) ∈ (II Cn 𝐽) ∧ 𝑃 ∈ (II Cn 𝐽) ∧ ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅))
268	17, 29, 266, 267	syl3anbrc 1340	. 2 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺(*_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃)
269	265, 268	jca 515	1 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐻 ∈ ((𝐺(_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ∧ (𝐺(_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 399 ∧ w3a 1084 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 ⊆ wss 3881 ∅c0 4243 ifcif 4425 {csn 4525 ∪ cuni 4800 class class class wbr 5030 ↦ cmpt 5110 × cxp 5517 ran crn 5520 ⟶wf 6320 ‘cfv 6324 (class class class)co 7135 ∈ cmpo 7137 ℂcc 10524 ℝcr 10525 0cc0 10526 1c1 10527 · cmul 10531 < clt 10664 ≤ cle 10665 − cmin 10859 / cdiv 11286 2c2 11680 (,)cioo 12726 [,]cicc 12729 ↾_t crest 16686 topGenctg 16703 Topctop 21498 TopOnctopon 21515 Cn ccn 21829 ×_t ctx 22165 IIcii 23480 PHtpycphtpy 23573 ≃_phcphtpc 23574 *_𝑝cpco 23605

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-pre-sup 10604 ax-mulf 10606

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-uni 4801 df-int 4839 df-iun 4883 df-iin 4884 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-om 7561 df-1st 7671 df-2nd 7672 df-supp 7814 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-2o 8086 df-oadd 8089 df-er 8272 df-map 8391 df-ixp 8445 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-fsupp 8818 df-fi 8859 df-sup 8890 df-inf 8891 df-oi 8958 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-div 11287 df-nn 11626 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-7 11693 df-8 11694 df-9 11695 df-n0 11886 df-z 11970 df-dec 12087 df-uz 12232 df-q 12337 df-rp 12378 df-xneg 12495 df-xadd 12496 df-xmul 12497 df-ioo 12730 df-icc 12733 df-fz 12886 df-fzo 13029 df-seq 13365 df-exp 13426 df-hash 13687 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 20083 df-xmet 20084 df-met 20085 df-bl 20086 df-mopn 20087 df-cnfld 20092 df-top 21499 df-topon 21516 df-topsp 21538 df-bases 21551 df-cld 21624 df-cn 21832 df-cnp 21833 df-tx 22167 df-hmeo 22360 df-xms 22927 df-ms 22928 df-tms 22929 df-ii 23482 df-htpy 23575 df-phtpy 23576 df-phtpc 23597 df-pco 23610

This theorem is referenced by: pcorev 23632

W3C validator