asolve.c

国外的c数值算法书籍源程序（Numerical Recipes Source- C2.02）

extern unsigned long ija[];
extern double sa[];

void asolve(unsigned long n, double b[], double x[], int itrnsp)
{
	unsigned long i;

	for(i=1;i<=n;i++) x[i]=(sa[i] != 0.0 ? b[i]/sa[i] : b[i]);
}