Tree from nesting levels: Difference between revisions
m
→{{header|J}}: slight simplification of "going further" example -- we don't care about parenthesis by themselves as much as we care about where they match
(→{{header|J}}: flesh things out a little bit) |
m (→{{header|J}}: slight simplification of "going further" example -- we don't care about parenthesis by themselves as much as we care about where they match) |
||
Line 1,147:
<lang J>pnest=: {{
t=. ;:y
p=. (;:'()')=/t
d=: +/\-/p
k=: =/p
merge d <@]^:[&.>&(k&#) t
}}</lang>
| |||