RosettaCodeData/Task/Look-and-say-sequence/D/look-and-say-sequence-1.d
2014-01-17 05:34:36 +00:00

7 lines
195 B
D

import std.stdio, std.algorithm, std.range;
enum say = (in string s) pure => s.group.map!q{ text(a[1],a[0]) }.join;
void main() {
"1".recurrence!((t, n) => t[n - 1].say).take(8).writeln;
}