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

Solve conditionals

Browse source
This commit is contained in:
Kenneth Kostresevic 2021-12-15 14:28:55 +01:00
parent a9c22921a5
commit 91e67ebb2b
1 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
src/koans/08_conditionals.clj
View file

@ -10,38 +10,38 @@
(meditations
"You will face many decisions"
(= __ (if (false? (= 4 5))
(= :a (if (false? (= 4 5))
:a
:b))
"Some of them leave you no alternative"
(= __ (if (> 4 3)
(= [] (if (> 4 3)
[]))
"And in such a situation you may have nothing"
(= __ (if (nil? 0)
(= nil (if (nil? 0)
[:a :b :c]))
"In others your alternative may be interesting"
(= :glory (if (not (empty? ()))
:doom
__))
:glory))
"You may have a multitude of possible paths"
(let [x 5]
(= :your-road (cond (= x __) :road-not-taken
(= x __) :another-road-not-taken
:else __)))
(= :your-road (cond (= x 3) :road-not-taken
(= x 4) :another-road-not-taken
:else :your-road)))
"Or your fate may be sealed"
(= 'doom (if-not (zero? __)
(= 'doom (if-not (zero? 1)
'doom
'more-doom))
"In case of emergency, go fast"
(= "pretty fast"
(explain-exercise-velocity __))
(explain-exercise-velocity :bicycling))
"But admit it when you don't know what to do"
(= __
(= "is that even exercise?"
(explain-exercise-velocity :watching-tv)))