ex 1.31 by vvalkyrie
Merge branch 'master' of https://github.com/lisp-korea/sicp2014