20 lines
327 B
Plaintext
20 lines
327 B
Plaintext
;; Complex Data Structure Test
|
|
;; Benchmark: 72.7us
|
|
;; Output: {:input 10, :name "Fibonacci", :output 55}
|
|
(do
|
|
(def fib (fn [n]
|
|
(if (< n 2)
|
|
n
|
|
(+ (fib (- n 1)) (fib (- n 2))))))
|
|
|
|
(def result (fib 10))
|
|
|
|
(def data {
|
|
:name "Fibonacci"
|
|
:input 10
|
|
:output result
|
|
})
|
|
|
|
data
|
|
)
|