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

9 lines
254 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
tri:=File("triangle.txt").pump(List,fcn(s){ s.strip().split(" ").apply("toInt") }).copy();
while(tri.len()>1){
t0:=tri.pop();
t1:=tri.pop();
tri.append( [[(it); t1.enumerate();
'wrap([(i,t)]){ t + t0[i].max(t0[i+1]) }]])
}
tri[0][0].println();