copy.c

来自「Numerical Recipes Software 提供的算法子程序集」· C语言 代码 · 共 12 行

void copy(aout,ain,n)
double **ain,**aout;
int n;
{
	int i,j;
	for (i=1;i<=n;i++)
		for (j=1;j<=n;j++)
			aout[j][i]=ain[j][i];

}
/* (C) Copr. 1986-92 Numerical Recipes Software . */