| 245 | } |
| 246 | } |
| 247 | void show_vector(gsl_vector* v, size_t n, char name) { |
| 248 | printf("%c:\n", name); |
| 249 | for (size_t i = 0; i < 5; ++i) |
| 250 | printf("%g ", gsl_vector_get(v, i)); |
| 251 | printf(" .. "); |
| 252 | for (size_t i = n - 5; i < n; ++i) |
| 253 | printf("%g ", gsl_vector_get(v, i)); |
| 254 | puts("\n"); |
| 255 | } |
| 256 | #endif |
| 257 | |
| 258 | // GSL version of ARPLS (much slower than Eigen3 version) |
no outgoing calls
no test coverage detected