Thanks to all!

I've selected the following workaround:

a=: 1 : 0
:
  '`self realu'=. u
  if. 1 < # y do.
    x self (}. y)
  else.
    x realu y
  end.
)

v=: v`+ a

Test:
   7 v 1 2 3
10

-- 
Best regards
Igor
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to