add sicp-1-30.ss