Mercurial > lasercutter

view src/clojureDemo/project-euler.clj~ @ 1:6d9bdaf919f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added clojureDemo source
author Robert McIntyre <rlm@mit.edu>
date Fri, 20 Aug 2010 00:32:44 -0400
parents
children
line wrap: on
line source
     1 



     2 



     3 (ns clojureDemo.project-euler)



     4 



     5 



     6 (use 'clojureDemo.rlm)



     7 (rlm-base-load)



     8 



     9 (defn range-sum 



    10 "calculates the sum of a range.  Takes the exact same arguments



    11  as clojure.core/range"



    12 ([end]



    13    (/ (* end (- end 1) ) 2)))



    14 



    15 



    16