reconsider A' = A, B' = B as Subset of (TopSpaceMetr (Euclid n)) ;
take min_dist_min A',B' ; :: thesis: ex A', B' being Subset of (TopSpaceMetr (Euclid n)) st
( A = A' & B = B' & min_dist_min A',B' = min_dist_min A',B' )

take A' ; :: thesis: ex B' being Subset of (TopSpaceMetr (Euclid n)) st
( A = A' & B = B' & min_dist_min A',B' = min_dist_min A',B' )

take B' ; :: thesis: ( A = A' & B = B' & min_dist_min A',B' = min_dist_min A',B' )
thus ( A = A' & B = B' & min_dist_min A',B' = min_dist_min A',B' ) ; :: thesis: verum