Water collected between towers: Difference between revisions

m
→‎{{header|Tailspin}}: Use scalars for arithmetic
m (→‎{{header|Tailspin}}: Use scalars for arithmetic)
Line 3,370:
<lang tailspin>
templates histogramWater
$ -> \( @: 0"1";
[$... -> { leftMax: $ -> #, value: ($)"1" } ] !
when <$@..> do @: $; $ !
otherwise $@ !
\) -> \( @: { rightMax: 0"1", sum: 0"1" };
$(last..1:-1)... -> #
$@.sum !
Line 3,383:
\) !
end histogramWater
 
[[1, 5, 3, 7, 2],
[5, 3, 7, 2, 6, 4, 5, 9, 1, 2],
Anonymous user