I hereby claim:
- I am paraseba on github.
- I am paraseba (https://keybase.io/paraseba) on keybase.
- I have a public key whose fingerprint is 9D6D 0755 86C2 1B61 42D1 7883 8124 48E5 924F EEA5
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
(defn f1 [n] | |
(lazy-seq | |
(cons n (f1 (inc n))))) | |
(nth (f1 0) 5000) | |
;; => 5000 | |
(defn f2 [n] | |
(lazy-seq | |
(cons n (map identity (f2 (inc n)))))) |
; Currencies know how to create Money | |
(defprotocol Currency | |
(make-money [this amount])) | |
; Money knows the details about how to print itself, round, etc. | |
; We want to be able to pass Moneys around, and after the fact, be able to | |
; print them, round them, etc. | |
(defprotocol Money | |
(str$ [this]) | |
(round$ [this])) |
##Install Java
Install any version of Java JDK >= 1.5 You can download Java using your system's package manager or going to http://www.oracle.com/technetwork/java/javase/downloads/index.html
##Install Leiningen
Leiningen will help us automating some common tasks like installing dependencies and running the REPL. The installation procedure changes if you are in a Unix like system or in Windows. If you have any problems, there is more information in Leiningen's page: https://github.com/technomancy/leiningen
(def file-path "words.txt") |
Look, I mean to say this: When I began writing, I thought that | |
everything should be defined by the writer. For example, to say | |
“the moon” was strictly forbidden; that one had to find an | |
adjective, an epithet for the moon. (Of course, I'm simplifying | |
things. I know it because many times I have written “la luna,” | |
but this is a kind of symbol of what I was doing.) Well, I | |
thought everything had to be defined and that no common turns | |
of phrase should be used. I would never have said, “So-and-so | |
came in and sat down,” because that was far too simple and far | |
too easy. I thought I had to find out some fancy way of saying |
(defn checkout-deps-paths [project] | |
(apply concat (for [dep (.listFiles (file (:root project) "checkouts")) | |
;; Note that this resets the leiningen.core/project var! | |
:let [proj (read-dependency-project dep)] | |
:when proj] | |
(for [d (:checkout-deps-shares project [:source-path :compile-path :resources-path])] | |
(ensure-absolute (d proj) dep)))))) | |
:checkout-deps-shares [:source-path :resources-path :test-path |