for r being Real st - 1 <= r & r <= 1 & arctan r = 0 holds
r = 0 by Th41, Th51;