X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=blobdiff_plain;f=zipper-lists-continuations.mdwn;h=581cdf4e77fe669e9cd37f512d70fea2cb29d4fe;hp=a9d0e8faa237e271f7ca44b8de76d80b5d9afaa5;hb=051c4bc23f4c1107423d50d370e15ef723187b03;hpb=449ca8e544f4f19ddfc567850014d94b6b985598 diff --git a/zipper-lists-continuations.mdwn b/zipper-lists-continuations.mdwn index a9d0e8fa..581cdf4e 100644 --- a/zipper-lists-continuations.mdwn +++ b/zipper-lists-continuations.mdwn @@ -55,7 +55,7 @@ so we have to abstract over that variable to balance the books: fun e -> f (u e) ... This types to `env -> 'b reader`, but we want to end up with `env -> -'b`. The easiest way to turn a 'b reader into a 'b is to apply it to +'b`. Once again, the easiest way to turn a `'b reader` into a `'b` is to apply it to an environment. So we end up as follows: r_bind (u:'a reader) (f:'a -> 'b reader):('b reader) = f (u e) e