Petite Chez Scheme Version 9.5
Copyright 1984-2017 Cisco Systems, Inc.

> (define a '(2 3 4))
> a
(2 3 4)
> (define b (cons 1 a))
> b
(1 2 3 4)
> a
(2 3 4)
> (define impr (cons 1 (cons 2 3)))
> impr
(1 2 . 3)
> (list 0 impr)
(0 (1 2 . 3))
> (define impr (cons 1 (list 2 3)))
> impr
(1 2 3)
> (list 0 impr)
(0 (1 2 3))
> (define a 3)
> (list 2 a)
(2 3)
> '(2 a)
(2 a)
> (define c '(1 2 3))
> a
3
> c
(1 2 3)
> (equal? a c)
#f
> (define d '(2 3 4))
> a
3
> d
(2 3 4)
> (equal? a d)
#f
> (define e '(2 3 4))
> a
3
> d
(2 3 4)
> e
(2 3 4)
> (equal? d e)
#t
> (eq? d e)
#f
>