OK
[69] (cons 3 nil)
(3)
[70] (define z (cons 4 (cons 3 nil))
)
Z
[71] z
(4 3)
[72] (car z)
4
[73] (cdr z)
(3)
[74] (reverse z)
(3 4)
[75] (append z z)
(4 3 4 3)
[76] (list z z)
((4 3) (4 3))
[77] (reverse (list z z))
((4 3) (4 3))
[78] (list 3 z)
(3 (4 3))
[79] (reverse (list 3 z))
((4 3) 3)
[80] (list-ref 2 '(a b c d e))

[VM ERROR encountered!] Invalid operand to VM instruction
(LIST_TAIL 2 (A B C D E))

[Inspect] Quit
[81] (list-ref '(a b c d e) 2)
C
[82] (length '(a b c (d e) f))
5
[83] (last-tail '(a b c d e))

[VM ERROR encountered!] Variable not defined in current environment
LAST-TAIL

[Inspect] Quit
[84] (last-pair '(a b c d e))
(E)
[85] (define vowels '(a e i o u))
VOWELS
[86] (member 'a vowels)
(A E I O U)
[87] (memq 'a vowels)
(A E I O U)
[88] (member? 'a vowels)

[VM ERROR encountered!] Variable not defined in current environment
MEMBER?

[Inspect] Quit
[89] (memq '(1 2) '((1 2) (3 5)))
()
[90] (assoc '(a b) '(c d))
()
[91] (assq 'a '((a 1) (b 2)))
(A 1)
[92] (assq 'c '((a 1) (b 2)))
()
[93] (assq 'c '((a 1) (b 2) (c 3)))
(C 3)
[94] (assoc 'a '((a 1) (b 2)))
(A 1)
[95] (assoc 2.7 '((2.7 2) (3.7 3)))
(2.7 2)
[96] (assq 2.7 '((2.7 2) (3.7 3)))
()
[97] vowels
(A E I O U)
[98] (reverse! vowels)
(U O I E A)
[99] vowels
(A)
[100] z
(4 3)
[101] (set-car! z 5)
(5 3)
[102] z
(5 3)
[103] (set-cdr! z '(6 7))
(5 6 7)
[104] z
(5 6 7)
[105] (append! z '(8 9))
(5 6 7 8 9)
[106] z
(5 6 7 8 9)
[107] (delete! 7 z)
(5 6 8 9)
[108] (delete! 8 (cons 8 z))
(5 6 9)
[109] z
(5 6 9)
[110] (set!-cdr (last-pair z) '())

[VM ERROR encountered!] Variable not defined in current environment
SET!-CDR

[Inspect] Quit
[111] (set-cdr! (last-pair z) '())
(9)
[112] z
(5 6 9)
[113] (set-cdr! (last-pair z) '(6))
(9 6)
[114] z
(5 6 9 6)
[115] (symbol? z)
()
[116] (symbol? 'z)
#T
[117] (explode 'abcde)
(A B C D E)
[118] (explode "abcde")
(|a| |b| |c| |d| |e|)
[119] (explode 'ABCDE)
(A B C D E)
[120] (explode "ABCDE")
(A B C D E)
[121] (implode '(A B C D E))
ABCDE
[122] (implode '(|a| |b| |c| |d| |e|))
|abcde|
[123] (gensym)
G0
[124] (gensym)
G1
[125] (gensym)
G2
[126] (gensym)
G3
[127] (gensym)
G4
[128] (gensym 'a)
A5
[129] (gensym)
A6
[130] (string->symbol "abcde")
|abcde|
[131] (string->symbol "ABCDE")
ABCDE
[132] (symbol->ascii 'a)
65
[133] (symbol->ascii 'A)
65
[134] (symbol->ascii 'abc)
65
[135] (ascii->symbol 100)
|d|
[136] (ascii->symbol 65)
A
[137] (putprop 'dog 'legs 4)
LEGS
[138] (getprop 'dog 'legs)
()
[139] (getprop 'legs 'dog)
()
[140] (getprop 'dog 4)
LEGS
[141] (putprop 'cs146a 'required 'status)
REQUIRED
[142] (getprop 'cs146a 'status)
REQUIRED
[143] (putprop 'cs146a 'easy 'difficulty)
EASY
[144] (proplist 'cs146a)
(DIFFICULTY EASY STATUS REQUIRED)
[145] (remprop 'cs146a 'difficulty)
(CS146A STATUS REQUIRED)
[146] (proplist 'cs146a)
(STATUS REQUIRED)
[147] (transcript-off)