sub primetest(Int $n) { not any(2..$n-1) * any(2..$n-1) == $n; }