• + 0 comments

    ex :: Double -> Double

    ex x = sum [x^n / fromIntegral (product [1..n]) | n <- [0..] :: [Int]]