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

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

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

/* [wxMaxima: input   start ] */
plot2d([exp(-x^2)], [x,-5,5],
 [plot_format, gnuplot])$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
diff(exp(-x^2),x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([%o4], [x,-5,5],[plot_format, gnuplot])$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
diff(exp(-x^2),x,2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([%o6], [x,-5,5],[plot_format, gnuplot])$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
taylor(exp(-x^2),x,2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
taylor(exp(-x^2),x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
taylor(exp(-x^2), x, 0, 4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(exp(-x^2),x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(exp(-x^2),x,[-inf,inf]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%, x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o10, x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o10, x, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o02, x, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o2, x, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o2, x, 0, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o2, x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
taylor(exp(-x^2), x, 0, 8);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(%o20, x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x)], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,100)], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2))], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x)], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,100)], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,0,100)], x, minf, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,0,100)], x, 0, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,0,200)], x, 0, inf);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate([taylor(exp(-x^2),x,0,200)], x, 0, 1000);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
approx(x);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,200)], x, 0, 1000));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,200)], x, -1000, 1000));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -1000, 1000));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100)-integral(exp(-x^2),x,
 -inf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100)-integral(exp(-x^2),x,
 -minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100)-integrate(exp(-x^2),x,
 -minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100)-integrate(exp(-x^2),x,0,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -100, 100)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -10, 10)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate([taylor(exp(-x^2),x,0,220)], x, -10, 10)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate([taylor(exp(-x^2),x,0,220)], x, -1000, 1000)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,220)], x, -1000, 1000)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,10)], x, -1000, 1000)-integrate(exp(-x^2),x,minf,inf));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,10)], x, -1000, 1000));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,10)], x, -10, 10));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate([taylor(exp(-x^2),x,0,100)], x, -10, 10));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
taylor(exp(-x^2),x,0,100);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,100),x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,100),x,0,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bloat(integrate(taylor(exp(-x^2),x,0,100),x,0,1));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(taylor(exp(-x^2),x,0,100),x,0,1));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(taylor(exp(-x^2),x,0,100),x,0,3));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(taylor(exp(-x^2),x,0,100),x,0,10));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(taylor(exp(-x^2),x,0,1000),x,0,10));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,10))], [x,-5,5],
 [plot_format, gnuplot])$
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,10)))], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,10)), [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,10))], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,10)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,1000),x,0,x)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,100),x,0,x)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,100),x,0,x)], [x,0,1], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x)], [x,0,1], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x)], [x,0,2], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x)], [x,0,3], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([integrate(taylor(exp(-x^2),x,0,200),x,0,x) -integrate(exp(-x^2),x,0,x) ],
  [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(exp(-x^2),x,0,5);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
float(%), numer;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(exp(-x^2),x,0,5));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate(exp(-x^2),x,0,5));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(exp(-x^2),x,0,5));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(exp(-x^2),x,0,5),16);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
tofloat(integrate(exp(-x^2),x,0,5),16);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
if numer#false then numer:false else numer:true;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
bfloat(integrate(exp(-x^2),x,0,5));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,200),x,0,4) -integrate(exp(-x^2),x,0,4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,200),x,0,5) -integrate(exp(-x^2),x,0,5);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
if numer#false then numer:false else numer:true;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,200),x,0,5) -integrate(exp(-x^2),x,0,5);
/* [wxMaxima: input   end   ] */

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

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

/* [wxMaxima: input   start ] */
float(integrate(taylor(exp(-x^2),x,0,200),x,0,4) -integrate(exp(-x^2),x,0,4));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate(taylor(exp(-x^2),x,0,200),x,0,1) -integrate(exp(-x^2),x,0,1));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
fpprec : 20;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate(taylor(exp(-x^2),x,0,200),x,0,1) -integrate(exp(-x^2),x,0,1));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate(taylor(exp(-x^2),x,0,200),x,0,4) -integrate(exp(-x^2),x,0,4));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
float(integrate(taylor(exp(-x^2),x,0,200)-exp(-x^2),x,0,4));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,200)-exp(-x^2),x,0,4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
if numer#false then numer:false else numer:true;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
if numer#false then numer:false else numer:true;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
integrate(taylor(exp(-x^2),x,0,20)-exp(-x^2),x,0,4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,200)-exp(-2^x)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,20)-exp(-2^x)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,200)-exp(-2^x)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,50)-exp(-2^x)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,100)-exp(-2^x)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,150)-exp(-2^x)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,150)-exp(-x^2)], [x,0,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,200)-exp(-x^2)], [x,0,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,20)-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,10)-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,1)-exp(-x^2)], [x,0,1], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d()-exp(-x^2)], [x,0,1], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([-exp(-x^2)], [x,0,1], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([(taylor(exp(-x^2),x,0,10))-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,10)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,100)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taylor(exp(-x^2),x,0,200)], [x,-4,4], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
maxtayorder:false;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([(taylor(exp(-x^2),x,0,10))-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
maxtayorder:true;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([(taylor(exp(-x^2),x,0,10))-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taytorat((taylor(exp(-x^2),x,0,10)))-exp(-x^2)], [x,-5,5], [plot_format, gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taytorat((taylor(exp(-x^2),x,0,100)))-exp(-x^2)], [x,-5,5], [plot_format,
  gnuplot]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
plot2d([taytorat((taylor(exp(-x^2),x,0,200)))-exp(-x^2)], [x,-4,4], [plot_format,
  gnuplot]);
/* [wxMaxima: input   end   ] */

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