hamlet ghosthamlet

This is not intended to be comprehensive or authoritative, just free online resources I've found valuable while learning more about Erlang.

Similar lists

Instruction

Mathematics: What do grad students in math do all day?

by Yasha Berchenko-Kogan

A lot of math grad school is reading books and papers and trying to understand what's going on. The difficulty is that reading math is not like reading a mystery thriller, and it's not even like reading a history book or a New York Times article.

The main issue is that, by the time you get to the frontiers of math, the words to describe the concepts don't really exist yet. Communicating these ideas is a bit like trying to explain a vacuum cleaner to someone who has never seen one, except you're only allowed to use words that are four letters long or shorter.

What can you say?

	{-# LANGUAGE TemplateHaskell #-}

	import Control.Lens

	data Point = Point {
	_x :: Double,
	_y :: Double
	} deriving (Show)

	data Mario = Mario { _location :: Point } deriving (Show)

	;; Example implementation of Norvig's Spellchecker in Clojure,
	;; using core.async
	;;
	;; There are probably some bugs in this.
	;;
	;; Original problem: https://github.com/ericnormand/spelling-jam
	;; from Lambda Jam, Chicago, 2013: http://lambdajam.com/
	;;
	;; Clojure core.async introduction:
	;; http://clojure.com/blog/2013/06/28/clojure-core-async-channels.html

	(ns enliven.lenses
	(:refer-clojure :exclude [get put update]))

	(defprotocol Lens
	(-get [lens data])
	(-put [lens data v]))

	(defprotocol Updatable
	(-update [lens data f]))

	(ns enliven.lenses
	(:refer-clojure :exclude [get put update]))

	(defprotocol Lens
	(-get [lens data])
	(-put [lens data v]))

	(defprotocol Updatable
	(-update [lens data f]))

	; rewritten in Clojurescript from javascript (originally by Piotr Stosur: http://js1k.com/2013-spring/demo/1431)

	(ns psychedelic-animation.demo
	(:use [enchilada :only [canvas svg ctx]]
	[jayq.core :only [show hide]]
	[monet.core :only [animation-frame]]
	[monet.canvas :only [fill-style fill-rect draw-image rotate translate]]))

	(show canvas)
	(hide svg)

	(defn handle-file-select [evt]
	(.stopPropagation evt)
	(.preventDefault evt)
	(let [files (.-files (.-dataTransfer evt))]
	(dotimes [i (.-length files)]
	(let [rdr (js/FileReader.)
	the-file (aget files i)]
	(set! (.-onload rdr)
	(fn [e]
	(let [file-content (.-result (.-target e))

	(ns puzzle
	(:refer-clojure :exclude [==])
	(:use [clojure.core.logic])
	(:require [clojure.core.logic.set :as set]))

	(defn existso [q ps] (fresh [x] (featurec x ps) (membero x q)))
	(defn ruleo [q p v tp tv] (existso q {p v tp tv}))
	(defn neg-ruleo [q p v tp tv] (fresh [x] (!= x tv)) (existso q {p v tp x}))

	(defn earliero [q p v op ov]

	(ns logic-play.puzzle
	(:refer-clojure :exclude [==])
	(:use [clojure.core.logic])
	(:require [clojure.tools.macro :as mu]
	[clojure.set :as set]
	[clojure.core.logic.fd :as fd]))

	;; -----
	;; CLP(Set) Boilerplate
	(defn index [xs] (->> xs (map-indexed (fn [i x] [x (inc i)])) (into {})))