theorem :: FDIFF_10:10

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