Dijkstra's algorithm: Difference between revisions

Content added Content deleted
m (→‎{{header|Wren}}: Minor tidy)
m (→‎{{header|J}}: deal with a(n unused) case more concisely)
Line 4,172: Line 4,172:
NB. verbs and adverb
NB. verbs and adverb
parse_table=: ;:@:(LF&= [;._2 -.&CR)
parse_table=: ;:@:(LF&= [;._2 -.&CR)
mp=: $:~ :(+/ .*) NB. matrix product
mp=: +/ .*~~ NB. matrix product
min=: <./ NB. minimum
min=: <./ NB. minimum
Index=: (i.`)(`:6) NB. Index adverb
Index=: (i.`)(`:6) NB. Index adverb