RosettaCodeData/Task/Nested-function/J/nested-function-1.j

11 lines
183 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
MakeList=: dyad define
sep_MakeList_=: x
cnt_MakeList_=: 0
;MakeItem each y
)
MakeItem=: verb define
cnt_MakeList_=: cnt_MakeList_+1
(":cnt_MakeList_),sep_MakeList_,y,LF
)