3 lines
84 B
Haskell
3 lines
84 B
Haskell
selPrime=: #~ 1&p:
|
|
seed=: selPrime digits=: 1+i.9
|
|
step=: selPrime@,@:(,&.":/&>)@{@;
|