Thinking about it more:

           gu2      =.  1 : '(u/~ u/\@:((u/$~0) , |.))~'

Notice the 3 mentions of  u/  . 

           ...
           bron3   =.  + gu2 f.
           ...

          set     alg      time    space  
         ------ -------- -------- ------- 
                                          
                bron0        2.04    1.50 
                bron1        6.54    2.15 
                bron2        1.20    1.00 
         small  bron3        1.00    1.00 
                jackson0     8.11    2.85 
                oleg0        1.25    1.15 
                phil0        3.50    1.65 
                reboss0      2.67    2.30 
                                          
                bron0       18.61    3.50 
                bron1     2565.77  300.23 
                bron2        1.11    1.00 
         medium bron3        1.00    1.00 
                jackson0   128.28    1.54 
                oleg0        4.46    1.55 
                phil0      802.51    7.10 
                reboss0     25.79   13.02 
                                          
                bron0       21.89    2.79 
                bron1    28505.46 2205.21 
                bron2        1.00    1.00 
         large  bron3        4.25    1.00 
                jackson0   126.57    1.41 
                oleg0        4.54    1.60 
                phil0     9924.61    4.84 
                reboss0     50.79    9.17 
                                          
-Dan

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to