theorem Th3: :: LEIBNIZ1:3
for Z being open Subset of REAL holds
( arctan is_differentiable_on Z & ( for r being Real st r in Z holds
(arctan `| Z) . r = 1 / (1 + (r ^2)) ) )