Floyd-Warshall algorithm: Difference between revisions

← Older editNewer edit →
Content deleted Content added
m centered the figure (in the task's preamble).
Rdm (talk | contribs)
6,963 edits
J: bugfix (thanks to Danil Osipchuk)
Line 677:
 
<lang J>floydrecon=: verb define
n=. ($y)$_(|I._=,y)},($$i.@,~)#y)*1>.y->./(,y)-._
for_j. i.#y do.
d=. y <. j ({"1 +/ {) y
Retrieved from "https://rosettacode.org/wiki/Floyd-Warshall_algorithm"