theorem :: FDIFF_7:45

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