~pmikkelsen/euler-j

7d696c5ed19d9effffc17f30fa378ad98b160ad3 — Peter Mikkelsen 1 year, 11 months ago b0f5f50
Add problem 710
1 files changed, 3 insertions(+), 0 deletions(-)

A problem710.ijs
A problem710.ijs => problem710.ijs +3 -0
@@ 0,0 1,3 @@
c=:0 0 1 0 2 1 4,1e7$0 NB. Initialized cache
t=:{{r[c=:c y}~r=:{{1e6|+`+`+`-/(2(1e6&|@^)<.-:y-6),c{~y-2 2 6 4}}y}}
problem710=:>:^:(0~:1e6|t)^:_]6