// Test du mode double tampon

clf();
f=gcf();  // = get("current_figure");
f.pixmap='on'; // mode double tampon

// bornes du graphique
a = gca();
a.data_bounds =[0 -6 ; 2*%pi 6];

// Attention au  '  en fin de ligne !!!
x = linspace(0, 2*%pi, 100)';  // = x=0:2*%pi/100:2*%pi;
plot2d(x, x.*sin(x));
e=gce();
e=e.children;  // le handle sur la courbe

show_pixmap();

// Boucle d'animation
for t=linspace(0,20,500)
  e.data(:,2)=x.*sin(x+t);
  show_pixmap();
end;

f.pixmap='off';
  