mv [f ".lisp" => f ++ ".cl"]

sum (map [file:f int:s => s] (read-lines ./file.txt))
read-lines ./file.txt | map [File:f Int:s => s] | sum

thread-map [json:j => j | :repos] (get-users-from-github) | append

sum [x | x <- [1..999], x % 3 == 0 || x % 5 == 0]

str = read-file ./file.txt
[maximizing (product i) | i <- ()]