$ scheme48 Welcome to Scheme 48 1.8 (made by klim on Tue Feb 17 11:32:15 CST 2009) Copyright (c) 1993-2008 by Richard Kelsey and Jonathan Rees. Please report bugs to scheme-48-bugs@s48.org. Get more information at http://www.s48.org/. Type ,? (comma question-mark) for help. > ,load sicp-2-20.scm > (same-parity 1 2 5 8 9 10) '(5 9) > (same-parity 2 8 4 1 3 4 5) '(8 4 4) > ,exit $