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)