Ric, Yes, I am using the latest version. Your corner is better. Perhaps my expectations for game length were over optimistic.
Thanks, again, corner=: monad define while. _1 ~: 18!:0 grd do. Start=. Grid__grd right__grd '' down__grd '' if. Grid__grd -: Start do. NB. see if right/down didn't do anything up__grd '' end. Count =: Count + 1 if. Count >: y do. break. end. NB. This is just a failsafe end. ) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
