array sample slower than indexing into rand(size-1)

[HJarausch]

I've just added under `when isMainModule`
    
    
    var randState:Rand
    
    
    Run

Then your code goes into an endless loop (even for `for trial in 1..1`)