Added (generate-prime) function