// guide graph(picture pic=currentpicture, 
//             pair[] z,
//             interpolate join=operator --);
//
// Returns a graph using the scaling information for picture pic of the 
// elements of the array z, using the given interpolation type.

import graph;
size(7.5cm,0);

pair[] z={(-3,4),(-2,3),(0,-2),(2,4),(3,3)};
                              
guide courbe1=graph(z,join=operator ..), // tension = 1
      courbe2=graph(z,join=operator ..(operator tension(2,true)));

dot(z,3bp+blue);
draw(courbe1,red);
draw(courbe2,.7green+dashed);

xaxis("$x$",Ticks("%",end=false),Arrow());
yaxis("$y$",Ticks("%",end=false),Arrow());