Metamath Proof Explorer


Theorem tmachlem-tpitem

Description: Topology lemma. (Contributed by Ender Ting, 27-Jul-2026)

Ref Expression
Hypotheses tmach.finalph ( 𝜑𝑈 ∈ Fin )
tmach.exindex ( 𝜑𝐼 ∈ V )
tmach.tapelist ( 𝜑𝑇 = ( 𝑈m 𝐼 ) )
tmach.scanmap ( 𝜑𝑆 : 𝑇 ⟶ ( 𝒫 𝐼 ∩ Fin ) )
tmach.agreemap ( 𝜑𝐴 = ( 𝑧𝑇 ↦ { 𝑦𝑇 ∣ ( 𝑦 ↾ ( 𝑆𝑧 ) ) = ( 𝑧 ↾ ( 𝑆𝑧 ) ) } ) )
tmach.agreement ( 𝜑 → ∀ 𝑧𝑇𝑦 ∈ ( 𝐴𝑧 ) ( 𝑆𝑦 ) = ( 𝑆𝑧 ) )
Assertion tmachlem-tpitem ( ( 𝜑𝑎𝐼 ) → ( ( 𝑖𝐼 ↦ 𝒫 𝑈 ) ‘ 𝑎 ) = 𝒫 𝑈 )

Proof

Step Hyp Ref Expression
1 tmach.finalph ( 𝜑𝑈 ∈ Fin )
2 tmach.exindex ( 𝜑𝐼 ∈ V )
3 tmach.tapelist ( 𝜑𝑇 = ( 𝑈m 𝐼 ) )
4 tmach.scanmap ( 𝜑𝑆 : 𝑇 ⟶ ( 𝒫 𝐼 ∩ Fin ) )
5 tmach.agreemap ( 𝜑𝐴 = ( 𝑧𝑇 ↦ { 𝑦𝑇 ∣ ( 𝑦 ↾ ( 𝑆𝑧 ) ) = ( 𝑧 ↾ ( 𝑆𝑧 ) ) } ) )
6 tmach.agreement ( 𝜑 → ∀ 𝑧𝑇𝑦 ∈ ( 𝐴𝑧 ) ( 𝑆𝑦 ) = ( 𝑆𝑧 ) )
7 eqid ( 𝑖𝐼 ↦ 𝒫 𝑈 ) = ( 𝑖𝐼 ↦ 𝒫 𝑈 )
8 eqidd ( 𝑖 = 𝑎 → 𝒫 𝑈 = 𝒫 𝑈 )
9 simpr ( ( 𝜑𝑎𝐼 ) → 𝑎𝐼 )
10 1 pwexd ( 𝜑 → 𝒫 𝑈 ∈ V )
11 10 adantr ( ( 𝜑𝑎𝐼 ) → 𝒫 𝑈 ∈ V )
12 7 8 9 11 fvmptd3 ( ( 𝜑𝑎𝐼 ) → ( ( 𝑖𝐼 ↦ 𝒫 𝑈 ) ‘ 𝑎 ) = 𝒫 𝑈 )