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