rot =: +.@((* j./)~ *)~
Using Raul's approach, this is rot =: (**)~&.(+.inv) Henry Rich On 2/16/2016 6:09 PM, Raul Miller wrote:
Ah, yes, as Michal's implementation shows, there is a more concise approach.
Mine becomes:
rot=: (% |)~&.(+.inv)
Thanks,
---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
