Ex2.36.scm