problem21.ijs - euler-j - Project euler in j

summary refs log tree commit diff

path: root/problem21.ijs

blob: 3f86261aa7d008340fd2856a863e4f616baf250b (plain) (blame)

d =. [:+/i.#~0=i.|]
a =. (]=d&d)*.]~:d
nums =. i.10000
problem21 =: +/nums#~a"0 nums