theorem :: FDIFF_9:35

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