aboutsummaryrefslogtreecommitdiffhomepage
path: root/samples/euler/005.bruijn
blob: 845551070bf9b7a378aea7249ad86a72b6d637d7 (plain) (blame)
1
2
3
4
5
6
7
8
:import std/Math .
:import std/List .

solve [foldr1 lcm ({ (+1) → 0 })]

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

main [solve (+20)]