RosettaCodeData/Task/Maximum-triangle-path-sum/Zkl/maximum-triangle-path-sum-2.zkl

5 lines
201 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
data:=File("triangle.txt").pump(List,fcn(s){ s.strip().split(" ").apply("toInt") });
fcn f(x,y,z){ x + y.max(z) }
fcn g(xs,ys){ Utils.zipWith(f,ys,xs,xs[1,*]); }
data.reverse().reduce(g)[0].println();