void splint(double[],double[],double[],long,double,double*);