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