16 lines
375 B
Text
16 lines
375 B
Text
(define S #<<
|
|
---------- 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 -----------------------
|
|
>>#)
|
|
|
|
(for-each writeln
|
|
(for/list ((line (string-split S "\n")))
|
|
(string-join (reverse (string-split line " ")) " ")))
|