33 #include <casu_fits.h>
34 #include <casu_utils.h>
35 #include <casu_mods.h>
40 cpl_propertylist *phu,*ehu;
45 cpl_test_init(PACKAGE_BUGREPORT,CPL_MSG_WARNING);
51 cpl_test_eq(status,CASU_FATAL);
52 cpl_test_eq(status,retval);
56 im = cpl_image_new(100,100,CPL_TYPE_FLOAT);
57 cpl_image_fill_window(im,1,1,100,100,200.0);
58 phu = cpl_propertylist_new();
59 cpl_propertylist_update_double(phu,
"EXPTIME",20.0);
60 ehu = cpl_propertylist_new();
61 cpl_propertylist_update_double(ehu,
"EXPTIME",20.0);
62 cpl_propertylist_update_bool(ehu,
"ESO DRS NDITCOR",CPL_TRUE);
64 cpl_propertylist_delete(phu);
65 cpl_propertylist_delete(ehu);
73 cpl_test_eq(status,CASU_OK);
74 cpl_test_eq(status,retval);
85 cpl_test_eq(status,CASU_OK);
86 cpl_test_eq(status,retval);
95 return(cpl_test_end(0));
cpl_image * casu_fits_get_image(casu_fits *p)
void casu_fits_delete(casu_fits *p)
casu_fits * casu_fits_wrap(cpl_image *im, casu_fits *model, cpl_propertylist *phu, cpl_propertylist *ehu)
cpl_propertylist * casu_fits_get_phu(casu_fits *p)
cpl_propertylist * casu_fits_get_ehu(casu_fits *p)
int casu_nditcor(casu_fits *infile, int ndit, const char *expkey, int *status)
Correct input data for number of dits.