7 lines
85 B
PostScript
7 lines
85 B
PostScript
|
[1 2 3 4 5] 6 exch tadd
|
||
|
|
= [1 2 3 4 5 6]
|
||
|
|
uncons
|
||
|
|
= 1 [2 3 4 5 6]
|
||
|
|
[] empty?
|
||
|
|
=true
|