diff options
Diffstat (limited to 'SICP')
| -rw-r--r-- | SICP/ch2_2_2.scm | 1 | ||||
| -rw-r--r-- | SICP/tmp.scm | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/SICP/ch2_2_2.scm b/SICP/ch2_2_2.scm index ca83c07..fbcf46d 100644 --- a/SICP/ch2_2_2.scm +++ b/SICP/ch2_2_2.scm @@ -28,6 +28,7 @@ (car (cdr (car (cdr (car (cdr (car (cdr (car (cdr (car (cdr (list 1 (list 2 (list 3 (list 4 (list 5 (list 6 7)))))))))))))))))) ;; Exercise 2.26 +(define z (list 1 1 1)) (define x (list 1 2 3)) (define y (list 4 5 6)) diff --git a/SICP/tmp.scm b/SICP/tmp.scm index ca83c07..9bcc810 100644 --- a/SICP/tmp.scm +++ b/SICP/tmp.scm @@ -32,7 +32,7 @@ (define y (list 4 5 6)) (append x y) -(car (car (cons x y))) +(car (car (cons x y) )) (car (car (list x y))) (car (cdr (cons x y))) |