// Standard cubic spline interpolation with clamped conditions f'(a), f'(b)
//         splinetype clamped(real slopea, real slopeb)

import graph;

size(10cm);

real[] x={0,2,4}, y={0,0,0};
path p[] = {graph(x,y,Hermite(clamped(5,5))),
            graph(x,y,Hermite(clamped(2,0))),
            graph(x,y,Hermite(clamped(-1,1)))};
int np = p.length;

pen coul[]={red,blue,green}; 
coul.cyclic=true; // pour ne pas avoir toujours à adapter le nombre
                  // de couleurs au nombre de chemins dans p, quand
                  // on effectue des tests.
for(int k=0; k<np; ++k){
  pen coulc = coul[k]+dashed,
      coult = .8*coul[k];
  draw(p[k],coulc);
  draw(point(p[k],0)--point(p[k],0)+dir(p[k],0),coult,Arrow());
  draw(relpoint(p[k],1)--relpoint(p[k],1)+reldir(p[k],1),coult,Arrow());
}
dot(p[0],2bp+blue);