>
> gppt D
>
> with
> flim=:100>{:
>
> gives me
>
> 15 8 17 <--------------
> 35 12 37
> 63 16 65
>
> as does:
>
> }. }: dot&D^:flim^:a: mada
> 15 8 17
> 35 12 37
> 63 16 65
>
>
But I have to admit that I misinterpreted the method (did not read
it careful enough). So my implementation doesn't produce all ppt's. Every U,
A and D is only fed with its predecessor. As far as I can see now you
will have to:
p ip U, p ip A, p ip D
with p is {3,4,5}
and then
(p ip U) ip U,
(p ip U) ip A
(p ip U) ip D
(p ip A) ip U,
(p ip A) ip A
(p ip A) ip D
etc..
... and that's what I read in Raul's:
ip=:+/ .*
ptgen=:(] , ip&U, ip&A, ip&D)
ptgen^:2 ,:3 4 5
Thanks for the insight.
@@i=arie
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
