diff options
Diffstat (limited to 'samples/euler/005.bruijn')
| -rw-r--r-- | samples/euler/005.bruijn | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/samples/euler/005.bruijn b/samples/euler/005.bruijn new file mode 100644 index 0000000..8455510 --- /dev/null +++ b/samples/euler/005.bruijn @@ -0,0 +1,8 @@ +:import std/Math . +:import std/List . + +solve [foldr1 lcm ({ (+1) → 0 })] + +:test ((solve (+10)) =? (+2520)) ([[1]]) + +main [solve (+20)] |