Image noise: Difference between revisions
Content added Content deleted
Line 1,783: | Line 1,783: | ||
(for*/list ([x (in-range w)] [y (in-range h)]) |
(for*/list ([x (in-range w)] [y (in-range h)]) |
||
(if (zero? (random 2)) black white)) |
(if (zero? (random 2)) black white)) |
||
w h |
w h)) |
||
(define (draw w) |
(define (draw w) |