luciano/clojure-koans
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Finished seventh koan

Browse source
This commit is contained in:
Matt Davidson 2022-11-04 23:35:58 +00:00
parent acdfdcd424
commit 4fe05a81dc
1 changed files with 10 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
src/koans/07_functions.clj
View file

@ -8,33 +8,32 @@
(meditations
"Calling a function is like giving it a hug with parentheses"
(= __ (square 9))
(= 81 (square 9))
"Functions are usually defined before they are used"
(= __ (multiply-by-ten 2))
(= 20 (multiply-by-ten 2))
"But they can also be defined inline"
(= __ ((fn [n] (* 5 n)) 2))
(= 10 ((fn [n] (* 5 n)) 2))
"Or using an even shorter syntax"
(= __ (#(* 15 %) 4))
(= 60 (#(* 15 %) 4))
"Even anonymous functions may take multiple arguments"
(= __ (#(+ %1 %2 %3) 4 5 6))
(= 15 (#(+ %1 %2 %3) 4 5 6))
"Arguments can also be skipped"
(= __ (#(str "AA" %2) "bb" "CC"))
(= "AACC" (#(str "AA" %2) "bb" "CC"))
"One function can beget another"
(= 9 (((fn [] ___)) 4 5))
(= 9 (((fn [] +)) 4 5))
"Functions can also take other functions as input"
(= 20 ((fn [f] (f 4 5))
___))
*))
"Higher-order functions take function arguments"
(= 25 (___
(fn [n] (* n n))))
(= 25 ((fn [f] (f 5)) (fn [n] (* n n))))
"But they are often better written using the names of functions"
(= 25 (___ square)))
(= 25 ((fn [f] (f 5)) square)))