I'm pleased that this is as elegant as it is already, but can the 2 adverbs be defined tacitly?
first =: 1 : 'u i. 1:'
retitem =: 1 : '] {~ u'
(4<])first i.7
5
4< first i.7
5
Its nice that the adverb doesn't require a duplicate dyadic definition.
4< first >:i.7
4
4< first retitem >:i.7
5
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
