theorem :: FDIFF_10:17
for Z being open Subset of REAL st Z c= dom (ln (#) cos) holds
( ln (#) cos is_differentiable_on Z & ( for x being Real st x in Z holds
((ln (#) cos) `| Z) . x = ((cos . x) / x) - ((ln . x) * (sin . x)) ) )