From: Chris Barker Date: Sun, 28 Nov 2010 03:35:55 +0000 (-0500) Subject: edits X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?p=lambda.git;a=commitdiff_plain;h=3f6acf2fe4a06afd2da601e360c86c906e1b7182;hp=fc2cec698d708b9baab616cbedfbd4481c4057cd edits --- diff --git a/zipper-lists-continuations.mdwn b/zipper-lists-continuations.mdwn index 4aef298a..8858a893 100644 --- a/zipper-lists-continuations.mdwn +++ b/zipper-lists-continuations.mdwn @@ -561,13 +561,13 @@ _|__ _|__ Notice that we've counted each internal node twice---it's a good -excerice to adjust the code to count each node once. +exercise to adjust the code to count each node once. One more revealing example before getting down to business: replacing `state` everywhere in `treemonadizer` with `list` gives us
-# treemonadizer (fun x -> [[x; square x]]) t1;;
+# treemonadizer (fun x -> [ [x; square x] ]) t1;;
 - : int list tree list =
 [Node
   (Node (Leaf [2; 4], Leaf [3; 9]),