A tiny Norvig-style scheme in Erlang, because I was bored