(fn fib [x] (let [get-fib (fn [a b n] (cond (> n 0) (conj (get-fib b (+ a b) (- n 1)) (+ a b))))])
               (concat '(1 1) (get-fib 1 1 (- x 2))))