1
/* @(#)proto_mos.h 10.1.1.1 (ESO-IPG) 8/7/95 17:22:41 */
2
/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
3
.COPYRIGHT (c) 1993 European Southern Observatory
4
.IDENTifer proto_spec.h
5
.AUTHOR C. Guirao IPG-ESO Garching
6
.AUTHOR T. Szeifert LSW Heidelberg
9
.PURPOSE prototypes for all SPEC routines,
10
2D-tool included by TS-1996
14
.VERSION 1.0 22-Oct-1993 Creation by CG.
15
------------------------------------------------------------*/
20
extern void eval_disp(
22
double x[], double l[], int n
26
extern void finishdisp(
34
char name[], char mode[], int start
38
extern double mos_fit_disp(
40
int *ndata, int *deg, double x[], double l[], double *chi
44
extern void mos_initdisp(
46
char name[], char mode[], int start
50
extern void mos_savedisp(
56
extern void mos_writedisp(
58
int line, int slit, int ypix,double y,int numrow, double rms
62
extern void printdisp(
68
extern double readdisp(
76
int deg, double coefs[]
80
extern void setrefdeg(
88
int line, int ypix, double y, double pixel, double rms
94
double x[], double y[], double sig[], int ndata, double a[],
95
int ma, int lista[], int mfit, double **covar, double *chisq,
96
void (*funcs)(double, double *, int)
103
double x, double pl[], int nl
109
double x, double p[], int np
113
/* These are the 2D-tools: */
116
extern void setrefdeg_2D(int deg);
118
extern void setrefdeg_2D();
122
extern void setdisp_2D(int deg, double coefs[]);
124
extern void setdisp_2D();
128
extern double mos_fit_disp_2D(int *ndata, int *deg, double x[], double y[],
129
double l[], double *chi);
131
extern double mos_fit_disp_2D();
135
extern void mos_eval_disp_2D (double x[], double y[], double l[], int n);
137
extern void mos_eval_disp_2D ();
141
void mos_writedisp_2D(int line, int slit, int ypix,
142
double y, int numrow, double rms);
144
void mos_writedisp_2D();
149
void fleg_2D( double x1, double x2, double pl[], int nl);
155
void fpoly_2D( double x1, double x2, double pl[], int nl);
161
void fcheb_2D( double x1, double x2, double pl[], int nl);
167
void lfit2_2D(double x1[], double x2[], double y[], double sig[], int ndata,
168
double a[], int ma, int lista[], int mfit, double **covar,
169
double *chisq, void (*funcs)(double, double, double *, int));
177
int match(int verif, double linid[], double linwav[],
178
double liny[], double lindif[], int nbrow,
179
double lcat[], int nbrowcat, double alpha,
180
double *stdres, double dnull, int reject[]);