82 cpl_msg_error(
"imcore_tabinit",
"Option %" CPL_SIZE_FORMAT
" does not exist",
140 cpl_msg_error(
"imcore_do_seeing",
"Option %" CPL_SIZE_FORMAT
" does not exist",
177 int *nobjects, cpl_table *tab) {
198 cpl_msg_error(
"imcore_process_result",
"Option %" CPL_SIZE_FORMAT
" does not exist",
282 const char *tunit[], cpl_type tform[],
285 const char *fctid =
"imcore_tabinit_gen";
289 if ((*tab = cpl_table_new(0)) == NULL) {
290 cpl_msg_error(fctid,
"Unable to open cpl table!");
296 for (i = 0; i < ncols; i++) {
297 cpl_table_new_column(*tab,ttype[i],tform[i]);
298 cpl_table_set_column_unit(*tab,ttype[i],tunit[i]);
336 const char *col_pkht,
char *col_areals[NAREAL],
337 int nobjects, cpl_table *tab) {
339 float fwhm,*areal[NAREAL],*ellipt,*pkht,*work;
345 ellipt = cpl_table_get_data_float(tab,col_ellipt);
346 pkht = cpl_table_get_data_float(tab,col_pkht);
347 work = cpl_malloc(nobjects*
sizeof(*work));
348 for (i = 0; i < NAREAL; i++)
349 areal[i] = cpl_table_get_data_float(tab,col_areals[i]);
void imcore_tabinit(ap_t *ap, int *xcol, int *ycol, int cattype, cpl_table **tab)
Initialise catalogues.
void imcore_tabinit_4(ap_t *ap, int *imcore_xcol, int *imcore_ycol, cpl_table **tab)
Initialise type 4 catalogue (object mask)
int imcore_process_results_6(ap_t *ap, float gain, int *nobjects, cpl_table *tab)
Process results for type 6 catalogue.
int imcore_do_seeing_4(ap_t *ap)
Dummy seeing routine for type 4 catalogue (object mask)
void imcore_tabinit_6(int *imcore_xcol, int *imcore_ycol, cpl_table **tab)
Initialise type 6 catalogue.
int imcore_process_results_3(ap_t *ap, int *nobjects, cpl_table *tab)
Process results for type 3 catalogue.
int imcore_do_seeing_1(ap_t *ap, int nobjects, cpl_table *tab)
Do seeing estimate for type 1 catalogue.
int imcore_tabclose_4(ap_t *ap)
Close object mask.
int imcore_process_results_1(ap_t *ap, int *nobjects, cpl_table *tab)
Process results for type 1 catalogue.
int imcore_do_seeing_2(ap_t *ap, int nobjects, cpl_table *tab)
Do seeing estimate for type 2 catalogue.
int imcore_do_seeing_6(ap_t *ap, int nobjects, cpl_table *tab)
Do seeing estimate for type 6 catalogue.
int imcore_tabclose(ap_t *ap, int cattype)
Close the table structure.
void imcore_seeing(ap_t *ap, int nrows, float *ellipt, float *pkht, float **areal, float *work, float *fwhm)
Work out the median seeing.
int imcore_do_seeing_gen(ap_t *ap, const char *col_ellipt, const char *col_pkht, char *col_areals[NAREAL], int nobjects, cpl_table *tab)
Do seeing estimate (generic)
void imcore_tabinit_3(int *imcore_xcol, int *imcore_ycol, cpl_table **tab)
Initialise type 1 catalogue.
int imcore_process_results_2(ap_t *ap, float gain, int *nobjects, cpl_table *tab)
Process results for type 2 catalogue.
void imcore_tabinit_1(int *imcore_xcol, int *imcore_ycol, cpl_table **tab)
Initialise type 1 catalogue.
int imcore_do_seeing(ap_t *ap, int cattype, int nobjects, cpl_table *tab)
Do seeing estimate.
int imcore_do_seeing_3(ap_t *ap, int nobjects, cpl_table *tab)
Do seeing estimate for type 3 catalogue.
void imcore_tabinit_gen(int ncols, const char *ttype[], const char *tunit[], cpl_type tform[], cpl_table **tab)
Initialise tables (generic)
int imcore_process_results(ap_t *ap, int cattype, float gain, int *nobjects, cpl_table *tab)
Process results.
int imcore_process_results_4(ap_t *ap)
Process results for type 4 catalogue (object mask)
void imcore_tabinit_2(int *imcore_xcol, int *imcore_ycol, cpl_table **tab)
Initialise type 2 catalogue.