Adding my reusable scheme code from the little schemer