PasteRack.org
Paste # 83468
2016-07-15 12:40:50

Forked from paste # 84790.

Fork as a new paste.

Paste viewed 311 times.


Embed:

  1. #lang racket
  2.  
  3. (define (generate)
  4.   (for/list ((i (in-range 3)))
  5.             (for/list ((i (in-range 6)))
  6.                       (- (random 13) 5))))
  7.  
  8. (define r (generate))
  9.  
  10. (for-each displayln r)

=>

(-5 5 5 -1 2 -5)

(-2 -1 -3 -1 7 6)

(1 5 -4 7 -1 -3)