blob: b5ede838153c321eacc452b1450eebea0d9afb41 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
|
# TODO: digit-sum/quot-rem is still the bottleneck
:import std/Combinator .
:import std/Math .
solve (pow (+2)) → digit-sum
:test ((solve (+15)) =? (+26)) ([[1]])
main [solve (+1000)]
|
