Anonymous user
Thue-Morse: Difference between revisions
no edit summary
No edit summary |
|||
Line 868:
6 : 0110100110010110100101100110100110010110011010010110100110010110
</pre>
=={{header|Lambdatalk}}==
<lang scheme>
{def thue_morse
{def thue_morse.r
{lambda {:steps :s1 :s2 :i}
{if {> :i :steps}
then :s1
else {thue_morse.r :steps :s1:s2 :s2:s1 {+ :i 1}}}}}
{lambda {:steps}
{thue_morse.r :steps 0 1 1}}}
-> thue_morse
{thue_morse 6}
-> 0110100110010110100101100110100110010110011010010110100110010110
</lang>
=={{header|Lua}}==
| |||