blob: 83e93fe876fe866d8d695924d1207b095fb21c4b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
|
# printf 10 | bruijn thue-morse.bruijn
# using tromp's solution, prints thue morse sequence
:import std/Combinator .
:import std/Logic .
:import std/String .
main [take (string→number 0) tm]
xpd z [[[[0 2 [0 [[5 0 1]] (2 4)]]]]]
tm z [xpd true (0 false)]
|