Tarjan: Difference between revisions

Content added Content deleted
Line 628: Line 628:


<syntaxhighlight lang=J>tarjan=: {{
<syntaxhighlight lang=J>tarjan=: {{
coerase ([ cocurrent) cocreate'' NB. following =: declarations are temporary, expiring when we finish
cocurrent temp=. cocreate''
coerase temp
graph=: y NB. connection matrix of a directed graph
graph=: y NB. connection matrix of a directed graph
result=: stack=: i.index=: 0
result=: stack=: i.index=: 0