17 lines
390 B
Text
17 lines
390 B
Text
constant test="""
|
|
---------- Ice and Fire ------------
|
|
|
|
fire, in end will world the say Some
|
|
ice. in say Some
|
|
desire of tasted I've what From
|
|
fire. favor who those with hold I
|
|
|
|
... elided paragraph last ...
|
|
|
|
Frost Robert -----------------------
|
|
"""
|
|
sequence lines = split(test,'\n')
|
|
for i=1 to length(lines) do
|
|
lines[i] = join(reverse(split(lines[i])))
|
|
end for
|
|
puts(1,join(lines,"\n"))
|