Metamath Proof Explorer


Theorem tmachlem-extpcover

Description: Product topology of tapes admits finite cover. (Contributed by Ender Ting, 28-Jul-2026)

Ref Expression
Hypotheses tmach.finalph ⊢ φ → U ∈ Fin
tmach.exindex ⊢ φ → I ∈ V
tmach.tapelist ⊢ φ → T = U I
tmach.scanmap ⊢ φ → S : T ⟶ 𝒫 I ∩ Fin
tmach.agreemap ⊢ φ → A = z ∈ T ⟼ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z
tmach.agreement ⊢ φ → ∀ z ∈ T ∀ y ∈ A ⁡ z S ⁡ y = S ⁡ z
Assertion tmachlem-extpcover ⊢ φ → ∃ a ∈ 𝒫 ran ⁡ A ∩ Fin ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ a

Proof

Step Hyp Ref Expression
1 tmach.finalph ⊢ φ → U ∈ Fin
2 tmach.exindex ⊢ φ → I ∈ V
3 tmach.tapelist ⊢ φ → T = U I
4 tmach.scanmap ⊢ φ → S : T ⟶ 𝒫 I ∩ Fin
5 tmach.agreemap ⊢ φ → A = z ∈ T ⟼ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z
6 tmach.agreement ⊢ φ → ∀ z ∈ T ∀ y ∈ A ⁡ z S ⁡ y = S ⁡ z
7 1 2 3 4 5 6 tmachlem-tpcomp ⊢ φ → ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U ∈ Comp
8 1 2 3 4 5 6 tmachlem-extapes ⊢ φ → T ∈ V
9 ssrab2 ⊢ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z ⊆ T
10 9 a1i ⊢ φ → y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z ⊆ T
11 8 10 ssexd ⊢ φ → y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z ∈ V
12 11 ralrimivw ⊢ φ → ∀ z ∈ T y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z ∈ V
13 nfcv ⊢ Ⅎ _ z T
14 13 mptfnf ⊢ ∀ z ∈ T y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z ∈ V ↔ z ∈ T ⟼ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z Fn T
15 12 14 sylib ⊢ φ → z ∈ T ⟼ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z Fn T
16 5 fneq1d ⊢ φ → A Fn T ↔ z ∈ T ⟼ y ∈ T | y ↾ S ⁡ z = z ↾ S ⁡ z Fn T
17 15 16 mpbird ⊢ φ → A Fn T
18 1 2 3 4 5 6 tmachlem-tpopen2 ⊢ φ ∧ b ∈ T → A ⁡ b ∈ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U
19 18 ralrimiva ⊢ φ → ∀ b ∈ T A ⁡ b ∈ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U
20 fnfvrnss ⊢ A Fn T ∧ ∀ b ∈ T A ⁡ b ∈ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U → ran ⁡ A ⊆ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U
21 17 19 20 syl2anc ⊢ φ → ran ⁡ A ⊆ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U
22 1 2 3 4 5 6 tmachlem-tpbase ⊢ φ → ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = T
23 1 2 3 4 5 6 tmachlem-exlargecover ⊢ φ → ⋃ ran ⁡ A = T
24 22 23 eqtr4d ⊢ φ → ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ ran ⁡ A
25 eqid ⊢ ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U
26 25 cmpcov ⊢ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U ∈ Comp ∧ ran ⁡ A ⊆ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U ∧ ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ ran ⁡ A → ∃ a ∈ 𝒫 ran ⁡ A ∩ Fin ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ a
27 7 21 24 26 syl3anc ⊢ φ → ∃ a ∈ 𝒫 ran ⁡ A ∩ Fin ⋃ ∏ 𝑡 ⁡ i ∈ I ⟼ 𝒫 U = ⋃ a