aboutsummaryrefslogtreecommitdiffhomepage
path: root/samples/euler/007.bruijn
blob: 6d054513f63e1c96dedaf28290350f009861291a (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
# TODO: Write faster primes function

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

solve dec → (\index primes)

:test ((solve (+6)) =? (+13)) ([[1]])

main [solve (+10001)]