Prime number test

[Lucas]

little faster.

Function IsPrimeNumber2

Code:

Copy      Help

;/
function! x

if(x<2) ret
if(x=2) ret 1
if(x%2=0) ret 0
int i si=sqrt(x)+1
for i 3 si 2
,if !(x%i)
,,;out "%i is divisible by %i" x i
,,ret

;out "%i is prime number" x
ret 1