ipiv=(int *)calloc(n,sizeof(int));
a=(double **)malloc(n*sizeof(double));
a[0]=(double *)malloc(n*n*sizeof(double));
for (i=1;i
ipiv=(int *)calloc(n,sizeof(int));
a=(double **)malloc(n*sizeof(double));
a[0]=(double *)malloc(n*n*sizeof(double));
for (i=1;i