Update SchemeChap1.scm

This is my first pull request on this project.