Phrase reversals: Difference between revisions
Content added Content deleted
(Added an Algol 68 Sample) |
(Added EchoLisp) |
||
Line 429:
attesor edoc esarhp lasrever
reversal phrase code rosetta</pre>
=={{header|EchoLisp}}==
<lang scheme>
(define (string-reverse string)
(list->string (reverse (string->list string))))
(define (task str)
(for-each writeln (list
(string-reverse str)
(string-join (map string-reverse (string-split str )))
(string-join (reverse (string-split str ))))))
(task "rosetta code phrase reversal")
"lasrever esarhp edoc attesor"
"attesor edoc esarhp lasrever"
"reversal phrase code rosetta"
</lang>
=={{header|Elixir}}==
| |||