| Step | Hyp | Ref
| Expression |
| 1 | | ptcld.c |
. . . . 5
⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ∈ (Clsd‘(𝐹‘𝑘))) |
| 2 | | eqid 2622 |
. . . . . 6
⊢ ∪ (𝐹‘𝑘) = ∪ (𝐹‘𝑘) |
| 3 | 2 | cldss 20833 |
. . . . 5
⊢ (𝐶 ∈ (Clsd‘(𝐹‘𝑘)) → 𝐶 ⊆ ∪ (𝐹‘𝑘)) |
| 4 | 1, 3 | syl 17 |
. . . 4
⊢ ((𝜑 ∧ 𝑘 ∈ 𝐴) → 𝐶 ⊆ ∪ (𝐹‘𝑘)) |
| 5 | 4 | ralrimiva 2966 |
. . 3
⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐶 ⊆ ∪ (𝐹‘𝑘)) |
| 6 | | boxriin 7950 |
. . 3
⊢
(∀𝑘 ∈
𝐴 𝐶 ⊆ ∪ (𝐹‘𝑘) → X𝑘 ∈ 𝐴 𝐶 = (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)))) |
| 7 | 5, 6 | syl 17 |
. 2
⊢ (𝜑 → X𝑘 ∈
𝐴 𝐶 = (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)))) |
| 8 | | ptcld.a |
. . . . 5
⊢ (𝜑 → 𝐴 ∈ 𝑉) |
| 9 | | ptcld.f |
. . . . 5
⊢ (𝜑 → 𝐹:𝐴⟶Top) |
| 10 | | eqid 2622 |
. . . . . 6
⊢
(∏t‘𝐹) = (∏t‘𝐹) |
| 11 | 10 | ptuni 21397 |
. . . . 5
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐹:𝐴⟶Top) → X𝑘 ∈
𝐴 ∪ (𝐹‘𝑘) = ∪
(∏t‘𝐹)) |
| 12 | 8, 9, 11 | syl2anc 693 |
. . . 4
⊢ (𝜑 → X𝑘 ∈
𝐴 ∪ (𝐹‘𝑘) = ∪
(∏t‘𝐹)) |
| 13 | 12 | ineq1d 3813 |
. . 3
⊢ (𝜑 → (X𝑘 ∈
𝐴 ∪ (𝐹‘𝑘) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = (∪
(∏t‘𝐹) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)))) |
| 14 | | pttop 21385 |
. . . . 5
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐹:𝐴⟶Top) →
(∏t‘𝐹) ∈ Top) |
| 15 | 8, 9, 14 | syl2anc 693 |
. . . 4
⊢ (𝜑 →
(∏t‘𝐹) ∈ Top) |
| 16 | | sseq1 3626 |
. . . . . . . . . . 11
⊢ (𝐶 = if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) → (𝐶 ⊆ ∪ (𝐹‘𝑘) ↔ if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(𝐹‘𝑘))) |
| 17 | | sseq1 3626 |
. . . . . . . . . . 11
⊢ (∪ (𝐹‘𝑘) = if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) → (∪
(𝐹‘𝑘) ⊆ ∪ (𝐹‘𝑘) ↔ if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(𝐹‘𝑘))) |
| 18 | | simpl 473 |
. . . . . . . . . . 11
⊢ ((𝐶 ⊆ ∪ (𝐹‘𝑘) ∧ 𝑘 = 𝑥) → 𝐶 ⊆ ∪ (𝐹‘𝑘)) |
| 19 | | ssid 3624 |
. . . . . . . . . . . 12
⊢ ∪ (𝐹‘𝑘) ⊆ ∪ (𝐹‘𝑘) |
| 20 | 19 | a1i 11 |
. . . . . . . . . . 11
⊢ ((𝐶 ⊆ ∪ (𝐹‘𝑘) ∧ ¬ 𝑘 = 𝑥) → ∪ (𝐹‘𝑘) ⊆ ∪ (𝐹‘𝑘)) |
| 21 | 16, 17, 18, 20 | ifbothda 4123 |
. . . . . . . . . 10
⊢ (𝐶 ⊆ ∪ (𝐹‘𝑘) → if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(𝐹‘𝑘)) |
| 22 | 21 | ralimi 2952 |
. . . . . . . . 9
⊢
(∀𝑘 ∈
𝐴 𝐶 ⊆ ∪ (𝐹‘𝑘) → ∀𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(𝐹‘𝑘)) |
| 23 | | ss2ixp 7921 |
. . . . . . . . 9
⊢
(∀𝑘 ∈
𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(𝐹‘𝑘) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘)) |
| 24 | 5, 22, 23 | 3syl 18 |
. . . . . . . 8
⊢ (𝜑 → X𝑘 ∈
𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘)) |
| 25 | 24 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘)) |
| 26 | 12 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) = ∪
(∏t‘𝐹)) |
| 27 | 25, 26 | sseqtrd 3641 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(∏t‘𝐹)) |
| 28 | 12 | eqcomd 2628 |
. . . . . . . . . 10
⊢ (𝜑 → ∪ (∏t‘𝐹) = X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘)) |
| 29 | 28 | difeq1d 3727 |
. . . . . . . . 9
⊢ (𝜑 → (∪ (∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)))) |
| 30 | 29 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)))) |
| 31 | | simpr 477 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴) |
| 32 | 5 | adantr 481 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ∀𝑘 ∈ 𝐴 𝐶 ⊆ ∪ (𝐹‘𝑘)) |
| 33 | | boxcutc 7951 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ∧ ∀𝑘 ∈ 𝐴 𝐶 ⊆ ∪ (𝐹‘𝑘)) → (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘))) |
| 34 | 31, 32, 33 | syl2anc 693 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (X𝑘 ∈ 𝐴 ∪ (𝐹‘𝑘) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘))) |
| 35 | | ixpeq2 7922 |
. . . . . . . . . 10
⊢
(∀𝑘 ∈
𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘)) = if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘)) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘))) |
| 36 | | fveq2 6191 |
. . . . . . . . . . . . . 14
⊢ (𝑘 = 𝑥 → (𝐹‘𝑘) = (𝐹‘𝑥)) |
| 37 | 36 | unieqd 4446 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑥 → ∪ (𝐹‘𝑘) = ∪ (𝐹‘𝑥)) |
| 38 | | csbeq1a 3542 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑥 → 𝐶 = ⦋𝑥 / 𝑘⦌𝐶) |
| 39 | 37, 38 | difeq12d 3729 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑥 → (∪ (𝐹‘𝑘) ∖ 𝐶) = (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶)) |
| 40 | 39 | adantl 482 |
. . . . . . . . . . 11
⊢ ((𝑘 ∈ 𝐴 ∧ 𝑘 = 𝑥) → (∪ (𝐹‘𝑘) ∖ 𝐶) = (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶)) |
| 41 | 40 | ifeq1da 4116 |
. . . . . . . . . 10
⊢ (𝑘 ∈ 𝐴 → if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘)) = if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘))) |
| 42 | 35, 41 | mprg 2926 |
. . . . . . . . 9
⊢ X𝑘 ∈
𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘)) |
| 43 | 42 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑘) ∖ 𝐶), ∪ (𝐹‘𝑘)) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘))) |
| 44 | 30, 34, 43 | 3eqtrd 2660 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) = X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘))) |
| 45 | 8 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐴 ∈ 𝑉) |
| 46 | 9 | adantr 481 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐹:𝐴⟶Top) |
| 47 | 1 | ralrimiva 2966 |
. . . . . . . . . . 11
⊢ (𝜑 → ∀𝑘 ∈ 𝐴 𝐶 ∈ (Clsd‘(𝐹‘𝑘))) |
| 48 | | nfv 1843 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑥 𝐶 ∈ (Clsd‘(𝐹‘𝑘)) |
| 49 | | nfcsb1v 3549 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑘⦋𝑥 / 𝑘⦌𝐶 |
| 50 | 49 | nfel1 2779 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑘⦋𝑥 / 𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥)) |
| 51 | 36 | fveq2d 6195 |
. . . . . . . . . . . . 13
⊢ (𝑘 = 𝑥 → (Clsd‘(𝐹‘𝑘)) = (Clsd‘(𝐹‘𝑥))) |
| 52 | 38, 51 | eleq12d 2695 |
. . . . . . . . . . . 12
⊢ (𝑘 = 𝑥 → (𝐶 ∈ (Clsd‘(𝐹‘𝑘)) ↔ ⦋𝑥 / 𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥)))) |
| 53 | 48, 50, 52 | cbvral 3167 |
. . . . . . . . . . 11
⊢
(∀𝑘 ∈
𝐴 𝐶 ∈ (Clsd‘(𝐹‘𝑘)) ↔ ∀𝑥 ∈ 𝐴 ⦋𝑥 / 𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥))) |
| 54 | 47, 53 | sylib 208 |
. . . . . . . . . 10
⊢ (𝜑 → ∀𝑥 ∈ 𝐴 ⦋𝑥 / 𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥))) |
| 55 | 54 | r19.21bi 2932 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ⦋𝑥 / 𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥))) |
| 56 | | eqid 2622 |
. . . . . . . . . 10
⊢ ∪ (𝐹‘𝑥) = ∪ (𝐹‘𝑥) |
| 57 | 56 | cldopn 20835 |
. . . . . . . . 9
⊢
(⦋𝑥 /
𝑘⦌𝐶 ∈ (Clsd‘(𝐹‘𝑥)) → (∪
(𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶) ∈ (𝐹‘𝑥)) |
| 58 | 55, 57 | syl 17 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (∪
(𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶) ∈ (𝐹‘𝑥)) |
| 59 | 45, 46, 58 | ptopn2 21387 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, (∪ (𝐹‘𝑥) ∖ ⦋𝑥 / 𝑘⦌𝐶), ∪ (𝐹‘𝑘)) ∈ (∏t‘𝐹)) |
| 60 | 44, 59 | eqeltrd 2701 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈ (∏t‘𝐹)) |
| 61 | | eqid 2622 |
. . . . . . . . 9
⊢ ∪ (∏t‘𝐹) = ∪
(∏t‘𝐹) |
| 62 | 61 | iscld 20831 |
. . . . . . . 8
⊢
((∏t‘𝐹) ∈ Top → (X𝑘 ∈
𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹)) ↔ (X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(∏t‘𝐹) ∧ (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈ (∏t‘𝐹)))) |
| 63 | 15, 62 | syl 17 |
. . . . . . 7
⊢ (𝜑 → (X𝑘 ∈
𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹)) ↔ (X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(∏t‘𝐹) ∧ (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈ (∏t‘𝐹)))) |
| 64 | 63 | adantr 481 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹)) ↔ (X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ⊆ ∪
(∏t‘𝐹) ∧ (∪
(∏t‘𝐹) ∖ X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈ (∏t‘𝐹)))) |
| 65 | 27, 60, 64 | mpbir2and 957 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹))) |
| 66 | 65 | ralrimiva 2966 |
. . . 4
⊢ (𝜑 → ∀𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹))) |
| 67 | 61 | riincld 20848 |
. . . 4
⊢
(((∏t‘𝐹) ∈ Top ∧ ∀𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘)) ∈
(Clsd‘(∏t‘𝐹))) → (∪
(∏t‘𝐹) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈
(Clsd‘(∏t‘𝐹))) |
| 68 | 15, 66, 67 | syl2anc 693 |
. . 3
⊢ (𝜑 → (∪ (∏t‘𝐹) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈
(Clsd‘(∏t‘𝐹))) |
| 69 | 13, 68 | eqeltrd 2701 |
. 2
⊢ (𝜑 → (X𝑘 ∈
𝐴 ∪ (𝐹‘𝑘) ∩ ∩
𝑥 ∈ 𝐴 X𝑘 ∈ 𝐴 if(𝑘 = 𝑥, 𝐶, ∪ (𝐹‘𝑘))) ∈
(Clsd‘(∏t‘𝐹))) |
| 70 | 7, 69 | eqeltrd 2701 |
1
⊢ (𝜑 → X𝑘 ∈
𝐴 𝐶 ∈
(Clsd‘(∏t‘𝐹))) |