Skip to content

Instantly share code, notes, and snippets.

@mvcds
mvcds / yo.clj
Created November 14, 2019 20:28 — forked from vijaykiran/yo.clj
(ns adoc.core
(:require [clojure.string :as str]))
(defn parse-name [room]
(let [parsed (str/split room #"-")
name (drop-last parsed)
sector-checksum (str/split (last parsed) #"\[")
sector (first sector-checksum)
checksum (str/replace (last sector-checksum) "]" "")]
{:room-name name
@mvcds
mvcds / forkme.clj
Last active August 15, 2019 04:22 — forked from skuro/forkme.clj
Nonograms dojo
;; fork me and include your solution!
(ns nonograms.core
(:require [clojure.java.io :as io])
(:import (javax.imageio ImageIO)
(java.awt.image BufferedImage)
(java.awt Image)))
(defn read-image
"Reads an image"
[path]
@mvcds
mvcds / chess.clj
Last active July 17, 2019 19:13 — forked from skuro/README.md
Clojure meetup #115
(ns chess.core
(:require
[clojure.set])
)
(def pieces #{ \K \Q \N \B \R })
(def row-mapping
{\1 1 \2 2 \3 3 \4 4 \5 5 \6 6 \7 7 \8 8}
@mvcds
mvcds / introrx.md
Created February 13, 2018 13:37 — forked from staltz/introrx.md
The introduction to Reactive Programming you've been missing