aboutsummaryrefslogtreecommitdiffhomepage
path: root/samples/euler/048.bruijn
blob: f86407fa63d115ad138d10a56a554e33e27c16f7 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
# TODO: also very slow

:import std/Combinator .
:import std/Math .

solve [∑ (+1) → 0 | [pow-mod 0 0 (+10000000000)]]

:test ((solve (+10)) =? (+405071317)) ([[1]])

main [solve (+1000)]