let A be finite Tolerance_Space; :: thesis: for X being Subset of A
for x being Element of A holds (MemberFunc (X,A)) . x in [.0,1.]
let X be Subset of A; :: thesis: for x being Element of A holds (MemberFunc (X,A)) . x in [.0,1.]
let x be Element of A; :: thesis: (MemberFunc (X,A)) . x in [.0,1.]
( 0 <= (MemberFunc (X,A)) . x & (MemberFunc (X,A)) . x <= 1 ) by Th38;
hence (MemberFunc (X,A)) . x in [.0,1.] by XXREAL_1:1; :: thesis: verum