#define SPIN    10000000

main()
{
	double t1, t2, lt, cputim_();       /* fortran cc .. -lU77 */
	int spin;

	t1 = cputim_();
	spin = SPIN;
	while (spin--)  /* basis reference loop, counter in the stack */
		;
	t2 = cputim_();

	printf("basic spin loop %2.2f micro sec\n",
		(t2 - t1) * 1000000. / SPIN);
}
