void dbespq(double,double,double*,double*);
void dbesyn(double,double,long,double[]);
void derv1(STRING,double,byte);
double dgamma(double);
double dlgama(double);
void ermor(STRING,byte);
void ermsg(STRING,long,long,STRING,byte);
void ierv1(STRING,long,byte);