Ble oppfordret til å ta en titt på denne tråden, og tenkte jeg kunne komme med et lite bidrag i Clojure. Ganske basic.., men skal gruble litt på det...
Kode
;; a program saying hello to the world
(use '[clojure.string :only (join)])
(def a (partial subs (slurp *file*)))
(def b #(a % (+ % 5)))
(print (join ", " [(b 20) (b 33)]))
Eller kanskje dette er mer idiomatisk Clojure når jeg tenker meg om:
Kode
;; a program saying hello to the world
(use '[clojure.string :only (join)])
(let [a (partial subs (slurp *file*))]
(print (join ", " (map #(a % (+ % 5)) [20 33]))))