RosettaCodeData/Task/Averages-Arithmetic-mean/Haskell/averages-arithmetic-mean-2.hs

3 lines
82 B
Haskell
Raw Permalink Normal View History

2013-04-10 14:58:50 -07:00
meanReals :: (Real a, Fractional b) => [a] -> b
meanReals = mean . map realToFrac