Calculating the value of e: Difference between revisions

Content added Content deleted
Line 2,010: Line 2,010:
<$> iterate
<$> iterate
( \(e, (i, n)) ->
( \(e, (i, n)) ->
((,) . (e +) . (1 /) <*> (succ i,)) (i * n)
(,) . (e +) . (1 /) <*> (succ i,) $ i * n
)
)
(1, (1, 1))
(1, (1, 1))