Skip to content

Instantly share code, notes, and snippets.

@mrgnu
mrgnu / core.clj
Created September 6, 2015 10:22
2d perlin noise in clojure
(ns perlin.core
(:require [seesaw.core :as ss])
(:import [java.awt.image BufferedImage]))
(defn gray-to-rgb [g]
(int (bit-or
(bit-shift-left g 16)
(bit-shift-left g 8)
(bit-shift-left g 0))))

Keybase proof

I hereby claim:

  • I am mrgnu on github.
  • I am mrgnu (https://keybase.io/mrgnu) on keybase.
  • I have a public key ASDVpYU0KebUg8yzatS4iVYNi1dsNo2M7HsWIBeJYOkrlAo

To claim this, I am signing this object: