3 lines
126 B
Haskell
3 lines
126 B
Haskell
|
sampleSum = sample <||> (mkRow ["SUM"] <==> mkColumn sums)
|
||
|
|
where sums = map (show . sum) (read <$$> drop 1 (values sample))
|