33 #include <casu_fits.h>
34 #include <casu_utils.h>
35 #include <casu_mods.h>
36 #include <casu_stats.h>
47 cpl_test_init(PACKAGE_BUGREPORT,CPL_MSG_WARNING);
51 data = cpl_malloc(21*
sizeof(
float));
52 ddata = cpl_malloc(21*
sizeof(
double));
53 bpm = cpl_calloc(21,
sizeof(
unsigned char));
54 for (i = 0; i < 21; i++) {
55 data[20-i] = (float)i - 10.0;
56 ddata[20-i] = (double)i - 10.0;
63 cpl_test_rel(val,0.0,0.001);
65 cpl_test_rel(dval,0.0,0.001);
69 cpl_test_rel(val,-1.0,0.001);
71 cpl_test_rel(dval,-1.0,0.001);
78 cpl_test_rel(val,0.0,0.001);
79 cpl_test_rel(mad,5.0,0.001);
84 cpl_test_rel(val,-0.5,0.001);
85 cpl_test_rel(mad,5.0,0.001);
90 cpl_test_rel(val,0.0,0.001);
92 cpl_test_rel(dval,0.0,0.001);
96 cpl_test_rel(val,-1.0,0.01);
98 cpl_test_rel(dval,-1.0,0.01);
105 cpl_test_rel(val,0.0,0.01);
106 cpl_test_rel(mad,6.0553,0.01);
108 cpl_test_rel(val,0.0,0.01);
109 cpl_test_rel(mad,6.0553,0.01);
121 return(cpl_test_end(0));
double casu_dmean(double *data, unsigned char *bpm, long npts)
void casu_medmad(float *data, unsigned char *bpm, long np, float *med, float *mad)
float casu_med(float *data, unsigned char *bpm, long npts)
void casu_medsig(float *data, unsigned char *bpm, long np, float *med, float *sig)
float casu_mean(float *data, unsigned char *bpm, long npts)
double casu_dmed(double *data, unsigned char *bpm, long npts)
int casu_sumbpm(unsigned char *bpm, long npts, int *sumb)
void casu_medmadcut(float *data, unsigned char *bpm, long np, float lcut, float hcut, float *med, float *mad)
int casu_meansig(float *data, unsigned char *bpm, long npts, float *mean, float *sig)