Thue-Morse: Difference between revisions

Content added Content deleted
(→‎{{header|Perl 6}}: Added Perl 6 solution)
No edit summary
Line 16: Line 16:
=={{header|SQL}}==
=={{header|SQL}}==
This example is using SQLite.
This example is using SQLite.
<lang SQL>with recursive a(a) as (select '0' union all select replace(replace(hex(a),30,'01'),31,'10') from a) select * from a;</lang>
<lang SQL>with recursive a(a) as (select '0' union all select replace(replace(hex(a),'30','01'),'31','10') from a) select * from a;</lang>


=={{header|zkl}}==
=={{header|zkl}}==