diff options
Diffstat (limited to 'samples/fun/thue-morse.bruijn')
| -rw-r--r-- | samples/fun/thue-morse.bruijn | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/samples/fun/thue-morse.bruijn b/samples/fun/thue-morse.bruijn new file mode 100644 index 0000000..3f40e01 --- /dev/null +++ b/samples/fun/thue-morse.bruijn @@ -0,0 +1,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 (number! 0) tm] + xpd z [[[[0 2 [0 [[5 0 1]] (2 4)]]]]] + tm z [xpd true (0 false)] |