ranpt.c

来自「< C语言数值算法程序大全>>配套程序」· C语言 代码 · 共 13 行

extern long idum;

void ranpt(pt,regn,n)
float pt[],regn[];
int n;
{
	float ran1();
	int j;

	for (j=1;j<=n;j++)
		pt[j]=regn[j]+(regn[n+j]-regn[j])*ran1(&idum);
}