Testing Roger's rotational duplicate finder:
ts=:6!:2 , 7!:2@]
$x=.odo 8#8
16777216 8
ts 't0=.llr0 x'
37.0263 2.14749e9
ts 't1=.llr1 x'
26.6041 2.14749e9
ts 't3=.llr3 x'
34.1857 1.28849e10
ts 't2=.llr2 x'
|out of memory: llr2
| (c*i.n){}."1/:~(c#i.n),.((n*c)$i.c) |."_1 c#y
ts=:6!:2 , 7!:2@]
Fairly lengthy runtimes for 8 integers. It looks like that for more than
8-10 elements we'll need a more efficient algorithm.
Skip Cave
Cave Consulting LLC
> bout J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
