diff options
| author | Mistivia <i@mistivia.com> | 2024-02-20 00:42:16 +0800 |
|---|---|---|
| committer | Mistivia <i@mistivia.com> | 2024-02-20 00:42:16 +0800 |
| commit | bebb8946d29069b2acb10db71c8c9203ed4ae922 (patch) | |
| tree | 66ee2e321cbb413baaf32661195f2c734546eba0 /advent-of-code/2023/01 | |
| parent | 3a4e5447a79096d813cdaf4498b9a1e2c086b7ff (diff) | |
λ looks cool & format code
Diffstat (limited to 'advent-of-code/2023/01')
| -rw-r--r-- | advent-of-code/2023/01/1.rkt | 2 | ||||
| -rw-r--r-- | advent-of-code/2023/01/2.rkt | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/advent-of-code/2023/01/1.rkt b/advent-of-code/2023/01/1.rkt index 57d366d..8953e84 100644 --- a/advent-of-code/2023/01/1.rkt +++ b/advent-of-code/2023/01/1.rkt @@ -8,7 +8,7 @@ (define (extract-number line) (define number-list (filter char-numeric? (string->list line))) - (set! number-list (map (lambda (c) + (set! number-list (map (λ (c) (string->number (list->string (list c)))) number-list)) (+ (last number-list) (* 10 (car number-list)))) diff --git a/advent-of-code/2023/01/2.rkt b/advent-of-code/2023/01/2.rkt index 7b252db..f39d87c 100644 --- a/advent-of-code/2023/01/2.rkt +++ b/advent-of-code/2023/01/2.rkt @@ -21,7 +21,7 @@ (define (extract-number rawline) (define line (replace-digit rawline)) (define number-list (filter char-numeric? (string->list line))) - (set! number-list (map (lambda (c) + (set! number-list (map (λ (c) (string->number (list->string (list c)))) number-list)) (+ (last number-list) (* 10 (car number-list)))) |