ajet/advent-of-code
1
0
Fork 0
mirror of https://github.com/Ajetski/advent-of-code.git synced 2025-09-30 07:23:18 -09:00
Code Issues Packages Projects Releases Wiki Activity

fiddle

Browse Source
This commit is contained in:
Adam Jeniski 2023-12-18 22:00:18 -05:00
parent fcdf3c6c9d
commit 131cfb08d1
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
2023/src/core.clj
View File

@ -33,7 +33,7 @@
[& ls] (let [r# (reverse ls)]
`(comp ~@r#)))
(defmacro static-fn
(defmacro s-fn
"wraps java static methods in a lambda so they can be passed as function objects"
[f] `(fn [v#] (~f v#)))
@ -90,18 +90,14 @@
v is a vector of values of length N
this function returns a vector where each value is the result of applying
an f from fs to the corresponding v from vs"
an f from fs to the corresponding value from v"
[& args]
(->> (zipmap (drop-last args)
(last args))
(mapv #((first %) (second %)))))
(def p partial)
(def a apply)
(comment
(map (static-fn Long/parseLong) ["123" "456"])
(map (s-fn Long/parseLong) ["123" "456"])
input-cache
(apply-each #(* % 2) #(+ % 5) 5 10)