theorem :: FDIFF_9:14
for Z being open Subset of REAL st Z c= dom (sec * ln) holds
( sec * ln is_differentiable_on Z & ( for x being Real st x in Z holds
((sec * ln) `| Z) . x = (sin . (ln . x)) / (x * ((cos . (ln . x)) ^2)) ) )