Chapter 3, Limits, Continuity, Derivatives

g[x_]:=x^3+Sin[x^2]

g'[x]

D[g[t],t]

Clear[x,t]

ff[t_]:=Piecewise[{{t^2*Sin[1/t],t<0},{t^2*Sin[1/t],t>0}},{0,t==0}]

ff[x]

Plot[ff[x],{x,-.1,.1}]

D[ff[t],t]

Solve[Abs[x^2 - 1] == 0.1, x]