escont(n)

function ok = escont(n)

  g = inline('(x.*x-2.*y.*y).*exp(-2.*x.*x-y.*y)');
  [x,y]=meshgrid(linspace(-2,2,50));
  switch (n)
    case 1 
      figure(n);
      contour(x,y,g(x,y));
      title('Lignes de niveau (contour)', 'fontsize',20);
      print -deps2 contour.eps
    case 2 
      figure(n);
      contour3(x,y,g(x,y));
      title('Lignes de niveau 3D (contour3)', 'fontsize',20);
      print -deps2 contour3.eps
    case 3
      figure(n);
      [cs, h] = contour(x,y,g(x,y));
      clabel(cs,h);
      title('Lignes de niveau avec label(clabel)', 'fontsize',20);
      print -deps2 clabel.eps
    case 4
      figure(n);
      z = g(x,y);
      contour(x,y,z);
      hold on
      [p,q]=gradient(z,.1,.1);
      quiver(x,y,p,q);
      title('champ de vitesses (quiver)', 'fontsize',20);
      print -deps2 quiver.eps
    case 5
      figure(n);
      mesh(x,y,g(x,y));
      title('grille surfacique (mesh)', 'fontsize',20);
      print -deps2 mesh.eps
    case 6
      figure(n);
      meshc(x,y,g(x,y));
      title('grille + contour (meshc)', 'fontsize',20);
      print -deps2 meshc.eps
    case 7
      figure(n);
      surf(x,y,g(x,y));
      colormap(gray);
      shading interp
      title('surface ombre (surf)', 'fontsize',20);
      print -deps2 surf.eps
    case 8
      figure(n);
      waterfall(x,y,g(x,y));
      title('chute d''eau (waterfall)', 'fontsize',20);
      print -deps2 waterfall.eps
  end;