Thue-Morse: Difference between revisions

Content deleted Content added
Added Lua version
Robbie (talk | contribs)
Added an example for D
Line 81: Line 81:
} while( len < 60 );
} while( len < 60 );
return 0;
return 0;
}
</lang>
{{out}}
<pre>
0
01
0110
01101001
0110100110010110
01101001100101101001011001101001
0110100110010110100101100110100110010110011010010110100110010110
</pre>

=={{header|D}}==
<lang d>import std.range;
import std.stdio;

struct TM {
private char[] sequence = ['0'];
private char[] inverse = ['1'];
private char[] buffer;

enum empty = false;
auto front() {
return sequence;
}
auto popFront() {
buffer = sequence;
sequence ~= inverse;
inverse ~= buffer;
}
}

void main() {
TM sequence;

foreach (step; sequence.take(8)) {
writeln(step);
}
}
}
</lang>
</lang>