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