39 #include "sofi_pfits.h"
63 return cpl_propertylist_get_double(plist,
"ESO TEL AIRM START") ;
75 return cpl_propertylist_get_double(plist,
"ESO TEL AIRM END") ;
87 return (
const char *) cpl_propertylist_get_string(plist,
"ARCFILE");
99 return (
const char *) cpl_propertylist_get_string(plist,
100 "ESO DET CHIP NAME");
112 return cpl_propertylist_get_double(plist,
"ESO SEQ CUMOFFSETX") ;
124 return cpl_propertylist_get_double(plist,
"ESO SEQ CUMOFFSETY") ;
136 return cpl_propertylist_get_int(plist,
"ESO TPL EXPNO") ;
148 return (
const char *) cpl_propertylist_get_string(plist,
"DATE") ;
160 return (
const char *) cpl_propertylist_get_string(plist,
"DATE-OBS") ;
172 return cpl_propertylist_get_double(plist,
"DEC") ;
184 return (
const char *) cpl_propertylist_get_string(plist,
185 "ESO DET FRAM TYPE") ;
197 return cpl_propertylist_get_double(plist,
"ESO DET DIT") ;
209 return (
const char *) cpl_propertylist_get_string(plist,
"ESO DPR CATG") ;
221 return (
const char *) cpl_propertylist_get_string(plist,
"ESO DPR TECH") ;
233 return (
const char *) cpl_propertylist_get_string(plist,
"ESO DPR TYPE") ;
247 val = cpl_propertylist_get_string(plist,
"ESO INS FILT1 ID") ;
248 if (val == NULL)
return NULL ;
250 if (strcmp(val,
"open"))
return val ;
252 val = cpl_propertylist_get_string(plist,
"ESO INS FILT2 ID") ;
253 if (val == NULL)
return NULL ;
254 if (strcmp(val,
"open"))
return val ;
267 return cpl_propertylist_get_double(plist,
"ESO TEL AMBI RHUM") ;
279 return (
const char *) cpl_propertylist_get_string(plist,
"INSTRUME") ;
291 return (
const char *) cpl_propertylist_get_string(plist,
292 "ESO INS LAMP1 NAME") ;
304 return cpl_propertylist_get_bool(plist,
"ESO INS LAMP1 ST") ;
316 return (
const char *) cpl_propertylist_get_string(plist,
317 "ESO INS LAMP2 NAME") ;
329 return cpl_propertylist_get_bool(plist,
"ESO INS LAMP2 ST") ;
341 return cpl_propertylist_get_double(plist,
"MJD-OBS") ;
353 return (
const char *) cpl_propertylist_get_string(plist,
"ESO INS MODE") ;
365 return cpl_propertylist_get_int(plist,
"NAXIS2") ;
377 return cpl_propertylist_get_int(plist,
"ESO DET NDIT") ;
389 return cpl_propertylist_get_int(plist,
"ESO TPL NEXP") ;
401 return cpl_propertylist_get_int(plist,
"ESO OBS ID") ;
413 return (
const char *) cpl_propertylist_get_string(plist,
414 "ESO OBS TARG NAME") ;
426 return (
const char *) cpl_propertylist_get_string(plist,
427 "ESO INS OPTI1 ID") ;
439 return (
const char *) cpl_propertylist_get_string(plist,
"ORIGFILE") ;
451 return cpl_propertylist_get_double(plist,
"ESO INS PIXSCALE") ;
463 return cpl_propertylist_get_double(plist,
"RA") ;
475 return (
const char *) cpl_propertylist_get_string(plist,
476 "ESO INS OPTI2 NAME") ;
488 return cpl_propertylist_get_int(plist,
"ESO DET NCORRS") ;
500 return (
const char *) cpl_propertylist_get_string(plist,
501 "ESO DET MODE NAME");
513 return (
const char *) cpl_propertylist_get_string(plist,
514 "ESO DET NCORRS NAME");
526 return cpl_propertylist_get_int(plist,
"ESO DET RSPEED") ;
538 return (
const char *) cpl_propertylist_get_string(plist,
"ESO TPL ID") ;