(1,|unique [X*] grep &is-prime,^99+1e5 xx 2).sort[get-1].say