diff --git a/main.fnl b/main.fnl
index 7e72df3..966adb1 100644
--- a/main.fnl
+++ b/main.fnl
@@ -9,20 +9,18 @@
   :dark [64 56 48] ; #403830
 })
 
-(lambda remap [v in-min in-max out-min out-max]
-  (+ out-min (* (/ (- v in-min) (- in-max in-min)) (- out-max out-min))))
-
 (local steps (* 24  60))
 (var step 0)
 
 (lambda lpad [num] (if (< num 10) (.. "0" num) num))
 (lambda time [num]
-  (let [hour (floor (remap num 0 steps 0 24))
+  (let [hour (floor (map num 0 steps 0 24))
        min (- num (* hour 60))]
     (.. (lpad hour) ":" (lpad min))))
 
 (var pause false)
 (var won false)
+
 (fn key-pressed []
   (when (= key "space") (set pause (not pause))))
 
@@ -34,11 +32,8 @@
   (let [
         half (/ steps 2)
         color-step (if (> step half) (- half (- step half)) step)
-        color-fn #(+ (. colors.dark $1) (* (/ (- (. colors.yellow $1) (. colors.dark $1)) half) color-step))
-        r (color-fn 1)
-        g (color-fn 2)
-        b (color-fn 3)]
-    (background r g b))
+        color-fn #(+ (. colors.dark $1) (* (/ (- (. colors.yellow $1) (. colors.dark $1)) half) color-step))]
+    (background (color-fn 1) (color-fn 2) (color-fn 3)))
     (text (time step) 175 150)
     (text (time goal-time) 175 250)
     (when (and pause (= goal-time step)) (set won true))
diff --git a/minify.bb b/minify.bb
index c382e23..35ad7a8 100755
--- a/minify.bb
+++ b/minify.bb
@@ -58,7 +58,7 @@
 (def built-ins #{"fn" "local" "λ" "lambda" "require" "let" "+" "-" "/" "*" "<" ">" "<=" ">=" "not=" ".."
                  "var" "if" "when" "and" "or" "not" "do" "set" "each" "for" "while"
                  "true" "$1" "math.floor" "floor" "false" "nil" "size" "textSize" "background" "text" "random" "key"
-                 ":setup" ":draw" ":key-pressed" ":L5"})
+                 ":setup" ":draw" ":key-pressed" ":L5" "map"})
 
 (defn collect-bindings [tokens]
   (reduce (fn [acc token]