我有这个解释错误,我不知道出了什么问题
module Series where
series :: Double -> Double
series i1 = zipWith (/) (map (i1^)[1..]) (map(\x -> product[1..x]) [1..])
我的错误是
Couldn't match expected type `Double' with actual type `[c0]'
In the return type of a call of `zipWith'
In the expression:
zipWith
(/) (map (i1 ^) [1 .. ]) (map (\ x -> product [1 .. x]) [1 .. ])
In an equation for `series':
series i1
= zipWith
(/) (map (i1 ^) [1 .. ]) (map (\ x -> product [1 .. x]) [1 .. ])
Failed, modules loaded: none.
任何人都可以帮忙吗?提前致谢!