Linda, Yes, that is slick. I shortened it just a little, too.
ff=: 13 :'-/\x,(<:y)$2 _1' 100 ff 20 100 98 97 95 94 92 91 89 88 86 85 83 82 80 79 77 76 74 73 71 On Tue, Jul 14, 2015 at 9:23 AM, Linda Alvord <[email protected]> wrote: > f=: 13 :',.-/\x,(<:y)$2 _1' > 100 f 20 > 100 > 98 > 97 > -- (B=) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
