JVERSION
Engine: j901/j64/windows
Beta-l: commercial/2019-09-28T16:53:31
Library: 9.01.09
Qt IDE: 1.8.3/5.12.3
Platform: Win 64
Installer: J901 install
foo=: 4 : 0
'x0 x1'=. x
z=. (<"0 x0) ,. (x1 # i.#x1)</.y
(<@]^:[&>/)"1 z
)
foo
+-+-+--------------------------------+
|4|:|'x0 x1'=. x |
| | |z=. (<"0 x0) ,. (x1 # i.#x1)</.y|
| | |(<@]^:[&>/)"1 z |
+-+-+--------------------------------+
(1 2 3 2 3 1,:2 1 3 2 1 3) foo i.12
It worked 10 years ago.
R.E. Boss
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm