33 #include <casu_fits.h>
34 #include <casu_utils.h>
35 #include <casu_mods.h>
39 cpl_propertylist *plist;
41 const char *reqcols[] = {
"X_coordinate",
"Y_coordinate",
"xpredict",
42 "ypredict",
"RA",
"Dec"};
45 cpl_test_init(PACKAGE_BUGREPORT,CPL_MSG_WARNING);
50 plist = cpl_propertylist_new();
51 matched = cpl_table_new(2);
52 cpl_table_new_column(matched,
"yuk",CPL_TYPE_FLOAT);
55 cpl_test_eq(status,CASU_FATAL);
56 cpl_test_eq(retval,status);
63 cpl_test_eq(status,CASU_FATAL);
64 cpl_test_eq(retval,status);
69 for (i = 0; i < 6; i++)
70 cpl_table_new_column(matched,reqcols[i],CPL_TYPE_FLOAT);
73 cpl_test_eq(status,CASU_FATAL);
74 cpl_test_eq(retval,status);
81 cpl_test_eq(status,CASU_FATAL);
82 cpl_test_eq(retval,status);
86 cpl_table_delete(matched);
87 cpl_propertylist_delete(plist);
88 return(cpl_test_end(0));
int casu_platesol(cpl_propertylist *plist, cpl_propertylist *tlist, cpl_table *matchedstds, int nconst, int shiftan, int *status)
Work out a WCS for an image.