bit( i, key )
	int i;
	typekey key;
	{return( (key>>(14-i)) & 1 );}