48 long primes[4800];  variable
65 	primes[0] = 2;  in build_primes()
66 	primes[1] = 3;  in build_primes()
68 	for (pc = primes[num_primes-1]; pc < 46345 && pc*pc <= max; pc+=2) {  in build_primes()
71 		while (j < num_primes && primes[j] * primes[j] <= pc) {  in build_primes()
72 			if ((rem = pc % primes[j]) == 0)  in build_primes()
77 			primes[num_primes++] = pc;  in build_primes()
97 		while (i < num_primes && val % primes[i] != 0) i++;  in factor()
101 		    val % primes[i] == 0) {  in factor()
102 			fact_list[(*num_fact)++] = primes[i];  in factor()
103 			val /= primes[i];  in factor()