Little Schemer implementation of atom?