diff options
Diffstat (limited to 'samples/euler/063.bruijn')
-rw-r--r-- | samples/euler/063.bruijn | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/samples/euler/063.bruijn b/samples/euler/063.bruijn new file mode 100644 index 0000000..eb54a65 --- /dev/null +++ b/samples/euler/063.bruijn @@ -0,0 +1,5 @@ +:import std/Combinator . +:import std/Math . +:import std/List . + +main [∑([y [[0 =? ++(log (+10) (2 ** 0)) (1 ++0) --0]] (+1)] <$> ({ (+1) → (+9) }))] |