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 25166

Description: Lemma for pcorev 25167. 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 25019	. . . . . . 7 ⊢ II ∈ (TopOn‘(0[,]1))
3	2	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → II ∈ (TopOn‘(0[,]1)))
4		iirevcn 25070	. . . . . . 7 ⊢ (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II)
5	4	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (1 − 𝑥)) ∈ (II Cn II))
6		id 23	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐹 ∈ (II Cn 𝐽))
7	3, 5, 6	cnmpt11f 23802	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ (𝐹‘(1 − 𝑥))) ∈ (II Cn 𝐽))
8	1, 7	eqeltrid 2867	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐺 ∈ (II Cn 𝐽))
9		1elunit 13498	. . . . 5 ⊢ 1 ∈ (0[,]1)
10		oveq2 7420	. . . . . . . 8 ⊢ (𝑥 = 1 → (1 − 𝑥) = (1 − 1))
11		1m1e0 12314	. . . . . . . 8 ⊢ (1 − 1) = 0
12	10, 11	eqtrdi 2814	. . . . . . 7 ⊢ (𝑥 = 1 → (1 − 𝑥) = 0)
13	12	fveq2d 6887	. . . . . 6 ⊢ (𝑥 = 1 → (𝐹‘(1 − 𝑥)) = (𝐹‘0))
14		fvex 6896	. . . . . 6 ⊢ (𝐹‘0) ∈ V
15	13, 1, 14	fvmpt 6991	. . . . 5 ⊢ (1 ∈ (0[,]1) → (𝐺‘1) = (𝐹‘0))
16	9, 15	mp1i 14	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺‘1) = (𝐹‘0))
17	8, 6, 16	pcocn 25157	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺(*_𝑝‘𝐽)𝐹) ∈ (II Cn 𝐽))
18		cntop2 23379	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ Top)
19		toptopon2 23056	. . . . . 6 ⊢ (𝐽 ∈ Top ↔ 𝐽 ∈ (TopOn‘∪ 𝐽))
20	18, 19	sylib 221	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐽 ∈ (TopOn‘∪ 𝐽))
21		iiuni 25021	. . . . . . 7 ⊢ (0[,]1) = ∪ II
22		eqid 2763	. . . . . . 7 ⊢ ∪ 𝐽 = ∪ 𝐽
23	21, 22	cnf 23384	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐹:(0[,]1)⟶∪ 𝐽)
24		ffvelcdm 7078	. . . . . 6 ⊢ ((𝐹:(0[,]1)⟶∪ 𝐽 ∧ 1 ∈ (0[,]1)) → (𝐹‘1) ∈ ∪ 𝐽)
25	23, 9, 24	sylancl 597	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) ∈ ∪ 𝐽)
26		pcorev.2	. . . . . 6 ⊢ 𝑃 = ((0[,]1) × {(𝐹‘1)})
27	26	pcoptcl 25161	. . . . 5 ⊢ ((𝐽 ∈ (TopOn‘∪ 𝐽) ∧ (𝐹‘1) ∈ ∪ 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
28	20, 25, 27	syl2anc 595	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑃 ∈ (II Cn 𝐽) ∧ (𝑃‘0) = (𝐹‘1) ∧ (𝑃‘1) = (𝐹‘1)))
29	28	simp1d 1160	. . 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 2763	. . . . . 6 ⊢ (topGen‘ran (,)) = (topGen‘ran (,))
32		eqid 2763	. . . . . 6 ⊢ ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) = ((topGen‘ran (,)) ↾_t (0[,](1 / 2)))
33		eqid 2763	. . . . . 6 ⊢ ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) = ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1))
34		dfii2 25022	. . . . . 6 ⊢ II = ((topGen‘ran (,)) ↾_t (0[,]1))
35		0red 11212	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 0 ∈ ℝ)
36		1red 11210	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → 1 ∈ ℝ)
37		halfre 12458	. . . . . . . 8 ⊢ (1 / 2) ∈ ℝ
38		halfge0 12461	. . . . . . . 8 ⊢ 0 ≤ (1 / 2)
39		1re 11209	. . . . . . . . 9 ⊢ 1 ∈ ℝ
40		halflt1 12462	. . . . . . . . 9 ⊢ (1 / 2) < 1
41	37, 39, 40	ltleii 11334	. . . . . . . 8 ⊢ (1 / 2) ≤ 1
42		elicc01 13494	. . . . . . . 8 ⊢ ((1 / 2) ∈ (0[,]1) ↔ ((1 / 2) ∈ ℝ ∧ 0 ≤ (1 / 2) ∧ (1 / 2) ≤ 1))
43	37, 38, 41, 42	mpbir3an 1360	. . . . . . 7 ⊢ (1 / 2) ∈ (0[,]1)
44	43	a1i 11	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (1 / 2) ∈ (0[,]1))
45		simprl 782	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → 𝑠 = (1 / 2))
46	45	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (2 · (1 / 2)))
47		2thalfe1 12349	. . . . . . . . . 10 ⊢ (2 · (1 / 2)) = 1
48	46, 47	eqtrdi 2814	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = 1)
49	48	oveq1d 7427	. . . . . . . . . . . 12 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = (1 − 1))
50	49, 11	eqtrdi 2814	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((2 · 𝑠) − 1) = 0)
51	50	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = (1 − 0))
52		1m0e1 12361	. . . . . . . . . 10 ⊢ (1 − 0) = 1
53	51, 52	eqtrdi 2814	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((2 · 𝑠) − 1)) = 1)
54	48, 53	eqtr4d 2801	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (2 · 𝑠) = (1 − ((2 · 𝑠) − 1)))
55	54	oveq2d 7428	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
56	55	oveq2d 7428	. . . . . 6 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑠 = (1 / 2) ∧ 𝑡 ∈ (0[,]1))) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
57		retopon 24901	. . . . . . . . 9 ⊢ (topGen‘ran (,)) ∈ (TopOn‘ℝ)
58		0re 11211	. . . . . . . . . 10 ⊢ 0 ∈ ℝ
59		iccssre 13457	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ ∧ (1 / 2) ∈ ℝ) → (0[,](1 / 2)) ⊆ ℝ)
60	58, 37, 59	mp2an 704	. . . . . . . . 9 ⊢ (0[,](1 / 2)) ⊆ ℝ
61		resttopon 23299	. . . . . . . . 9 ⊢ (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ (0[,](1 / 2)) ⊆ ℝ) → ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
62	57, 60, 61	mp2an 704	. . . . . . . 8 ⊢ ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2)))
63	62	a1i 11	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ∈ (TopOn‘(0[,](1 / 2))))
64	63, 3	cnmpt2nd 23807	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
65		oveq2 7420	. . . . . . . . 9 ⊢ (𝑥 = 𝑡 → (1 − 𝑥) = (1 − 𝑡))
66	63, 3, 64, 3, 5, 65	cnmpt21 23809	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
67	63, 3	cnmpt1st 23806	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn ((topGen‘ran (,)) ↾_t (0[,](1 / 2)))))
68	32	iihalf1cn 25072	. . . . . . . . . 10 ⊢ (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾_t (0[,](1 / 2))) Cn II)
69	68	a1i 11	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,](1 / 2)) ↦ (2 · 𝑥)) ∈ (((topGen‘ran (,)) ↾_t (0[,](1 / 2))) Cn II))
70		oveq2 7420	. . . . . . . . 9 ⊢ (𝑥 = 𝑠 → (2 · 𝑥) = (2 · 𝑠))
71	63, 3, 67, 63, 69, 70	cnmpt21 23809	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (2 · 𝑠)) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
72		iimulcn 25078	. . . . . . . . 9 ⊢ (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×_t II) Cn II)
73	72	a1i 11	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1), 𝑦 ∈ (0[,]1) ↦ (𝑥 · 𝑦)) ∈ ((II ×_t II) Cn II))
74		oveq12 7421	. . . . . . . 8 ⊢ ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (2 · 𝑠)) → (𝑥 · 𝑦) = ((1 − 𝑡) · (2 · 𝑠)))
75	63, 3, 66, 71, 3, 3, 73, 74	cnmpt22 23812	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (2 · 𝑠))) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
76		oveq2 7420	. . . . . . 7 ⊢ (𝑥 = ((1 − 𝑡) · (2 · 𝑠)) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
77	63, 3, 75, 3, 5, 76	cnmpt21 23809	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,](1 / 2)), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (2 · 𝑠)))) ∈ ((((topGen‘ran (,)) ↾_t (0[,](1 / 2))) ×_t II) Cn II))
78		iccssre 13457	. . . . . . . . . 10 ⊢ (((1 / 2) ∈ ℝ ∧ 1 ∈ ℝ) → ((1 / 2)[,]1) ⊆ ℝ)
79	37, 39, 78	mp2an 704	. . . . . . . . 9 ⊢ ((1 / 2)[,]1) ⊆ ℝ
80		resttopon 23299	. . . . . . . . 9 ⊢ (((topGen‘ran (,)) ∈ (TopOn‘ℝ) ∧ ((1 / 2)[,]1) ⊆ ℝ) → ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
81	57, 79, 80	mp2an 704	. . . . . . . 8 ⊢ ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1))
82	81	a1i 11	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ∈ (TopOn‘((1 / 2)[,]1)))
83	82, 3	cnmpt2nd 23807	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑡) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
84	82, 3, 83, 3, 5, 65	cnmpt21 23809	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − 𝑡)) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
85	82, 3	cnmpt1st 23806	. . . . . . . . . 10 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ 𝑠) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn ((topGen‘ran (,)) ↾_t ((1 / 2)[,]1))))
86	33	iihalf2cn 25074	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) Cn II)
87	86	a1i 11	. . . . . . . . . 10 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑥 ∈ ((1 / 2)[,]1) ↦ ((2 · 𝑥) − 1)) ∈ (((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) Cn II))
88	70	oveq1d 7427	. . . . . . . . . 10 ⊢ (𝑥 = 𝑠 → ((2 · 𝑥) − 1) = ((2 · 𝑠) − 1))
89	82, 3, 85, 82, 87, 88	cnmpt21 23809	. . . . . . . . 9 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((2 · 𝑠) − 1)) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
90		oveq2 7420	. . . . . . . . 9 ⊢ (𝑥 = ((2 · 𝑠) − 1) → (1 − 𝑥) = (1 − ((2 · 𝑠) − 1)))
91	82, 3, 89, 3, 5, 90	cnmpt21 23809	. . . . . . . 8 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((2 · 𝑠) − 1))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
92		oveq12 7421	. . . . . . . 8 ⊢ ((𝑥 = (1 − 𝑡) ∧ 𝑦 = (1 − ((2 · 𝑠) − 1))) → (𝑥 · 𝑦) = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))
93	82, 3, 84, 91, 3, 3, 73, 92	cnmpt22 23812	. . . . . . 7 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
94		oveq2 7420	. . . . . . 7 ⊢ (𝑥 = ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) → (1 − 𝑥) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
95	82, 3, 93, 3, 5, 94	cnmpt21 23809	. . . . . 6 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ ((1 / 2)[,]1), 𝑡 ∈ (0[,]1) ↦ (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) ∈ ((((topGen‘ran (,)) ↾_t ((1 / 2)[,]1)) ×_t II) Cn II))
96	31, 32, 33, 34, 35, 36, 44, 3, 56, 77, 95	cnmpopc 25068	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) ∈ ((II ×_t II) Cn II))
97	3, 3, 96, 6	cnmpt21f 23810	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝑠 ∈ (0[,]1), 𝑡 ∈ (0[,]1) ↦ (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))))) ∈ ((II ×_t II) Cn 𝐽))
98	30, 97	eqeltrid 2867	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((II ×_t II) Cn 𝐽))
99		simpr 489	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → 𝑦 ∈ (0[,]1))
100		0elunit 13497	. . . . 5 ⊢ 0 ∈ (0[,]1)
101		simpl 487	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → 𝑠 = 𝑦)
102	101	breq1d 5120	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
103		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → 𝑡 = 0)
104	103	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − 𝑡) = (1 − 0))
105	104, 52	eqtrdi 2814	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − 𝑡) = 1)
106	101	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (2 · 𝑠) = (2 · 𝑦))
107	105, 106	oveq12d 7430	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((1 − 𝑡) · (2 · 𝑠)) = (1 · (2 · 𝑦)))
108	107	oveq2d 7428	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (1 · (2 · 𝑦))))
109	106	oveq1d 7427	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
110	109	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
111	105, 110	oveq12d 7430	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (1 · (1 − ((2 · 𝑦) − 1))))
112	111	oveq2d 7428	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
113	102, 108, 112	ifbieq12d 4517	. . . . . . 7 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))))
114	113	fveq2d 6887	. . . . . 6 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 0) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
115		fvex 6896	. . . . . 6 ⊢ (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
116	114, 30, 115	ovmpoa 7567	. . . . 5 ⊢ ((𝑦 ∈ (0[,]1) ∧ 0 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
117	99, 100, 116	sylancl 597	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))))
118		iftrue 4494	. . . . . . . 8 ⊢ (𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
119	118	adantl 486	. . . . . . 7 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (2 · 𝑦))))
120	119	fveq2d 6887	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
121		elii1 25075	. . . . . . . 8 ⊢ (𝑦 ∈ (0[,](1 / 2)) ↔ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2)))
122	8, 6	pcoval1 25153	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐺‘(2 · 𝑦)))
123		iihalf1 25071	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0[,](1 / 2)) → (2 · 𝑦) ∈ (0[,]1))
124	123	adantl 486	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (2 · 𝑦) ∈ (0[,]1))
125		oveq2 7420	. . . . . . . . . . . . 13 ⊢ (𝑥 = (2 · 𝑦) → (1 − 𝑥) = (1 − (2 · 𝑦)))
126	125	fveq2d 6887	. . . . . . . . . . . 12 ⊢ (𝑥 = (2 · 𝑦) → (𝐹‘(1 − 𝑥)) = (𝐹‘(1 − (2 · 𝑦))))
127		fvex 6896	. . . . . . . . . . . 12 ⊢ (𝐹‘(1 − (2 · 𝑦))) ∈ V
128	126, 1, 127	fvmpt 6991	. . . . . . . . . . 11 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (2 · 𝑦))))
129		unitssre 13527	. . . . . . . . . . . . . . . 16 ⊢ (0[,]1) ⊆ ℝ
130	129	sseli 3934	. . . . . . . . . . . . . . 15 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℝ)
131	130	recnd 11238	. . . . . . . . . . . . . 14 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
132	131	mullidd 11228	. . . . . . . . . . . . 13 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (1 · (2 · 𝑦)) = (2 · 𝑦))
133	132	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (1 − (1 · (2 · 𝑦))) = (1 − (2 · 𝑦)))
134	133	fveq2d 6887	. . . . . . . . . . 11 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐹‘(1 − (1 · (2 · 𝑦)))) = (𝐹‘(1 − (2 · 𝑦))))
135	128, 134	eqtr4d 2801	. . . . . . . . . 10 ⊢ ((2 · 𝑦) ∈ (0[,]1) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
136	124, 135	syl 18	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → (𝐺‘(2 · 𝑦)) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
137	122, 136	eqtrd 2798	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,](1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
138	121, 137	sylan2br 606	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ 𝑦 ≤ (1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
139	138	anassrs 472	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (2 · 𝑦)))))
140	120, 139	eqtr4d 2801	. . . . 5 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
141		iffalse 4497	. . . . . . . 8 ⊢ (¬ 𝑦 ≤ (1 / 2) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
142	141	adantl 486	. . . . . . 7 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1))))) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
143	142	fveq2d 6887	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
144		elii2 25076	. . . . . . . 8 ⊢ ((𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2)) → 𝑦 ∈ ((1 / 2)[,]1))
145	8, 6, 16	pcoval2 25156	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘((2 · 𝑦) − 1)))
146		iihalf2 25073	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ((1 / 2)[,]1) → ((2 · 𝑦) − 1) ∈ (0[,]1))
147	146	adantl 486	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) ∈ (0[,]1))
148		ax-1cn 11159	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℂ
149	129	sseli 3934	. . . . . . . . . . . . . . . 16 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℝ)
150	149	recnd 11238	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) ∈ ℂ)
151		subcl 11457	. . . . . . . . . . . . . . 15 ⊢ ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
152	148, 150, 151	sylancr 598	. . . . . . . . . . . . . 14 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
153	152	mullidd 11228	. . . . . . . . . . . . 13 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 · (1 − ((2 · 𝑦) − 1))) = (1 − ((2 · 𝑦) − 1)))
154	153	oveq2d 7428	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 · (1 − ((2 · 𝑦) − 1)))) = (1 − (1 − ((2 · 𝑦) − 1))))
155		nncan 11488	. . . . . . . . . . . . 13 ⊢ ((1 ∈ ℂ ∧ ((2 · 𝑦) − 1) ∈ ℂ) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
156	148, 150, 155	sylancr 598	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → (1 − (1 − ((2 · 𝑦) − 1))) = ((2 · 𝑦) − 1))
157	154, 156	eqtr2d 2799	. . . . . . . . . . 11 ⊢ (((2 · 𝑦) − 1) ∈ (0[,]1) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
158	147, 157	syl 18	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((2 · 𝑦) − 1) = (1 − (1 · (1 − ((2 · 𝑦) − 1)))))
159	158	fveq2d 6887	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → (𝐹‘((2 · 𝑦) − 1)) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
160	145, 159	eqtrd 2798	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ ((1 / 2)[,]1)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
161	144, 160	sylan2 604	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ (𝑦 ∈ (0[,]1) ∧ ¬ 𝑦 ≤ (1 / 2))) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
162	161	anassrs 472	. . . . . 6 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦) = (𝐹‘(1 − (1 · (1 − ((2 · 𝑦) − 1))))))
163	143, 162	eqtr4d 2801	. . . . 5 ⊢ (((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) ∧ ¬ 𝑦 ≤ (1 / 2)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
164	140, 163	pm2.61dan 824	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (1 · (2 · 𝑦))), (1 − (1 · (1 − ((2 · 𝑦) − 1)))))) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
165	117, 164	eqtrd 2798	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻0) = ((𝐺(*_𝑝‘𝐽)𝐹)‘𝑦))
166		2cn 12317	. . . . . . . . . . . 12 ⊢ 2 ∈ ℂ
167	129	sseli 3934	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℝ)
168	167	recnd 11238	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (0[,]1) → 𝑦 ∈ ℂ)
169		mulcl 11185	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (2 · 𝑦) ∈ ℂ)
170	166, 168, 169	sylancr 598	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (0[,]1) → (2 · 𝑦) ∈ ℂ)
171	170	adantl 486	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (2 · 𝑦) ∈ ℂ)
172	171	mul02d 11409	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (2 · 𝑦)) = 0)
173	172	oveq2d 7428	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = (1 − 0))
174	173, 52	eqtrdi 2814	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (2 · 𝑦))) = 1)
175		subcl 11457	. . . . . . . . . . . 12 ⊢ (((2 · 𝑦) ∈ ℂ ∧ 1 ∈ ℂ) → ((2 · 𝑦) − 1) ∈ ℂ)
176	171, 148, 175	sylancl 597	. . . . . . . . . . 11 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → ((2 · 𝑦) − 1) ∈ ℂ)
177	148, 176, 151	sylancr 598	. . . . . . . . . 10 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − ((2 · 𝑦) − 1)) ∈ ℂ)
178	177	mul02d 11409	. . . . . . . . 9 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0 · (1 − ((2 · 𝑦) − 1))) = 0)
179	178	oveq2d 7428	. . . . . . . 8 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = (1 − 0))
180	179, 52	eqtrdi 2814	. . . . . . 7 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1 − (0 · (1 − ((2 · 𝑦) − 1)))) = 1)
181	174, 180	ifeq12d 4510	. . . . . 6 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = if(𝑦 ≤ (1 / 2), 1, 1))
182		ifid 4529	. . . . . 6 ⊢ if(𝑦 ≤ (1 / 2), 1, 1) = 1
183	181, 182	eqtrdi 2814	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))) = 1)
184	183	fveq2d 6887	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) = (𝐹‘1))
185		simpl 487	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → 𝑠 = 𝑦)
186	185	breq1d 5120	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (𝑠 ≤ (1 / 2) ↔ 𝑦 ≤ (1 / 2)))
187		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → 𝑡 = 1)
188	187	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − 𝑡) = (1 − 1))
189	188, 11	eqtrdi 2814	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − 𝑡) = 0)
190	185	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (2 · 𝑠) = (2 · 𝑦))
191	189, 190	oveq12d 7430	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((1 − 𝑡) · (2 · 𝑠)) = (0 · (2 · 𝑦)))
192	191	oveq2d 7428	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − (0 · (2 · 𝑦))))
193	190	oveq1d 7427	. . . . . . . . . . 11 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((2 · 𝑠) − 1) = ((2 · 𝑦) − 1))
194	193	oveq2d 7428	. . . . . . . . . 10 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((2 · 𝑠) − 1)) = (1 − ((2 · 𝑦) − 1)))
195	189, 194	oveq12d 7430	. . . . . . . . 9 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = (0 · (1 − ((2 · 𝑦) − 1))))
196	195	oveq2d 7428	. . . . . . . 8 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − (0 · (1 − ((2 · 𝑦) − 1)))))
197	186, 192, 196	ifbieq12d 4517	. . . . . . 7 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1))))))
198	197	fveq2d 6887	. . . . . 6 ⊢ ((𝑠 = 𝑦 ∧ 𝑡 = 1) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
199		fvex 6896	. . . . . 6 ⊢ (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))) ∈ V
200	198, 30, 199	ovmpoa 7567	. . . . 5 ⊢ ((𝑦 ∈ (0[,]1) ∧ 1 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
201	99, 9, 200	sylancl 597	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝐹‘if(𝑦 ≤ (1 / 2), (1 − (0 · (2 · 𝑦))), (1 − (0 · (1 − ((2 · 𝑦) − 1)))))))
202	26	fveq1i 6884	. . . . 5 ⊢ (𝑃‘𝑦) = (((0[,]1) × {(𝐹‘1)})‘𝑦)
203		fvex 6896	. . . . . . 7 ⊢ (𝐹‘1) ∈ V
204	203	fvconst2 7204	. . . . . 6 ⊢ (𝑦 ∈ (0[,]1) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
205	204	adantl 486	. . . . 5 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (((0[,]1) × {(𝐹‘1)})‘𝑦) = (𝐹‘1))
206	202, 205	eqtrid 2810	. . . 4 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑃‘𝑦) = (𝐹‘1))
207	184, 201, 206	3eqtr4d 2808	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (𝑦𝐻1) = (𝑃‘𝑦))
208		simpl 487	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 = 0)
209	208, 38	eqbrtrdi 5151	. . . . . . . . . 10 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑠 ≤ (1 / 2))
210	209	iftrued 4496	. . . . . . . . 9 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (2 · 𝑠))))
211		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
212	211	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
213	208	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 0))
214		2t0e0 12412	. . . . . . . . . . . 12 ⊢ (2 · 0) = 0
215	213, 214	eqtrdi 2814	. . . . . . . . . . 11 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 0)
216	212, 215	oveq12d 7430	. . . . . . . . . 10 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (2 · 𝑠)) = ((1 − 𝑦) · 0))
217	216	oveq2d 7428	. . . . . . . . 9 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (2 · 𝑠))) = (1 − ((1 − 𝑦) · 0)))
218	210, 217	eqtrd 2798	. . . . . . . 8 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
219	218	fveq2d 6887	. . . . . . 7 ⊢ ((𝑠 = 0 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
220		fvex 6896	. . . . . . 7 ⊢ (𝐹‘(1 − ((1 − 𝑦) · 0))) ∈ V
221	219, 30, 220	ovmpoa 7567	. . . . . 6 ⊢ ((0 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
222	100, 221	mpan 702	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
223		subcl 11457	. . . . . . . . . 10 ⊢ ((1 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (1 − 𝑦) ∈ ℂ)
224	148, 168, 223	sylancr 598	. . . . . . . . 9 ⊢ (𝑦 ∈ (0[,]1) → (1 − 𝑦) ∈ ℂ)
225	224	mul01d 11410	. . . . . . . 8 ⊢ (𝑦 ∈ (0[,]1) → ((1 − 𝑦) · 0) = 0)
226	225	oveq2d 7428	. . . . . . 7 ⊢ (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = (1 − 0))
227	226, 52	eqtrdi 2814	. . . . . 6 ⊢ (𝑦 ∈ (0[,]1) → (1 − ((1 − 𝑦) · 0)) = 1)
228	227	fveq2d 6887	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (𝐹‘(1 − ((1 − 𝑦) · 0))) = (𝐹‘1))
229	222, 228	eqtrd 2798	. . . 4 ⊢ (𝑦 ∈ (0[,]1) → (0𝐻𝑦) = (𝐹‘1))
230	8, 6	pco0 25154	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)‘0) = (𝐺‘0))
231		oveq2 7420	. . . . . . . . 9 ⊢ (𝑥 = 0 → (1 − 𝑥) = (1 − 0))
232	231, 52	eqtrdi 2814	. . . . . . . 8 ⊢ (𝑥 = 0 → (1 − 𝑥) = 1)
233	232	fveq2d 6887	. . . . . . 7 ⊢ (𝑥 = 0 → (𝐹‘(1 − 𝑥)) = (𝐹‘1))
234	233, 1, 203	fvmpt 6991	. . . . . 6 ⊢ (0 ∈ (0[,]1) → (𝐺‘0) = (𝐹‘1))
235	100, 234	ax-mp 5	. . . . 5 ⊢ (𝐺‘0) = (𝐹‘1)
236	230, 235	eqtr2di 2815	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*_𝑝‘𝐽)𝐹)‘0))
237	229, 236	sylan9eqr 2820	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (0𝐻𝑦) = ((𝐺(*_𝑝‘𝐽)𝐹)‘0))
238	37, 39	ltnlei 11332	. . . . . . . . . . . 12 ⊢ ((1 / 2) < 1 ↔ ¬ 1 ≤ (1 / 2))
239	40, 238	mpbi 233	. . . . . . . . . . 11 ⊢ ¬ 1 ≤ (1 / 2)
240		simpl 487	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑠 = 1)
241	240	breq1d 5120	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝑠 ≤ (1 / 2) ↔ 1 ≤ (1 / 2)))
242	239, 241	mtbiri 330	. . . . . . . . . 10 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ¬ 𝑠 ≤ (1 / 2))
243	242	iffalsed 4499	. . . . . . . . 9 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))
244		simpr 489	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → 𝑡 = 𝑦)
245	244	oveq2d 7428	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − 𝑡) = (1 − 𝑦))
246	240	oveq2d 7428	. . . . . . . . . . . . . . . 16 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = (2 · 1))
247		2t1e2 12404	. . . . . . . . . . . . . . . 16 ⊢ (2 · 1) = 2
248	246, 247	eqtrdi 2814	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (2 · 𝑠) = 2)
249	248	oveq1d 7427	. . . . . . . . . . . . . 14 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = (2 − 1))
250		2m1e1 12366	. . . . . . . . . . . . . 14 ⊢ (2 − 1) = 1
251	249, 250	eqtrdi 2814	. . . . . . . . . . . . 13 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((2 · 𝑠) − 1) = 1)
252	251	oveq2d 7428	. . . . . . . . . . . 12 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = (1 − 1))
253	252, 11	eqtrdi 2814	. . . . . . . . . . 11 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((2 · 𝑠) − 1)) = 0)
254	245, 253	oveq12d 7430	. . . . . . . . . 10 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))) = ((1 − 𝑦) · 0))
255	254	oveq2d 7428	. . . . . . . . 9 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))) = (1 − ((1 − 𝑦) · 0)))
256	243, 255	eqtrd 2798	. . . . . . . 8 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1))))) = (1 − ((1 − 𝑦) · 0)))
257	256	fveq2d 6887	. . . . . . 7 ⊢ ((𝑠 = 1 ∧ 𝑡 = 𝑦) → (𝐹‘if(𝑠 ≤ (1 / 2), (1 − ((1 − 𝑡) · (2 · 𝑠))), (1 − ((1 − 𝑡) · (1 − ((2 · 𝑠) − 1)))))) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
258	257, 30, 220	ovmpoa 7567	. . . . . 6 ⊢ ((1 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
259	9, 258	mpan 702	. . . . 5 ⊢ (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘(1 − ((1 − 𝑦) · 0))))
260	259, 228	eqtrd 2798	. . . 4 ⊢ (𝑦 ∈ (0[,]1) → (1𝐻𝑦) = (𝐹‘1))
261	8, 6	pco1 25155	. . . . 5 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)‘1) = (𝐹‘1))
262	261	eqcomd 2769	. . . 4 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐹‘1) = ((𝐺(*_𝑝‘𝐽)𝐹)‘1))
263	260, 262	sylan9eqr 2820	. . 3 ⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝑦 ∈ (0[,]1)) → (1𝐻𝑦) = ((𝐺(*_𝑝‘𝐽)𝐹)‘1))
264	17, 29, 98, 165, 207, 237, 263	isphtpy2d 25127	. 2 ⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐻 ∈ ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃))
265	264	ne0d 4296	. . 3 ⊢ (𝐹 ∈ (II Cn 𝐽) → ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅)
266		isphtpc 25134	. . 3 ⊢ ((𝐺(_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃 ↔ ((𝐺(_𝑝‘𝐽)𝐹) ∈ (II Cn 𝐽) ∧ 𝑃 ∈ (II Cn 𝐽) ∧ ((𝐺(*_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ≠ ∅))
267	17, 29, 265, 266	syl3anbrc 1362	. 2 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐺(*_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃)
268	264, 267	jca 520	1 ⊢ (𝐹 ∈ (II Cn 𝐽) → (𝐻 ∈ ((𝐺(_𝑝‘𝐽)𝐹)(PHtpy‘𝐽)𝑃) ∧ (𝐺(_𝑝‘𝐽)𝐹)( ≃_ph‘𝐽)𝑃))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 400 ∧ w3a 1103 = wceq 1570 ∈ wcel 2143 ≠ wne 2958 ⊆ wss 3906 ∅c0 4287 ifcif 4488 {csn 4590 ∪ cuni 4873 class class class wbr 5110 ↦ cmpt 5193 × cxp 5661 ran crn 5664 ⟶wf 6534 ‘cfv 6538 (class class class)co 7412 ∈ cmpo 7414 ℂcc 11099 ℝcr 11100 0cc0 11101 1c1 11102 · cmul 11106 < clt 11244 ≤ cle 11245 − cmin 11442 / cdiv 11872 2c2 12296 (,)cioo 13373 [,]cicc 13376 ↾_t crest 17474 topGenctg 17491 Topctop 23031 TopOnctopon 23048 Cn ccn 23362 ×_t ctx 23698 IIcii 25015 PHtpycphtpy 25108 ≃_phcphtpc 25109 *_𝑝cpco 25140

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5239 ax-sep 5258 ax-nul 5270 ax-pow 5338 ax-pr 5406 ax-un 7734 ax-cnex 11157 ax-resscn 11158 ax-1cn 11159 ax-icn 11160 ax-addcl 11161 ax-addrcl 11162 ax-mulcl 11163 ax-mulrcl 11164 ax-mulcom 11165 ax-addass 11166 ax-mulass 11167 ax-distr 11168 ax-i2m1 11169 ax-1ne0 11170 ax-1rid 11171 ax-rnegex 11172 ax-rrecex 11173 ax-cnre 11174 ax-pre-lttri 11175 ax-pre-lttrn 11176 ax-pre-ltadd 11177 ax-pre-mulgt0 11178 ax-pre-sup 11179

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3746 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4288 df-if 4489 df-pw 4565 df-sn 4591 df-pr 4593 df-tp 4595 df-op 4597 df-uni 4874 df-int 4914 df-iun 4959 df-iin 4960 df-br 5111 df-opab 5175 df-mpt 5194 df-tr 5220 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-se 5617 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-isom 6547 df-riota 7369 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7676 df-om 7864 df-1st 7987 df-2nd 7988 df-supp 8158 df-frecs 8279 df-wrecs 8310 df-recs 8359 df-rdg 8398 df-1o 8454 df-2o 8455 df-er 8695 df-map 8827 df-ixp 8897 df-en 8945 df-dom 8946 df-sdom 8947 df-fin 8948 df-fsupp 9323 df-fi 9372 df-sup 9403 df-inf 9404 df-oi 9473 df-card 9926 df-pnf 11246 df-mnf 11247 df-xr 11248 df-ltxr 11249 df-le 11250 df-sub 11444 df-neg 11445 df-div 11873 df-nn 12235 df-2 12304 df-3 12305 df-4 12306 df-5 12307 df-6 12308 df-7 12309 df-8 12310 df-9 12311 df-n0 12506 df-z 12593 df-dec 12713 df-uz 12864 df-q 12974 df-rp 13018 df-xneg 13138 df-xadd 13139 df-xmul 13140 df-ioo 13377 df-icc 13380 df-fz 13537 df-fzo 13685 df-seq 14040 df-exp 14100 df-hash 14369 df-cj 15152 df-re 15153 df-im 15154 df-sqrt 15288 df-abs 15289 df-struct 17208 df-sets 17225 df-slot 17243 df-ndx 17255 df-base 17271 df-ress 17292 df-plusg 17324 df-mulr 17325 df-starv 17326 df-sca 17327 df-vsca 17328 df-ip 17329 df-tset 17330 df-ple 17331 df-ds 17333 df-unif 17334 df-hom 17335 df-cco 17336 df-rest 17476 df-topn 17477 df-0g 17495 df-gsum 17496 df-topgen 17497 df-pt 17498 df-prds 17501 df-xrs 17557 df-qtop 17562 df-imas 17563 df-xps 17565 df-mre 17639 df-mrc 17640 df-acs 17642 df-mgm 18699 df-sgrp 18778 df-mnd 18794 df-submnd 18843 df-mulg 19135 df-cntz 19388 df-cmn 19853 df-psmet 21495 df-xmet 21496 df-met 21497 df-bl 21498 df-mopn 21499 df-cnfld 21504 df-top 23032 df-topon 23049 df-topsp 23071 df-bases 23084 df-cld 23157 df-cn 23365 df-cnp 23366 df-tx 23700 df-hmeo 23893 df-xms 24458 df-ms 24459 df-tms 24460 df-ii 25017 df-htpy 25110 df-phtpy 25111 df-phtpc 25132 df-pco 25145

This theorem is referenced by: pcorev 25167

W3C validator