let X be ComplexUnitarySpace; :: thesis: for y, x, w being Point of X
for r being Real st y in Ball x,r holds
y - w in Ball (x - w),r
let y, x, w be Point of X; :: thesis: for r being Real st y in Ball x,r holds
y - w in Ball (x - w),r
let r be Real; :: thesis: ( y in Ball x,r implies y - w in Ball (x - w),r )
assume
y in Ball x,r
; :: thesis: y - w in Ball (x - w),r
then A1:
dist x,y < r
by Th41;
dist (x - w),(y - w) = dist x,y
by CSSPACE:61;
hence
y - w in Ball (x - w),r
by A1, Th41; :: thesis: verum