Project Euler 125 in J