Maximum triangle path sum: Difference between revisions

→‎{{header|Perl 6}}: add FP version
(→‎{{header|Perl 6}}: some explanation of zip semantics)
(→‎{{header|Perl 6}}: add FP version)
Line 69:
{{out}}
<pre>1320</pre>
Here's a more FPish version with the same output.
<lang perl6>sub infix:<op>(@a,@b) { (@a Zmax @a.rotate) Z+ @b }
 
say [op] slurp("triangle.txt").lines.reverse.map: { [.words] }</lang>
 
=={{header|Python}}==
Anonymous user