void smpdrv(float[],long,float[],long*);
void smpint(float[],long,float[],long*);
float smpval(float[],long,float);