Search Results

Found 1 results for "0a6260759b1c70b2a3a89805b1c5f916" across all boards searching md5.

Anonymous /g/105527756#105554832
6/11/2025, 1:07:19 AM
>compiled exe vs "racket ./1,rkt"
>compiled is faster
ok makes sense
>raco make 1.rkt
>generates bytecode optimised files
>running through the VM is now 1.2x faster
ok wtf

am i being retarded? wtf is happening here

code

#lang racket

(define _example1 "3 4
4 3
2 5
1 3
3 9
3 3
")

;; (define input1 (file->string "1.txt"))

(define (solve1 s)
(define parsed (map string->number (string-split s #px"\\s+|\n")))
(define l empty)
(define r empty)

(do ()
((empty? parsed) (set!-values (l r) (values (sort l <) (sort r <))))
(match-let ([(list a b) (take parsed 2)])
(set! l (cons a l))
(set! r (cons b r))
(set! parsed (drop parsed 2))))

(for/sum ([l l] [r r]) (abs (- l r))))

(solve1 _example1)