|
Line 0
Link Here
|
|
|
1 |
--- ./mlpy/cwt/cwb.c.dist 2010-01-15 19:00:43.000000000 +0900 |
| 2 |
+++ ./mlpy/cwt/cwb.c 2010-12-17 17:54:36.032731532 +0900 |
| 3 |
@@ -143,7 +143,11 @@ |
| 4 |
double sw, norm = 1.0; |
| 5 |
|
| 6 |
|
| 7 |
+#ifndef __STD_IEC_559_COMPLEX__ /* FreeBSD lacks C99 cpow() */ |
| 8 |
+ p = - gsl_complex_pow(0.0 + 1.0I, order) / sqrt(gsl_sf_gamma(order + 0.5)); |
| 9 |
+#else |
| 10 |
p = - cpow(0.0 + 1.0I, order) / sqrt(gsl_sf_gamma(order + 0.5)); |
| 11 |
+#endif /* __STD_IEC_559_COMPLEX__ */ |
| 12 |
|
| 13 |
for (i=0; i<n; i++) |
| 14 |
{ |