theorem :: FDIFF_8:15

for Z being open Subset of REAL st Z c= dom (cot * ln) holds
( cot * ln is_differentiable_on Z & ( for x being Real st x in Z holds
((cot * ln) `| Z) . x = - (1 / (x * ((sin . (ln . x)) ^2))) ) )