| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | pcoval.2 | . . . . . . 7
⊢ (𝜑 → 𝐹 ∈ (II Cn 𝐽)) | 
| 2 |  | iiuni 24907 | . . . . . . . 8
⊢ (0[,]1) =
∪ II | 
| 3 |  | eqid 2737 | . . . . . . . 8
⊢ ∪ 𝐽 =
∪ 𝐽 | 
| 4 | 2, 3 | cnf 23254 | . . . . . . 7
⊢ (𝐹 ∈ (II Cn 𝐽) → 𝐹:(0[,]1)⟶∪
𝐽) | 
| 5 | 1, 4 | syl 17 | . . . . . 6
⊢ (𝜑 → 𝐹:(0[,]1)⟶∪
𝐽) | 
| 6 |  | elii1 24964 | . . . . . . 7
⊢ (𝑥 ∈ (0[,](1 / 2)) ↔
(𝑥 ∈ (0[,]1) ∧
𝑥 ≤ (1 /
2))) | 
| 7 |  | iihalf1 24958 | . . . . . . 7
⊢ (𝑥 ∈ (0[,](1 / 2)) → (2
· 𝑥) ∈
(0[,]1)) | 
| 8 | 6, 7 | sylbir 235 | . . . . . 6
⊢ ((𝑥 ∈ (0[,]1) ∧ 𝑥 ≤ (1 / 2)) → (2
· 𝑥) ∈
(0[,]1)) | 
| 9 |  | fvco3 7008 | . . . . . 6
⊢ ((𝐹:(0[,]1)⟶∪ 𝐽
∧ (2 · 𝑥) ∈
(0[,]1)) → ((𝐻 ∘
𝐹)‘(2 · 𝑥)) = (𝐻‘(𝐹‘(2 · 𝑥)))) | 
| 10 | 5, 8, 9 | syl2an 596 | . . . . 5
⊢ ((𝜑 ∧ (𝑥 ∈ (0[,]1) ∧ 𝑥 ≤ (1 / 2))) → ((𝐻 ∘ 𝐹)‘(2 · 𝑥)) = (𝐻‘(𝐹‘(2 · 𝑥)))) | 
| 11 | 10 | anassrs 467 | . . . 4
⊢ (((𝜑 ∧ 𝑥 ∈ (0[,]1)) ∧ 𝑥 ≤ (1 / 2)) → ((𝐻 ∘ 𝐹)‘(2 · 𝑥)) = (𝐻‘(𝐹‘(2 · 𝑥)))) | 
| 12 |  | pcoval.3 | . . . . . . 7
⊢ (𝜑 → 𝐺 ∈ (II Cn 𝐽)) | 
| 13 | 2, 3 | cnf 23254 | . . . . . . 7
⊢ (𝐺 ∈ (II Cn 𝐽) → 𝐺:(0[,]1)⟶∪
𝐽) | 
| 14 | 12, 13 | syl 17 | . . . . . 6
⊢ (𝜑 → 𝐺:(0[,]1)⟶∪
𝐽) | 
| 15 |  | elii2 24965 | . . . . . . 7
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 ≤ (1 / 2)) →
𝑥 ∈ ((1 /
2)[,]1)) | 
| 16 |  | iihalf2 24961 | . . . . . . 7
⊢ (𝑥 ∈ ((1 / 2)[,]1) → ((2
· 𝑥) − 1)
∈ (0[,]1)) | 
| 17 | 15, 16 | syl 17 | . . . . . 6
⊢ ((𝑥 ∈ (0[,]1) ∧ ¬
𝑥 ≤ (1 / 2)) → ((2
· 𝑥) − 1)
∈ (0[,]1)) | 
| 18 |  | fvco3 7008 | . . . . . 6
⊢ ((𝐺:(0[,]1)⟶∪ 𝐽
∧ ((2 · 𝑥)
− 1) ∈ (0[,]1)) → ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1)) = (𝐻‘(𝐺‘((2 · 𝑥) − 1)))) | 
| 19 | 14, 17, 18 | syl2an 596 | . . . . 5
⊢ ((𝜑 ∧ (𝑥 ∈ (0[,]1) ∧ ¬ 𝑥 ≤ (1 / 2))) → ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1)) = (𝐻‘(𝐺‘((2 · 𝑥) − 1)))) | 
| 20 | 19 | anassrs 467 | . . . 4
⊢ (((𝜑 ∧ 𝑥 ∈ (0[,]1)) ∧ ¬ 𝑥 ≤ (1 / 2)) → ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1)) = (𝐻‘(𝐺‘((2 · 𝑥) − 1)))) | 
| 21 | 11, 20 | ifeq12da 4559 | . . 3
⊢ ((𝜑 ∧ 𝑥 ∈ (0[,]1)) → if(𝑥 ≤ (1 / 2), ((𝐻 ∘ 𝐹)‘(2 · 𝑥)), ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1))) = if(𝑥 ≤ (1 / 2), (𝐻‘(𝐹‘(2 · 𝑥))), (𝐻‘(𝐺‘((2 · 𝑥) − 1))))) | 
| 22 | 21 | mpteq2dva 5242 | . 2
⊢ (𝜑 → (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), ((𝐻 ∘ 𝐹)‘(2 · 𝑥)), ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1)))) = (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐻‘(𝐹‘(2 · 𝑥))), (𝐻‘(𝐺‘((2 · 𝑥) − 1)))))) | 
| 23 |  | copco.6 | . . . 4
⊢ (𝜑 → 𝐻 ∈ (𝐽 Cn 𝐾)) | 
| 24 |  | cnco 23274 | . . . 4
⊢ ((𝐹 ∈ (II Cn 𝐽) ∧ 𝐻 ∈ (𝐽 Cn 𝐾)) → (𝐻 ∘ 𝐹) ∈ (II Cn 𝐾)) | 
| 25 | 1, 23, 24 | syl2anc 584 | . . 3
⊢ (𝜑 → (𝐻 ∘ 𝐹) ∈ (II Cn 𝐾)) | 
| 26 |  | cnco 23274 | . . . 4
⊢ ((𝐺 ∈ (II Cn 𝐽) ∧ 𝐻 ∈ (𝐽 Cn 𝐾)) → (𝐻 ∘ 𝐺) ∈ (II Cn 𝐾)) | 
| 27 | 12, 23, 26 | syl2anc 584 | . . 3
⊢ (𝜑 → (𝐻 ∘ 𝐺) ∈ (II Cn 𝐾)) | 
| 28 | 25, 27 | pcoval 25044 | . 2
⊢ (𝜑 → ((𝐻 ∘ 𝐹)(*𝑝‘𝐾)(𝐻 ∘ 𝐺)) = (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), ((𝐻 ∘ 𝐹)‘(2 · 𝑥)), ((𝐻 ∘ 𝐺)‘((2 · 𝑥) − 1))))) | 
| 29 | 1, 12 | pcoval 25044 | . . . . . 6
⊢ (𝜑 → (𝐹(*𝑝‘𝐽)𝐺) = (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))))) | 
| 30 |  | pcoval2.4 | . . . . . . 7
⊢ (𝜑 → (𝐹‘1) = (𝐺‘0)) | 
| 31 | 1, 12, 30 | pcocn 25050 | . . . . . 6
⊢ (𝜑 → (𝐹(*𝑝‘𝐽)𝐺) ∈ (II Cn 𝐽)) | 
| 32 | 29, 31 | eqeltrrd 2842 | . . . . 5
⊢ (𝜑 → (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))) ∈ (II Cn 𝐽)) | 
| 33 | 2, 3 | cnf 23254 | . . . . 5
⊢ ((𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))) ∈ (II Cn 𝐽) → (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))):(0[,]1)⟶∪ 𝐽) | 
| 34 | 32, 33 | syl 17 | . . . 4
⊢ (𝜑 → (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))):(0[,]1)⟶∪ 𝐽) | 
| 35 |  | eqid 2737 | . . . . 5
⊢ (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))) = (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))) | 
| 36 | 35 | fmpt 7130 | . . . 4
⊢
(∀𝑥 ∈
(0[,]1)if(𝑥 ≤ (1 / 2),
(𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))) ∈ ∪ 𝐽
↔ (𝑥 ∈ (0[,]1)
↦ if(𝑥 ≤ (1 / 2),
(𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))):(0[,]1)⟶∪ 𝐽) | 
| 37 | 34, 36 | sylibr 234 | . . 3
⊢ (𝜑 → ∀𝑥 ∈ (0[,]1)if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))) ∈ ∪ 𝐽) | 
| 38 |  | eqid 2737 | . . . . . 6
⊢ ∪ 𝐾 =
∪ 𝐾 | 
| 39 | 3, 38 | cnf 23254 | . . . . 5
⊢ (𝐻 ∈ (𝐽 Cn 𝐾) → 𝐻:∪ 𝐽⟶∪ 𝐾) | 
| 40 | 23, 39 | syl 17 | . . . 4
⊢ (𝜑 → 𝐻:∪ 𝐽⟶∪ 𝐾) | 
| 41 | 40 | feqmptd 6977 | . . 3
⊢ (𝜑 → 𝐻 = (𝑦 ∈ ∪ 𝐽 ↦ (𝐻‘𝑦))) | 
| 42 |  | fveq2 6906 | . . . 4
⊢ (𝑦 = if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))) → (𝐻‘𝑦) = (𝐻‘if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))))) | 
| 43 |  | fvif 6922 | . . . 4
⊢ (𝐻‘if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1)))) = if(𝑥 ≤ (1 / 2), (𝐻‘(𝐹‘(2 · 𝑥))), (𝐻‘(𝐺‘((2 · 𝑥) − 1)))) | 
| 44 | 42, 43 | eqtrdi 2793 | . . 3
⊢ (𝑦 = if(𝑥 ≤ (1 / 2), (𝐹‘(2 · 𝑥)), (𝐺‘((2 · 𝑥) − 1))) → (𝐻‘𝑦) = if(𝑥 ≤ (1 / 2), (𝐻‘(𝐹‘(2 · 𝑥))), (𝐻‘(𝐺‘((2 · 𝑥) − 1))))) | 
| 45 | 37, 29, 41, 44 | fmptcof 7150 | . 2
⊢ (𝜑 → (𝐻 ∘ (𝐹(*𝑝‘𝐽)𝐺)) = (𝑥 ∈ (0[,]1) ↦ if(𝑥 ≤ (1 / 2), (𝐻‘(𝐹‘(2 · 𝑥))), (𝐻‘(𝐺‘((2 · 𝑥) − 1)))))) | 
| 46 | 22, 28, 45 | 3eqtr4rd 2788 | 1
⊢ (𝜑 → (𝐻 ∘ (𝐹(*𝑝‘𝐽)𝐺)) = ((𝐻 ∘ 𝐹)(*𝑝‘𝐾)(𝐻 ∘ 𝐺))) |