take {} M ; :: thesis: {} M is bounded
take 1 ; :: according to TBSP_1:def 7 :: thesis: ( not 1 <= 0 & ( for b1, b2 being Element of the carrier of M holds
( not b1 in {} M or not b2 in {} M or dist (b1,b2) <= 1 ) ) )

thus ( not 1 <= 0 & ( for b1, b2 being Element of the carrier of M holds
( not b1 in {} M or not b2 in {} M or dist (b1,b2) <= 1 ) ) ) ; :: thesis: verum