/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/

/* [wxMaxima: input   start ] */
x0:1;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=x^2-2*x;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x0:2;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x)=x^4-8*x^3+20*x^2-16*x;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=x^4-8*x^3+20*x^2-16*x;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x0:-1;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=(x*(x+2))/(x+1)^4;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x0:1;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=2^x-2^(2-x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x0:-0.5;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
y0:0;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
y0-f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=2*x^3+3*x^2+x;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
y0-f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h)-y0;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x0:2;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
y0:0;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x):=(x-2)/(x^2-4*x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
y0-f(x0-h);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f(x0+h)-y0;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
ratsimp(%);
/* [wxMaxima: input   end   ] */

/* Maxima can't load/batch files which end with a comment! */
"Created with wxMaxima"$