And... yet another variant -- this one presumably requiring less space for large problems than my previous efforts:
>4 :'({:x)`:6^:(>{.x)y'&.>/(2 3 (4 :'<x;y')"0 (1&+)`(+%:@|)),<5
15.0766
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
