Нарисуйте диаграммы окружений

Нарисуйте диаграммы окружений, изображающие выполнение последовательности выражений

(define x (cons 1 2))
(define z (cons x x))
(set-car! (cdr z) 17)
(car x)
17

с помощью вышеприведенной процедурной реализации пар. (Сравните с упражнением 3.11.)

---