Skip to content

Instantly share code, notes, and snippets.

@Jach

Jach/ai.clj

Created March 16, 2012 14:52
Show Gist options
  • Save Jach/2050408 to your computer and use it in GitHub Desktop.
Save Jach/2050408 to your computer and use it in GitHub Desktop.
Download ZIP
Recursive self-improving AI!
Raw
ai.clj
; pro-tip: run "java -jar clojure.jar ai.clj >> ai.clj" for infinite fun!
(println ((fn [x y] (list (quote println) (list x (list (quote quote) x) (inc y)))) (quote (fn [x y] (list (quote println) (list x (list (quote quote) x) (inc y))))) 1))
@Jach
Copy link
Author

Jach commented Mar 16, 2012

Why is this improving? Two reasons:

  1. "Not every change is an improvement, but every improvement is necessarily a change."
  2. 2 is an improvement on 1. 3 is an improvement on 2. And so on, proof by induction over the whole numbers.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment