[file head]:
extern int **int_matrix_alloc(int row, int col);
extern void free_int_matrix(int **m, int row);
extern double **db_matrix(int row, int col);
extern void free_db_matrix(double **m, int row);
extern void fixed_spline_smoothing(double data[], int n, int iter);

#define Send(x,y,m,n); {{int k,l; for(k=0;k<m;k++)\
for(l=0;l<n;l++)\
(y)[k][l]=(x)[k][l];}}

... ...