MIT 6.001 code in scheme