/* @(#)proto_mutil.h	17.1.1.1 (ESO-IPG) 01/25/02 17:51:50 */
/* @(#)proto_mutil.h	1.1 (ESO-IPG) 2/11/94 10:14:52 */
/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
.COPYRIGHT   (c) 1993 European Southern Observatory
.IDENTifer   proto_mutil.h
.AUTHOR      Otmar Stahl 
.KEYWORDS    prototypes
.LANGUAGE    C & ANSI-C
.PURPOSE     prototypes for misc routines used in FEROS
.ENVIRONment none
.VERSION     1.0    6-APR-1994 Otmar Stahl 
------------------------------------------------------------*/
extern void lfit
(
#ifdef __STDC__
 double [], double [], int, double [], int, 
 void (*) (double, double *, int)
#endif
 );

extern void gaussj
(
#ifdef __STDC__
 double **, int, double **, int
#endif
);

extern void polint
(
#ifdef __STDC__
 float [], float [], int, float, float *, float *
#endif
);

extern float eval_fpoly
(
#ifdef __STDC__
 float, float *, int
#endif
);

extern double eval_dpoly
(
#ifdef __STDC__
 double, double *, int
#endif
);

extern void dpoly
(
#ifdef __STDC__
 double, double [], int
#endif
);

extern float median
(
#ifdef __STDC__
 float [], int
#endif
 );

extern void piksrt
(
#ifdef __STDC__
 int, float []
#endif
);

extern void dsvdcmp
(
#ifdef __STDC__
     double **, int, int, double [], double **
#endif
);

extern void dsvbksb
(
#ifdef __STDC__
 double **, double [], double **, int, int, double [], double []
#endif
);

extern double dpythag
(
#ifdef __STDC__
 double, double
#endif
);

extern float select_pos
(
#ifdef __STDC__
 int, int, float []
#endif
);

extern float pik_median
(
#ifdef __STDC__
 int, float []
#endif
);

extern float heap_median
(
#ifdef __STDC__
 int, float []
#endif
);

extern void fit_poly
(
#ifdef __STDC__
 float [], float [], int, float [], float[], int, int, double []
#endif
);

extern void spline
(
#ifdef __STDC__
 float [], float [], int, float, float, float [] 
#endif
);

extern void splint
(
#ifdef __STDC__
 float [], float [], float [], int, float, float * 
#endif
);

extern int splie2
(
#ifdef __STDC__
 float x1a[], float x2a[], float **ya, int m, 
 int n, float **y2a
#endif
 );

extern int splin2
(
#ifdef __STDC__
 float x1a[], float x2a[], float **ya, float **y2a, 
 int m, int n, int num, float x1[], float x2, float y[]
#endif
 );

extern int splin3
(
#ifdef __STDC__
 float x1a[], float x2a[], float **ya, float **y2a, 
 int m, int n, int num, float x1[], float x2, float y[]
#endif
 );

extern void indexx
(
#ifdef __STDC__
 unsigned long n, float arr[], unsigned long indx[]
#endif
 );

extern void sort3
(
#ifdef __STDC__
 unsigned long n, float ra[], float rb[], float rc[]
#endif
 );

extern void sort2
(
#ifdef __STDC__
 unsigned long n, float arr[], float brr[]
#endif
 );

extern void fit_poly_weight
(
#ifdef __STDC__
 float [], float [], float [], int, float *, float *, int, int, double *
#endif
);