|
|
|
logo.lput :x :y
Definition:
to logo.lput :x :y if set? :y [ local "n make "n word "y.# (setmax :y) + 1 make :n :x output :y ] [ if (list? :y) or (word? :y) or (number? :y) [ if list? :x [ output se :y (list :x) ] [ output se :y :x ] ] [ error "'Wrong input to LPUT' ] ] end |
|
|
|