18     if (!result) 
return NULL;
    20     real_t* end = result + size;
    21     for (
real_t* ptr = result; ptr != end; ++ptr) {
    31     if (!result) 
return NULL;
    33     memcpy(result, data, size*
sizeof(
real_t));
    40     const real_t* a_end = a + size;
    41     for (; a != a_end; ++a,++b) {
    45     return accu / (
real_t)(size);
 real_t * make_random(size_t size)
 
real_t * make_empty(size_t size)
 
real_t * make_copy(const real_t *data, size_t size)
 
real_t mse(const real_t *a, const real_t *b, size_t size)