primes in lua