1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
/* cmattr.c CCMATH mathematics library source code.
*
* Copyright (C) 2000 Daniel A. Atkinson All rights reserved.
* This code may be redistributed under the terms of the GNU library
* public license (LGPL). ( See the lgpl.license file for details.)
* ------------------------------------------------------------------------
*/
#include "ccmath.h"
void cmattr(Cpx *a, Cpx *b, int m, int n)
{
Cpx *p;
int i, j;
for (i = 0; i < n; ++i, ++b)
for (j = 0, p = b; j < m; ++j, p += n)
*a++ = *p;
}
|