32 #include <fors_img_sky_flat_impl.h>
34 #include <fors_utils.h>
36 #include <test_simulate.h>
50 cpl_frameset_delete(frames); \
51 cpl_parameterlist_delete(parameters); \
52 fors_image_delete(&raw_sflat); \
53 fors_image_delete(&master_sflat); \
54 fors_image_delete(&master_bias); \
55 fors_setting_delete(&setting); \
65 cpl_frameset *frames = cpl_frameset_new();
66 cpl_parameterlist *parameters = cpl_parameterlist_new();
76 const char *sky_flat_filename[] = {
"img_sky_flat_1.fits",
77 "img_sky_flat_2.fits",
78 "img_sky_flat_3.fits"};
80 double sky_flat_exptime[] = {1, 2, 5};
84 for (i = 0; i <
sizeof(sky_flat_filename)/
sizeof(
char *); i++) {
86 SKY_FLAT_IMG, CPL_FRAME_GROUP_RAW,
89 cpl_frame_set_group(sflat, CPL_FRAME_GROUP_RAW);
90 cpl_frameset_insert(frames, sflat);
96 cpl_frameset_insert(frames,
98 MASTER_BIAS, CPL_FRAME_GROUP_CALIB));
100 fors_img_sky_flat_define_parameters(parameters);
101 assure( !cpl_error_get_code(),
return,
102 "Create parameters failed");
107 fors_img_sky_flat(frames, parameters);
108 assure( !cpl_error_get_code(),
return,
114 const char *
const product_tags[] = {MASTER_SKY_FLAT_IMG};
115 const char *
const qc[] = {
"QC OVEREXPO"};
117 product_tags,
sizeof product_tags /
sizeof *product_tags,
119 qc,
sizeof qc /
sizeof *qc);
124 test( cpl_frameset_find(frames, MASTER_BIAS) != NULL );
125 test( cpl_frameset_find(frames, SKY_FLAT_IMG) != NULL );
128 cpl_frameset_find(frames, MASTER_SKY_FLAT_IMG));
131 cpl_frameset_find(frames, MASTER_BIAS));
134 cpl_frameset_find(frames, SKY_FLAT_IMG));
fors_setting * fors_setting_new(const cpl_frame *raw)
Create setting from FITS header.
int main(void)
Test of image module.
cpl_frame * create_master_bias(const char *filename, const char *tag, cpl_frame_group group)
Simulate master bias image.
fors_image * fors_image_load(const cpl_frame *frame)
Load image.
double fors_image_get_mean(const fors_image *image, double *dmean)
Get mean data value.
cpl_frame * create_sky_flat(const char *filename, const char *tag, cpl_frame_group group, double exptime)
Simulate sky flat image.
void test_recipe_output(const cpl_frameset *frames, const char *const product_tags[], int n_prod, const char *main_product, const char *const qc[], int n_qc)
Test existence of recipe products.
void fors_parameterlist_set_defaults(cpl_parameterlist *parlist)
Set unset parameters to default value.
double fors_image_get_error_mean(const fors_image *image, double *dmean)
Get mean of error bars.
static void test_img_sky_flat(void)
Test sky flat recipe.