Fivenum: Difference between revisions
m
→{{header|Haskell}}: Reduced one `<$>` to a `.`
m (→{{header|Haskell}}: Applied hindent, to meet the Rosetta Code 80 char width limit) |
m (→{{header|Haskell}}: Reduced one `<$>` to a `.`) |
||
Line 608:
fivenum xs
| l >= 5 =
(* 0.5) . ((+)
[1, q, succ l / 2, succ l - q, l]
| otherwise = s
|