RosettaCodeData/Task/Odd-word-problem/FALSE/odd-word-problem.false
2023-07-01 13:44:08 -04:00

4 lines
260 B
Text

[$$$$'.=\',=|\';=|\':=|~[^s;!\,]?]s: {recursive reading}
[s;!$'.=~[,^f;!]?]r: {reverse words}
[[$$$$'.=\',=|\';=|\':=|~][,^]#$'.=~[,^r;!]?]f: {forward words}
^f;!, {start}