9 |
|
#include <math.h> |
10 |
|
#include "platform.h" |
11 |
|
#include "rtio.h" |
12 |
– |
#include "resolu.h" |
12 |
|
#include "rmatrix.h" |
13 |
|
#include "calcomp.h" |
14 |
|
#include "paths.h" |
390 |
|
return(0); |
391 |
|
rmx_free(res); |
392 |
|
} else if (dst != src) |
393 |
< |
memcpy(dst->mtx, src->mtx, |
395 |
< |
sizeof(double)*dst->ncomp*dst->ncols*dst->nrows); |
393 |
> |
memcpy(dst->mtx, src->mtx, rmx_array_size(dst)); |
394 |
|
if (ro->nsf == dst->ncomp) |
395 |
|
rmx_scale(dst, ro->sca); |
396 |
|
return(1); |
868 |
|
fprintf(stderr, "%s: unsupported output format\n", argv[0]); |
869 |
|
return(1); |
870 |
|
} |
871 |
+ |
doptimize(1); /* optimize definitions */ |
872 |
|
/* process & write rows */ |
873 |
|
return(combine_input(&mop[nmats], stdout) ? 0 : 1); |
874 |
|
stdin_error: |