diff(x^7-3*x^5+2*x^4+10*x^3-17*x^2+2*x-1,x);

diff(2/x-exp(x)+log(x)+sqrt(x)+1/sqrt(x),x);

diff(6*x^(2/3)-log(x)/log(3)+2^x-cos(x)/4+exp(3),x);

diff(exp(x)*sin(x)+(x^2-2*x+2)*log(x)+2^x*sqrt(x),x);

diff(log(x)/x+exp(x)/cos(x)+(x^2+x+1)/(exp(x)+sqrt(x)),x);

diff(x^2*sqrt(2*x+12)+sin(x^2+2*x+3)+log(1-x^2),x);

diff(log((1+sqrt(sin(x)))/(1-sqrt(sin(x))))+x*exp(x)/(1+exp(1/x))+(x+sqrt(x))^(1/3),x);

f(x):=2*log(x)+1;

diff(f(x),x);

a: %, x=3;

l(x):=a*(x-3)+f(3);

wxplot2d([f(x), l(x)], [x,1,5])$