double dcsevl(double,double[],long);
double de1(double);
double dei(double);
void derm1(STRING,long,long,STRING,STRING,double,byte);
void derv1(STRING,double,byte);
void dinits(double[],long,double,long*);
void ermsg(STRING,long,long,STRING,byte);