Skip to content

Instantly share code, notes, and snippets.

@adamdavislee
adamdavislee / dump-1481063150144.cljs
Created December 6, 2016 22:25
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
@adamdavislee
adamdavislee / dump-1481063176343.cljs
Created December 6, 2016 22:26
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
@adamdavislee
adamdavislee / dump-1481063184310.cljs
Created December 6, 2016 22:26
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
@adamdavislee
adamdavislee / dump-1481063211048.cljs
Created December 6, 2016 22:26
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
@adamdavislee
adamdavislee / dump-1481063220600.cljs
Created December 6, 2016 22:27
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
@adamdavislee
adamdavislee / dump-1481063240121.cljs
Created December 6, 2016 22:27
ClojureScript REPL dump
cljs.user=> (def foo (atom 2))
#'cljs.user/foo
cljs.user=> 1
1
(ns adamdavislee.mpd.main
(:require [neko.activity
:refer [defactivity set-content-view!]]
[neko.debug :refer [*a]]
[neko.notify
:refer [toast fire notification]]
[neko.resource :as res]
[neko.context
:refer [get-service]]
[neko.threading :refer [on-ui]]
@adamdavislee
adamdavislee / index.html
Created December 31, 2017 16:06
yin yang canvas
<canvas></canvas>
(with-test
(defn roman-numeral
[input]
(loop [input input, acc 0, ]
(if (empty? input)
acc
(let [convert {"I" 1, "V" 5, "X" 10, "L" 50, "C" 100, "D" 500, "M" 1000, }
curr-num (convert (subs input 0 1))
op (if (and (not= 1 (count input))
(< curr-num
@adamdavislee
adamdavislee / number-theory.clj
Last active October 5, 2018 23:11
Translation of the Number Theory Namespace of Racket's Math Library: https://docs.racket-lang.org/math/number-theory.html
(ns adamdavislee.math.number-theory
"This port closely mimics the naming conventions and coding style of the racket source code.
However it does not:
Define inline versions of mod+, mod*, etcetera.
TODO:
Add pre/post conditions and assertions with type checking etc.
Improve docstrings.
Finish marking internal functions as private.
Use internal memoization for some of the functions which racket uses manual bit manipulation for."
(:require [clojure.test