Minimum Spanning Tree by leonid

m={};A.sb{|a|v a./.l}.e{|z|c,d=z./.m{|i|m[i]||[i]};s"#{d==(c|=d).e{|i|m[i]=c}??F:?T} "+z}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top