Как вычислить функцию синуса в Haskell? ⇐ C++

[Anonymous]

Мне нужна функция Haskell, которая вычисляет приближение синуса некоторого числа, используя соответствующий ряд Тейлора.
На C++ я написал это:

Код: Выделить всё

double msin(double number, int counter = 0, double sum = 0)
{
// sin(x) = x - (x'3 / 3!) + (x'5 / 5!) - (x'7 / 7!) + (x'9 / 9!)
if (counter  Int -> Double -> Double
msin number counter sum = if counter  Int -> Double -> Double
msin number counter sum = if counter 
[b]P.S.[/b] Я новичок в Haskell, поэтому постарайтесь объяснить свое решение как можно подробнее. Я читал несколько руководств и тому подобное, но не могу найти, как сохранить результат некоторого выражения в значении, а затем продолжить работу с другим кодом после него. Он просто возвращает мое значение каждый раз, когда я пытаюсь это сделать, а я этого не хочу.
 

Подробнее здесь: [url]https://stackoverflow.com/questions/26576296/how-to-calculate-the-sine-function-in-haskell[/url]