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