my sicp solutions 1.1