Matt Havener matthavener

matthavener / user.clj

Created August 2, 2019 14:10

datomic isComponent

	(do
	(d/delete-database "datomic:mem://test-is-component")
	(d/create-database "datomic:mem://test-is-component")
	(let [conn (d/connect "datomic:mem://test-is-component")
	db (-> (d/transact conn [{:db/ident :dev/ref,
	:db/valueType :db.type/ref
	:db/cardinality :db.cardinality/many
	:db/isComponent true}])
	deref
	:db-after)

matthavener / devcard.cljs

Last active March 8, 2016 15:00

om.next normalization with links

	(ns testcase
	(:require
	[devcards.core :as dc :refer-macros [defcard defcard-doc defcard-om-next]]
	[om.next :as om :refer-macros [defui]]
	[cljs.test :refer-macros [is testing async]])
	)



	(defui Child

matthavener / gist:5002fcad1173c05d83aa

Created September 25, 2014 15:46

Updog FAQ

Nm what's up with you?

matthavener / gist:4c6915f9cbd399b9970d

Created June 11, 2014 15:34

utf8

ayyyy [̲̅$̲̅(̲̅ιοο̲̅)̲̅$̲̅] [̲̅$̲̅(̲̅ιοο̲̅)̲̅$̲̅] \(סּںסּَ` )/ۜ  [̲̅$̲̅(̲̅ι] monies

matthavener / gist:9766644

Created March 25, 2014 17:17

	### Keybase proof

	I hereby claim:

	* I am matthavener on github.
	* I am matthavener (https://keybase.io/matthavener) on keybase.
	* I have a public key whose fingerprint is E5D4 2BB3 6725 C534 C62C E0F2 D8FF 854B 26CD B8A6

	To claim this, I am signing this object:

matthavener / gist:2893355

Created June 8, 2012 03:22

proj euler 12

	(ns junk.core
	(:use clojure.test))

	(defn check-prime [ps candidate] (every? #(not= 0 (mod candidate %)) ps))

	(deftest check-prime-test
	(is (check-prime [2 3 5] 7))
	(is (not (check-prime [2 3 5] 6))))

	(defn next-prime [ps max] (first

matthavener / gist:2832339

Created May 30, 2012 01:34

poker kata (matt and xerik)