Ex2.55.scm