/*
  I4 utilities.
*/
int i4_log_10 ( int i );
int i4_max ( int i1, int i2 );
int i4_min ( int i1, int i2 );
int i4_power ( int i, int j );
/*
  I4VEC utilities.
*/
void i4vec_print ( int n, int a[], char *title );
/*
  R8 Utilities.
*/
double r8_uniform_01 ( int *seed );
/*
  Real double precision General Banded.
*/
double r8gb_det ( int n, int ml, int mu, double a[], int pivot[] );
double *r8gb_dif2 ( int m, int n, int ml, int mu );
int r8gb_fa ( int n, int ml, int mu, double a[], int pivot[] );
double *r8gb_indicator ( int m, int n, int ml, int mu );
double *r8gb_ml ( int n, int ml, int mu, double a[], int pivot[], double x[], 
  int job );
double *r8gb_mtv ( int m, int n, int ml, int mu, double a[], double x[] );
double *r8gb_mu ( int n, int ml, int mu, double a[], int pivot[], double x[], 
  int job );
double *r8gb_mv ( int m, int n, int ml, int mu, double a[], double x[] );
int r8gb_nz_num ( int m, int n, int ml, int mu, double a[] );
void r8gb_print ( int m, int n, int ml, int mu, double a[], char *title );
void r8gb_print_some ( int m, int n, int ml, int mu, double a[], int ilo, 
  int jlo, int ihi, int jhi, char *title );
double *r8gb_random ( int m, int n, int ml, int mu, int *seed );
double *r8gb_sl ( int n, int ml, int mu, double a[], int pivot[], 
  double b[], int job );
void r8gb_to_r8s3 ( int m, int n, int ml, int mu, double a[], int nz_num, 
  int *isym, int row[], int col[], double b[] );
double *r8gb_to_r8ge ( int m, int n, int ml, int mu, double a[] );
double *r8gb_to_r8vec ( int m, int n, int ml, int mu, double *a );
int r8gb_trf ( int m, int n, int ml, int mu, double a[], int pivot[] );
double *r8gb_trs ( int n, int ml, int mu, int nrhs, char trans, double a[], 
  int pivot[], double b[] );
double *r8gb_zeros ( int m, int n, int ml, int mu );
/*
  Real double precision General.
*/
double r8ge_det ( int n, double a[], int pivot[] );
int r8ge_fa ( int n, double a[], int pivot[] );
void r8ge_print ( int m, int n, double a[], char *title );
void r8ge_print_some ( int m, int n, double a[], int ilo, int jlo, int ihi, 
  int jhi, char *title );
double *r8ge_random ( int m, int n, int *seed );
double *r8ge_to_r8gb ( int m, int n, int ml, int mu, double a[] );
double *r8ge_zeros_new ( int m, int n );
/*
  R8VEC Utilities.
*/
double *r8vec_indicator1_new ( int n );
void r8vec_print ( int n, double a[], char *title );
double *r8vec_zeros_new ( int n );
/*
  R8VEC2 Utilities.
*/
void r8vec2_print ( int n, double a1[], double a2[], char *title );