Update exercise1-19.scm