void disk_rule ( int nr, int nt, double xc, double yc, double rc, double w[], 
  double x[], double y[] );
double disk01_monomial_integral ( int e[2] );
void disk01_rule ( int nr, int nt, double w[], double r[], double t[] );
void imtqlx ( int n, double d[], double e[], double z[] );
void legendre_ek_compute ( int n, double x[], double w[] );
double r8_sign ( double x );
void r8vec_print ( int n, double a[], string title );
void timestamp ( );