11 lines
269 B
Text
11 lines
269 B
Text
|
start_up = proc ()
|
||
|
|
po: stream := stream$primary_output()
|
||
|
|
|
||
|
|
words: array[string] := array[string]$
|
||
|
|
["enemy", "lasagna", "robust", "below", "wax"]
|
||
|
|
|
||
|
|
for word: string in array[string]$elements(words) do
|
||
|
|
stream$putl(po, word)
|
||
|
|
end
|
||
|
|
end start_up
|