November 1997 Presentation Topic (continued)

The Maple Program

with(plots):
  animate( [x-2*0.1*t*x/sqrt(1+4*x^2), x^2 +0.1*t/sqrt(1+4*x^2),x=-1..1],
  t=0..10,frames=100, color=red);
 
with(plots):
  animate( [x-2*0.1*t*x/sqrt(1+4*x^2), x^2 +0.1*t/sqrt(1+4*x^2),x=0..1],
  t=0..10,frames=100,color=red);

with(plots):
  plot3d( [x-2*0.5*t*x/sqrt(1+4*x^2),2*t, x^2 +0.5*t/sqrt(1+4*x^2)],
  x=-10..10, t=0..15);

with(plots):
  animate( [x-0.12*t*cos(x)/sqrt(1+(cos(x))^2),
            sin(x) +0.12*t/sqrt(1+(cos(x))^2), x=-10..10],
  t=0..30,frames=100, color=red);

Go backward to Solutions to the problems
Go up to Introduction and Contents
Go forward to References
Switch to text-only version (no graphics)
Access printed version in PostScript format (requires PostScript printer)
Go to SIMMER Home Page
Go to The Fields Institute Home Page
Go to University of Toronto Mathematics Network Home Page