diff options
| author | Marvin Borner | 2024-04-25 20:10:51 +0200 |
|---|---|---|
| committer | Marvin Borner | 2024-04-25 20:10:51 +0200 |
| commit | 349e8574c67bf575ed39694c8085eab00473bfaa (patch) | |
| tree | ceb0e19eef420d19c62ee4e73c3f77664adccde8 /samples/rosetta/Sierpinski_triangle.bruijn | |
| parent | 51716f37faff2bb8631e7e6e51bf7e00dbb40026 (diff) | |
Rosetta sync
Diffstat (limited to 'samples/rosetta/Sierpinski_triangle.bruijn')
| -rw-r--r-- | samples/rosetta/Sierpinski_triangle.bruijn | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/samples/rosetta/Sierpinski_triangle.bruijn b/samples/rosetta/Sierpinski_triangle.bruijn new file mode 100644 index 0000000..22659d1 --- /dev/null +++ b/samples/rosetta/Sierpinski_triangle.bruijn @@ -0,0 +1,9 @@ +y [[1 (0 0)] [1 (0 0)]] + +# infinite depth +triangle [y [[0 1 [[0]] 1 1]]] + +:import std/Number . + +# limited depth +triangle-n [y [[[[1 0 [[0]] 0 0] (=?1 [[1]] (2 --1))]]] (+7)] |