mp2dfr.c

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

#define IAZ 48

void mp2dfr(a,s,n,m)
int *m,n;
unsigned char a[],s[];
{
	void mplsh(),mpsmu();
	int j;

	*m=(int) (2.408*n);
	for (j=1;j<=(*m);j++) {
		mpsmu(a,a,n,10);
		s[j]=a[1]+IAZ;
		mplsh(a,n);
	}
}
#undef IAZ
/* (C) Copr. 1986-92 Numerical Recipes Software . */