Anonymous user
Averages/Simple moving average: Difference between revisions
→{{header|Haskell}}
Line 1,307:
=={{header|Haskell}}==
{{works with|GHC|6.10.4}}
<lang Haskell>
import Data.List
import Data.IORef
Line 1,337 ⟶ 1,335:
putStrLn $ "Next number = " ++ (show n) ++ ", SMA_3 = " ++ (show mm3) ++ ", SMA_5 = " ++ (show mm5)
)</lang>
output:
<pre>Next number = 1.0, SMA_3 = 1.0, SMA_5 = 1.0
Next number = 2.0, SMA_3 = 1.5, SMA_5 = 1.5
Next number = 3.0, SMA_3 = 2.0, SMA_5 = 2.0
Next number = 4.0, SMA_3 = 3.0, SMA_5 = 2.5
Next number = 5.0, SMA_3 = 4.0, SMA_5 = 3.0
Next number = 5.0, SMA_3 = 4.666666666666667, SMA_5 = 3.8
Next number = 4.0, SMA_3 = 4.666666666666667, SMA_5 = 4.2
Next number = 3.0, SMA_3 = 4.0, SMA_5 = 4.2
Next number = 2.0, SMA_3 = 3.0, SMA_5 = 3.8
Next number = 1.0, SMA_3 = 2.0, SMA_5 = 3.0</pre>
{{incorrect|Haskell|Takes a list of numbers rather than being called multiple times with just a number.}}
{{works with|GHC|7.6.3}}{{works with|Hugs|Septemper 2006}}
| |||