My sicp homework