00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028 #ifndef IRPLIB_WAVECAL_H
00029 #define IRPLIB_WAVECAL_H
00030
00031
00032
00033
00034
00035 #include <cpl.h>
00036
00037
00038
00039
00040
00041
00042 #define IRPLIB_WAVECAL_MODEL_COEFFS 4
00043
00044 #define IRPLIB_WAVECAL_MODEL_COLS 9
00045
00046 #define IRPLIB_WAVECAL_LAB_MODE "SpecMode"
00047 #define IRPLIB_WAVECAL_LAB_RESID "Residual"
00048 #define IRPLIB_WAVECAL_LAB_ORDER "Fit_Order"
00049 #define IRPLIB_WAVECAL_LAB_XMIN "XMin"
00050 #define IRPLIB_WAVECAL_LAB_XMAX "XMax"
00051 #define IRPLIB_WAVECAL_LAB_C1 "C_1"
00052 #define IRPLIB_WAVECAL_LAB_C2 "C_2"
00053 #define IRPLIB_WAVECAL_LAB_C3 "C_3"
00054 #define IRPLIB_WAVECAL_LAB_C4 "C_4"
00055
00056 #define IRPLIB_WAVECAL_LAB_WAVE "WAVELENGTH"
00057 #define IRPLIB_WAVECAL_LAB_INTENS "INTENSITY"
00058
00059
00060
00061
00062
00063
00064
00065 typedef struct {
00066 unsigned cost;
00067 unsigned xcost;
00068 unsigned ulines;
00069
00070 } irplib_base_spectrum_model;
00071
00072 typedef struct {
00073 unsigned cost;
00074 unsigned xcost;
00075 unsigned ulines;
00076
00077 double wslit;
00078 double wfwhm;
00079 double xtrunc;
00080
00081 const cpl_bivector * lines;
00082
00083 cpl_vector * linepix;
00084
00085 cpl_vector * erftmp;
00086
00087 } irplib_line_spectrum_model;
00088
00089
00090
00091
00092
00093 cpl_error_code
00094 irplib_polynomial_find_1d_from_correlation_all(cpl_polynomial *,
00095 int,
00096 const cpl_vector *,
00097 int, int,
00098 irplib_base_spectrum_model *,
00099 cpl_error_code (*)
00100 (cpl_vector *,
00101 const cpl_polynomial *,
00102 irplib_base_spectrum_model *,
00103 int),
00104 double,
00105 double,
00106 int,
00107 int,
00108 int,
00109 int,
00110 cpl_boolean,
00111 double *);
00112
00113 cpl_error_code
00114 irplib_bivector_find_shift_from_correlation(cpl_bivector *,
00115 const cpl_polynomial *,
00116 const cpl_vector *,
00117 irplib_base_spectrum_model *,
00118 cpl_error_code (*)
00119 (cpl_vector *,
00120 const cpl_polynomial *,
00121 irplib_base_spectrum_model *, int),
00122 int,
00123 cpl_boolean,
00124 double *);
00125
00126 cpl_error_code
00127 irplib_polynomial_shift_1d_from_correlation(cpl_polynomial *,
00128 const cpl_vector *,
00129 irplib_base_spectrum_model *,
00130 cpl_error_code (*)
00131 (cpl_vector *,
00132 const cpl_polynomial *,
00133 irplib_base_spectrum_model *, int),
00134 int, cpl_boolean, double *);
00135
00136 cpl_error_code
00137 irplib_polynomial_find_1d_from_correlation(cpl_polynomial *, int,
00138 const cpl_vector *,
00139 irplib_base_spectrum_model *,
00140 cpl_error_code (*)
00141 (cpl_vector *,
00142 const cpl_polynomial *,
00143 irplib_base_spectrum_model *, int),
00144 double, double,
00145 int, int, double *);
00146
00147 cpl_error_code irplib_vector_fill_line_spectrum(cpl_vector *,
00148 const cpl_polynomial *,
00149 irplib_base_spectrum_model *,
00150 int);
00151
00152 cpl_error_code irplib_vector_fill_logline_spectrum(cpl_vector *,
00153 const cpl_polynomial *,
00154 irplib_base_spectrum_model *,
00155 int);
00156
00157 cpl_error_code
00158 irplib_vector_fill_line_spectrum_fast(cpl_vector *,
00159 const cpl_polynomial *,
00160 irplib_base_spectrum_model *,
00161 int);
00162
00163 cpl_error_code
00164 irplib_vector_fill_logline_spectrum_fast(cpl_vector *,
00165 const cpl_polynomial *,
00166 irplib_base_spectrum_model *,
00167 int);
00168
00169 cpl_error_code irplib_plot_spectrum_and_model(const cpl_vector *,
00170 const cpl_polynomial *,
00171 irplib_base_spectrum_model *,
00172 cpl_error_code (*)
00173 (cpl_vector *,
00174 const cpl_polynomial *,
00175 irplib_base_spectrum_model *,
00176 int));
00177
00178 cpl_error_code irplib_polynomial_fit_2d_dispersion(cpl_polynomial *,
00179 const cpl_image *,
00180 int, double *);
00181
00182 int irplib_bivector_count_positive(const cpl_bivector *, double, double);
00183
00184 #endif