theorem Th10: :: TOPREALB:10
for r being Real holds Tcircle ((0. (TOP-REAL 2)),r) is SubSpace of Trectangle ((- r),r,(- r),r)