RosettaCodeData/Task/Dijkstras-algorithm/PicoLisp/dijkstras-algorithm-2.l

12 lines
193 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(neighbor 'a 'b 7)
(neighbor 'a 'c 9)
(neighbor 'a 'f 14)
(neighbor 'b 'c 10)
(neighbor 'b 'd 15)
(neighbor 'c 'd 11)
(neighbor 'c 'f 2)
(neighbor 'd 'e 6)
(neighbor 'e 'f 9)
(dijkstra 'a 'e)