Anonymous user
Monads/Writer monad: Difference between revisions
m
→{{header|Nim}}
m (→{{header|Nim}}) |
m (→{{header|Nim}}) |
||
Line 664:
=={{header|Nim}}==
<lang Nim>from math import sqrt
from sugar import `=>`, `->`
type
Line 670:
WriterBind = proc(a: WriterUnit): WriterUnit
proc bindWith(f:
result = (proc(a: WriterUnit): WriterUnit =
(f(a[0]), a[1] & log)
| |||