Code: Select all
> (dotimes(i 200000)(let((r (random)))(unless (and (< 0 r) (< r 1))(println "edge " (inc counter) ". " r))))
edge 1. 1
edge 2. 1
edge 3. 0
edge 4. 1
edge 5. 1
edge 6. 1
edge 7. 0
edge 8. 1
edge 9. 0
edge 10. 1
edge 11. 0
true
Code: Select all
> (dotimes(i 200000)(let((r (random)))(unless (and (< 0 r) (< r 1))(println "edge " (inc counter) ". " r))))
edge 1. 1
edge 2. 1
edge 3. 0
edge 4. 1
edge 5. 1
edge 6. 1
edge 7. 0
edge 8. 1
edge 9. 0
edge 10. 1
edge 11. 0
true