Ex2.48.scm