igray.c

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

unsigned long igray(n,is)
int is;
unsigned long n;
{
	int ish;
	unsigned long ans,idiv;

	if (is >= 0)
		return n ^ (n >> 1);
	ish=1;
	ans=n;
	for (;;) {
		ans ^= (idiv=ans >> ish);
		if (idiv <= 1 || ish == 16) return ans;
		ish <<= 1;
	}
}
/* (C) Copr. 1986-92 Numerical Recipes Software . */