38 #include "detmon_lg.h"
39 #include "irplib_plugin.h"
41 #define RECIPE_NAME "detmon_ir_lg"
49 CPL_RECIPE_DEFINE(detmon_ir_lg, DETMON_BINARY_VERSION,
50 detmon_lg_fill_parlist_nir_default(recipe->parameters,
51 "detmon_ir_lg",
"detmon"),
52 "Lander de Bilbao",
"lbilbao@eso.org",
"2007",
53 "Linearity/Gain recipe for the IR domain",
54 detmon_lg_get_description(
"detmon_ir_lg",
"DETMON",
56 DETMON_LG_OFF_RAW_NEW,
58 DETMON_LG_OFF_RAW_OLD));
69 static int detmon_ir_lg(cpl_frameset * frameset,
70 const cpl_parameterlist * parlist)
74 const char * tag_on=NULL;
75 const char * tag_off=NULL;
76 cpl_propertylist * lintbl =
77 detmon_fill_prolist(
"DET_LIN_INFO",
"REDUCED",
"TECH", CPL_FALSE);
79 cpl_propertylist * gaintbl =
80 detmon_fill_prolist(
"GAIN_INFO",
"REDUCED",
"TECH", CPL_FALSE);
82 cpl_propertylist * coeffscube =
83 detmon_fill_prolist(
"COEFFS_CUBE",
"REDUCED",
"TECH", CPL_FALSE);
85 cpl_propertylist * bpm =
86 detmon_fill_prolist(
"BP_MAP_NL",
"REDUCED",
"TECH", CPL_FALSE);
88 cpl_propertylist * corr =
89 detmon_fill_prolist(
"AUTOCORR",
"REDUCED",
"TECH", CPL_FALSE);
91 cpl_propertylist * diff_flat =
92 detmon_fill_prolist(
"DIFF_FLAT",
"REDUCED",
"TECH", CPL_FALSE);
94 cpl_error_code error=CPL_ERROR_NONE;
95 skip_if (detmon_lg_set_tag(frameset, &tag_on, &tag_off));
97 error = detmon_lg(frameset,
104 lintbl, gaintbl, coeffscube,
105 bpm, corr, diff_flat,
106 PACKAGE
"/" PACKAGE_VERSION,
109 cpl_propertylist_delete(lintbl);
110 cpl_propertylist_delete(gaintbl);
111 cpl_propertylist_delete(coeffscube);
112 cpl_propertylist_delete(bpm);
113 cpl_propertylist_delete(corr);
114 cpl_propertylist_delete(diff_flat);
117 cpl_ensure_code(!error, error);
119 return CPL_ERROR_NONE;