Skip to content

Instantly share code, notes, and snippets.

View foobar27's full-sized avatar

Sébastien Wagener foobar27

View GitHub Profile
@foobar27
foobar27 / edit_dist.clj
Created May 23, 2012 21:23
Clojure Dynamic Programming DSL
(defn fib [n]
(dynamic [n]
0 0
1 1
n (let-recur [a (- n 1)
b (- n 2)]
(+ a b))))
(defn edit-distance [s1 s2]
(dynamic [(.length s1) (.length s2)]