I wrote: > bits=: &.((64#2)&#:) > rot =: |.!.0 > > nikitin=:3 :0 > t=. y ~:bits y *:bits y-1 > b=. t + y > b +.bits _2&rot bits (b ~:bits y) <[EMAIL PROTECTED] t > )
But and is *. not *: -- fixing that fixes my implementation. -- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
