diff options
| author | Marvin Borner | 2024-03-25 16:21:54 +0100 |
|---|---|---|
| committer | Marvin Borner | 2024-03-25 16:21:54 +0100 |
| commit | f8398804d351667a7b887b89f6f70c7d5c407d22 (patch) | |
| tree | d33df8e6bbe60640beb9e99c778eb27b1aa77995 /samples/euler/009.bruijn | |
| parent | 7bfc78b122ad9cbb65eed16f7de4d4021547c2a8 (diff) | |
More samples and definitions
Diffstat (limited to 'samples/euler/009.bruijn')
| -rw-r--r-- | samples/euler/009.bruijn | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/samples/euler/009.bruijn b/samples/euler/009.bruijn index be21d9e..c789719 100644 --- a/samples/euler/009.bruijn +++ b/samples/euler/009.bruijn @@ -12,6 +12,6 @@ solve [head <#> lst] → head → tail a 1 - 0 b (+2) ⋅ 3 ⋅ 2 c 1 + 0 - lst concat-map [map [check] ({ (+1) → --0 })] ({ (+2) → (sqrt 0) }) + lst [[check] <$> ({ (+1) → --0 })] <++> ({ (+2) → (sqrt 0) }) main [solve (+1000)] |