1 2
problem73 =. #(#~(1%3)&<*.(1%2)&>) ~.;{{y%~({.+i.@>:@-~/)<.y%3 2}} each >:i.12000x NB. Runs for about 30 minutes :)