47 const char *
const qcdic_version =
"2.0";
48 const char *
const instrument[] = {
"FORS1",
"FORS2"};
49 const char *
const qc_name[] = {
"SOME.QC",
"SOME.OTHER.QC"};
50 const char *
const qc_value[] = {
"some value",
"some other value"};
51 const char *
const qc_comment[] = {
"some comment",
"some other comment"};
52 const char *
const keyword_name[] = {
"ESO SOME KEYWORD",
53 "ESO SOME OTHER KEYWORD"};
54 const char *
const keyword_value[] = {
"some key value",
55 "some other key value"};
56 const char *
const keyword_unit[] = {
"some key unit",
57 "some other key unit"};
58 const char *
const keyword_comment[] = {
"some key comment",
59 "some other key comment"};
62 cpl_propertylist *header = cpl_propertylist_new();
65 for (i = 0; i < 2; i++) {
66 cpl_propertylist_append_string(header,
71 for (i = 0; i < 2; i++) {
76 qc_comment[i], instrument[i]);
79 "mean zeropoint", instrument[i]);
90 cpl_propertylist_delete(header);
cpl_error_code fors_qc_write_double(const char *name, double value, const char *unit, const char *comment, const char *instrument)
Add double parameter to current QC1 group.
cpl_error_code fors_qc_keyword_to_paf(cpl_propertylist *header, const char *name, const char *unit, const char *comment, const char *instrument)
Copy a keyword value to the currently active QC1 PAF object.
cpl_error_code fors_qc_start_group(cpl_propertylist *header, const char *qcdic_version, const char *instrument)
Initiate a new QC1 group.
cpl_error_code fors_qc_write_string(const char *name, const char *value, const char *comment, const char *instrument)
Add string parameter to current QC1 group.
cpl_error_code fors_qc_end_group(void)
Close current QC1 PAF file.
int main(void)
Test of QC module.
static void test_qc(void)
Write QC log.