解の例を発見。以下。 (define (make-rat n d) (let ((g ((if (< d 0) - +) (gcd n d)))) (cons (/ n g) (/ d g))))

現実トウヒがてら、ざくっと掘削したメモとか帰宅後に掘削したメモとか。

問題 2.1 の以前の回答を確認してみたら大ウソ。これは無いなぁ。