derivate4 

D[a Cos[w x],x]
-(a*w*Sin[w*x])
;[o]
-(a w Sin[w x])

D[m w^2 r,w]
2*m*r*w
;[o]
2 m r w

s=r Cos[w t]
D[s,w]
r*Cos[t*w]
;[o]
r Cos[t w]
-(r*t*Sin[t*w])
;[o]
-(r t Sin[t w])

v=-r w Sin[w t];
D[v,w]
-(r*t*w*Cos[t*w]) - r*Sin[t*w]
;[o]
-(r t w Cos[t w]) - r Sin[t w]

D[x Log[x],{x,2}]
x^(-1)
;[o]
1
-
x
y=Lox[x]+Sin[x]-Sqrt[x]

torna a inizio