21 lines
351 B
Plaintext
21 lines
351 B
Plaintext
;; Complex Data Structure Test
|
|
;; Benchmark: 33.5us
|
|
;; Benchmark-Repeat: 62
|
|
;; Output: {:name "Fibonacci", :input 10, :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
|
|
)
|