#include <stdio.h>
/*                                                              */
/*      main program for primroot.c                             */
/*      finds a primitive root of a prime p                     */
/*                                                              */
main()
{

	long p, r;
	long primroot();

	while ( 1L == 1L)
	{
		printf("\n");
		printf("Find primitive root of a prime p\n");
		printf("Enter p: ");
		scanf("%ld", &p);

		if ( (r = primroot(p)) == 0L)
			printf("%ld has no primitive root\n");
		else
			printf("Least primitive root of %ld is %ld\n",p,r);
	}
}