7 lines
113 B
Text
7 lines
113 B
Text
|
(in "objects.dat"
|
||
|
|
(putl (setq A (box (rd))) (rd))
|
||
|
|
(putl (setq B (box (rd))) (rd)) )
|
||
|
|
|
||
|
|
(print> A)
|
||
|
|
(print> B)
|