usando lambda en lugar de dejar en esquema

En SICP 1.2.1 hay una función que hace un número racional, como sigue:

(define (make-rat n d)
  (let ((g (gcd n d)))
    (cons (/ n g) (/ d g))))

Tengo curiosidad por saber cómo puede implementar lo mismo usando lambda en lugar de let, sin llamar a GCD dos veces. No pude resolverlo yo mismo.

Respuestas a la pregunta(4)

Su respuesta a la pregunta