Metamath Proof Explorer


Theorem otpsbas

Description: The base set of a topological ordered space. (Contributed by Mario Carneiro, 12-Nov-2015) (Revised by AV, 9-Sep-2021)

Ref Expression
Hypothesis otpsstr.w 𝐾 = { ⟨ ( Base ‘ ndx ) , 𝐵 ⟩ , ⟨ ( TopSet ‘ ndx ) , 𝐽 ⟩ , ⟨ ( le ‘ ndx ) , ⟩ }
Assertion otpsbas ( 𝐵𝑉𝐵 = ( Base ‘ 𝐾 ) )

Proof

Step Hyp Ref Expression
1 otpsstr.w 𝐾 = { ⟨ ( Base ‘ ndx ) , 𝐵 ⟩ , ⟨ ( TopSet ‘ ndx ) , 𝐽 ⟩ , ⟨ ( le ‘ ndx ) , ⟩ }
2 1 otpsstr 𝐾 Struct ⟨ 1 , 1 0 ⟩
3 baseid Base = Slot ( Base ‘ ndx )
4 snsstp1 { ⟨ ( Base ‘ ndx ) , 𝐵 ⟩ } ⊆ { ⟨ ( Base ‘ ndx ) , 𝐵 ⟩ , ⟨ ( TopSet ‘ ndx ) , 𝐽 ⟩ , ⟨ ( le ‘ ndx ) , ⟩ }
5 4 1 sseqtrri { ⟨ ( Base ‘ ndx ) , 𝐵 ⟩ } ⊆ 𝐾
6 2 3 5 strfv ( 𝐵𝑉𝐵 = ( Base ‘ 𝐾 ) )