|
|
|
@ -17,16 +17,17 @@
|
|
|
|
|
(for [index __ :when (odd? index)]
|
|
|
|
|
index))
|
|
|
|
|
|
|
|
|
|
"And they trivially allow combinations of the two transformations"
|
|
|
|
|
"Combinations these transformations is trivial"
|
|
|
|
|
(= '(1 9 25 49 81)
|
|
|
|
|
(map (fn [index] (* index index))
|
|
|
|
|
(filter odd? (range 10)))
|
|
|
|
|
(for [index (range 10) :when __]
|
|
|
|
|
__))
|
|
|
|
|
|
|
|
|
|
"More complex transformations can be formed with multiple binding forms"
|
|
|
|
|
"More complex transformations simply take multiple binding forms"
|
|
|
|
|
(= [[:top :left] [:top :middle] [:top :right]
|
|
|
|
|
[:middle :left] [:middle :middle] [:middle :right]
|
|
|
|
|
[:bottom :left] [:bottom :middle] [:bottom :right]]
|
|
|
|
|
(for [row [:top :middle :bottom] column [:left :middle :right]]
|
|
|
|
|
(for [row [:top :middle :bottom]
|
|
|
|
|
column [:left :middle :right]]
|
|
|
|
|
__)))
|
|
|
|
|