34#include <casu_utils.h>
38 cpl_propertylist *plist;
43 cpl_test_init(PACKAGE_BUGREPORT,CPL_MSG_WARNING);
49 retval =
casu_getstds(plist,0,
"",
"",1,
".",&tabout,&status);
50 cpl_test_eq(status,CASU_FATAL);
51 cpl_test_eq(status,retval);
52 cpl_test_null(tabout);
53 plist = cpl_propertylist_new();
55 retval =
casu_getstds(plist,0,
"",
"",1,
".",&tabout,&status);
56 cpl_test_eq(status,CASU_FATAL);
57 cpl_test_eq(status,retval);
58 cpl_test_null(tabout);
63 cpl_propertylist_update_string(plist,
"CTYPE1",
"RA---ZPN");
64 cpl_propertylist_update_string(plist,
"CTYPE2",
"DEC--ZPN");
65 cpl_propertylist_update_double(plist,
"CRVAL1",81.0578935624986);
66 cpl_propertylist_update_double(plist,
"CRVAL2",-24.5408992630551);
67 cpl_propertylist_update_double(plist,
"CRPIX1",2159.65203390075);
68 cpl_propertylist_update_double(plist,
"CRPIX2",2187.28057518062);
69 cpl_propertylist_update_double(plist,
"CD1_1",-2.96100210581431E-05);
70 cpl_propertylist_update_double(plist,
"CD2_1",-3.54397484069851E-08);
71 cpl_propertylist_update_double(plist,
"CD1_2",-3.93573000440439E-08);
72 cpl_propertylist_update_double(plist,
"CD2_2",2.96102853649076E-05);
73 cpl_propertylist_update_double(plist,
"PV2_1",1.0);
74 cpl_propertylist_update_double(plist,
"PV2_3",400.0);
75 cpl_propertylist_update_int(plist,
"NAXIS",2);
76 cpl_propertylist_update_int(plist,
"NAXIS1",2048);
77 cpl_propertylist_update_int(plist,
"NAXIS2",2048);
95 cpl_table_delete(tabout);
96 cpl_propertylist_delete(plist);
97 return(cpl_test_end(0));
int casu_getstds(cpl_propertylist *plist, int cache, char *path, char *catname, int cdssearch, char *cacheloc, cpl_table **stds, int *status)
Get a table of standard stars that appear on an image from a catalogue.