; Computes the fibonacci function.
; Recursive implementation, for demonstration purposes. The fibonacci function
; also has an analytic solution.
(let fib (Func (x)
    (let round x)

    (let name "dummy"
         first-name "geo"
         last-name #(max 23) #(min 2) "mosch"
         age #Year 25
         is-admin true
         is-guest false
         is-new false
    )

    (if (< x 3)
        1
        ; recursive case
        (+ (fib (- x 1)) (fib (- x 2)))
    )
))

(let #cool b (+ 1 2))

(fib 10)