let n be Element of NAT ; :: thesis: for A being Subset of (TOP-REAL n) holds UBD A c= A `
let A be Subset of (TOP-REAL n); :: thesis: UBD A c= A `
reconsider D = UBD A as Subset of ((TOP-REAL n) | (A ` )) by Th25;
D c= the carrier of ((TOP-REAL n) | (A ` )) ;
hence UBD A c= A ` by PRE_TOPC:29; :: thesis: verum