Day 8: Use an actual whitespace character instead of a light-grey box.
This commit is contained in:
parent
d88fcf2a60
commit
59b628be64
|
@ -46,7 +46,7 @@
|
|||
|
||||
(define part2
|
||||
(let* ([image (map (curry findf (curry neq? #\2)) (pivot layers))]
|
||||
[image* (map (λ (pixel) (if (eq? pixel #\1) #\█ #\░)) image)]
|
||||
[image* (map (λ (pixel) (if (eq? pixel #\1) #\█ #\ )) image)]
|
||||
[msg (map list->string (partition-into image* width))])
|
||||
(for-each displayln msg)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue