34 #include "casu_mods.h"
35 #include "catalogue/casu_utils.h"
36 #include "catalogue/casu_fits.h"
77 extern int casu_gaincor(casu_fits *infile,
float gainscl,
int *status) {
79 cpl_propertylist *oplist;
83 if (*status != CASU_OK)
101 cpl_image_multiply_scalar(i,gainscl);
107 if (oplist != NULL) {
108 cpl_propertylist_update_float(oplist,
"ESO DRS GAINCOR",gainscl);
109 cpl_propertylist_set_comment(oplist,
"ESO DRS GAINCOR",
110 "Gain correction factor");
cpl_image * casu_fits_get_image(casu_fits *p)
cpl_propertylist * casu_fits_get_ehu(casu_fits *p)
int casu_gaincor(casu_fits *infile, float gainscl, int *status)
Gain correct input data frame.