set R = the Approximation_Space;
set C = the carrier of the Approximation_Space;
set I = the InternalRel of the Approximation_Space;
set t = the Subset-Family of the carrier of the Approximation_Space;
set f = LAp the Approximation_Space;
set F = GenTop (LAp the Approximation_Space);
set EX = TopRelStr(# the carrier of the Approximation_Space, the InternalRel of the Approximation_Space,(GenTop (LAp the Approximation_Space)) #);
T1: GenTop (LAp the Approximation_Space) is topology-like by ImportTop;
TopRelStr(# the carrier of the Approximation_Space, the InternalRel of the Approximation_Space,(GenTop (LAp the Approximation_Space)) #) is with_equivalence ;
hence ex b1 being TopRelStr st
( b1 is TopSpace-like & b1 is with_equivalence & not b1 is empty ) by T1; :: thesis: verum