Files
2025-09-12 18:55:25 +09:00

10 lines
128 B
C

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