gistfile1.txt

chas@ip-10-212-117-241:~$ java -server -version
java version "1.6.0_26"
Java(TM) SE Runtime Environment (build 1.6.0_26-b03)
Java HotSpot(TM) Server VM (build 20.1-b02, mixed mode)
chas@ip-10-212-117-241:~$ java -server -jar clojure.jar
Clojure 1.3.0-beta1
user=> (defn fib [n]
  (if (<= n 1)
    1
    (+ (fib (dec n)) (fib (- n 2)))))
#'user/fib
user=> (time (fib 38))
"Elapsed time: 14396.075932 msecs"
63245986
user=> (defn fib ^long [^long n]
  (if (<= n 1)
    1
    (+ (fib (dec n)) (fib (- n 2)))))
#'user/fib
user=> (time (fib 38))
"Elapsed time: 1893.059493 msecs"
63245986
user=> 
chas@ip-10-212-117-241:~$ lsb_release -a
No LSB modules are available.
Distributor ID:	Ubuntu
Description:	Ubuntu 11.04
Release:	11.04
Codename:	natty