void bessel_jx_values ( int *n_data, double *nu, double *x, double *fx );
void rjbesl ( double x, double alpha, int nb, double b[], int *ncalc );
void timestamp ( );