Proof of Theorem kgencmp2
Step | Hyp | Ref
| Expression |
1 | | kgencmp 22604 |
. . 3
⊢ ((𝐽 ∈ Top ∧ (𝐽 ↾t 𝐾) ∈ Comp) → (𝐽 ↾t 𝐾) = ((𝑘Gen‘𝐽) ↾t 𝐾)) |
2 | | simpr 484 |
. . 3
⊢ ((𝐽 ∈ Top ∧ (𝐽 ↾t 𝐾) ∈ Comp) → (𝐽 ↾t 𝐾) ∈ Comp) |
3 | 1, 2 | eqeltrrd 2840 |
. 2
⊢ ((𝐽 ∈ Top ∧ (𝐽 ↾t 𝐾) ∈ Comp) →
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) |
4 | | cmptop 22454 |
. . . . . . 7
⊢
(((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Comp →
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Top) |
5 | | restrcl 22216 |
. . . . . . . 8
⊢
(((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Top →
((𝑘Gen‘𝐽)
∈ V ∧ 𝐾 ∈
V)) |
6 | 5 | simprd 495 |
. . . . . . 7
⊢
(((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Top → 𝐾 ∈ V) |
7 | 4, 6 | syl 17 |
. . . . . 6
⊢
(((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Comp → 𝐾 ∈ V) |
8 | | resttop 22219 |
. . . . . 6
⊢ ((𝐽 ∈ Top ∧ 𝐾 ∈ V) → (𝐽 ↾t 𝐾) ∈ Top) |
9 | 7, 8 | sylan2 592 |
. . . . 5
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐽
↾t 𝐾)
∈ Top) |
10 | | toptopon2 21975 |
. . . . 5
⊢ ((𝐽 ↾t 𝐾) ∈ Top ↔ (𝐽 ↾t 𝐾) ∈ (TopOn‘∪ (𝐽
↾t 𝐾))) |
11 | 9, 10 | sylib 217 |
. . . 4
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐽
↾t 𝐾)
∈ (TopOn‘∪ (𝐽 ↾t 𝐾))) |
12 | | eqid 2738 |
. . . . . . . . 9
⊢ ∪ 𝐽 =
∪ 𝐽 |
13 | 12 | kgenuni 22598 |
. . . . . . . 8
⊢ (𝐽 ∈ Top → ∪ 𝐽 =
∪ (𝑘Gen‘𝐽)) |
14 | 13 | adantr 480 |
. . . . . . 7
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → ∪ 𝐽 = ∪
(𝑘Gen‘𝐽)) |
15 | 14 | ineq2d 4143 |
. . . . . 6
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐾
∩ ∪ 𝐽) = (𝐾 ∩ ∪
(𝑘Gen‘𝐽))) |
16 | 12 | restuni2 22226 |
. . . . . . 7
⊢ ((𝐽 ∈ Top ∧ 𝐾 ∈ V) → (𝐾 ∩ ∪ 𝐽) =
∪ (𝐽 ↾t 𝐾)) |
17 | 7, 16 | sylan2 592 |
. . . . . 6
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐾
∩ ∪ 𝐽) = ∪ (𝐽 ↾t 𝐾)) |
18 | | kgenftop 22599 |
. . . . . . 7
⊢ (𝐽 ∈ Top →
(𝑘Gen‘𝐽)
∈ Top) |
19 | | eqid 2738 |
. . . . . . . 8
⊢ ∪ (𝑘Gen‘𝐽) = ∪
(𝑘Gen‘𝐽) |
20 | 19 | restuni2 22226 |
. . . . . . 7
⊢
(((𝑘Gen‘𝐽) ∈ Top ∧ 𝐾 ∈ V) → (𝐾 ∩ ∪
(𝑘Gen‘𝐽)) =
∪ ((𝑘Gen‘𝐽) ↾t 𝐾)) |
21 | 18, 7, 20 | syl2an 595 |
. . . . . 6
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐾
∩ ∪ (𝑘Gen‘𝐽)) = ∪
((𝑘Gen‘𝐽)
↾t 𝐾)) |
22 | 15, 17, 21 | 3eqtr3d 2786 |
. . . . 5
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → ∪ (𝐽 ↾t 𝐾) = ∪
((𝑘Gen‘𝐽)
↾t 𝐾)) |
23 | 22 | fveq2d 6760 |
. . . 4
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (TopOn‘∪ (𝐽 ↾t 𝐾)) = (TopOn‘∪ ((𝑘Gen‘𝐽) ↾t 𝐾))) |
24 | 11, 23 | eleqtrd 2841 |
. . 3
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐽
↾t 𝐾)
∈ (TopOn‘∪ ((𝑘Gen‘𝐽) ↾t 𝐾))) |
25 | | simpr 484 |
. . 3
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → ((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Comp) |
26 | | kgenss 22602 |
. . . . 5
⊢ (𝐽 ∈ Top → 𝐽 ⊆
(𝑘Gen‘𝐽)) |
27 | 26 | adantr 480 |
. . . 4
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → 𝐽
⊆ (𝑘Gen‘𝐽)) |
28 | | ssrest 22235 |
. . . 4
⊢
(((𝑘Gen‘𝐽) ∈ Top ∧ 𝐽 ⊆ (𝑘Gen‘𝐽)) → (𝐽 ↾t 𝐾) ⊆ ((𝑘Gen‘𝐽) ↾t 𝐾)) |
29 | 18, 27, 28 | syl2an2r 681 |
. . 3
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐽
↾t 𝐾)
⊆ ((𝑘Gen‘𝐽) ↾t 𝐾)) |
30 | | eqid 2738 |
. . . 4
⊢ ∪ ((𝑘Gen‘𝐽) ↾t 𝐾) = ∪
((𝑘Gen‘𝐽)
↾t 𝐾) |
31 | 30 | sscmp 22464 |
. . 3
⊢ (((𝐽 ↾t 𝐾) ∈ (TopOn‘∪ ((𝑘Gen‘𝐽) ↾t 𝐾)) ∧ ((𝑘Gen‘𝐽) ↾t 𝐾) ∈ Comp ∧ (𝐽 ↾t 𝐾) ⊆
((𝑘Gen‘𝐽)
↾t 𝐾))
→ (𝐽
↾t 𝐾)
∈ Comp) |
32 | 24, 25, 29, 31 | syl3anc 1369 |
. 2
⊢ ((𝐽 ∈ Top ∧
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp) → (𝐽
↾t 𝐾)
∈ Comp) |
33 | 3, 32 | impbida 797 |
1
⊢ (𝐽 ∈ Top → ((𝐽 ↾t 𝐾) ∈ Comp ↔
((𝑘Gen‘𝐽)
↾t 𝐾)
∈ Comp)) |