[print notes about what grin code is being shown
John Meacham <john@repetae.net>**20060420001321] hunk ./Main.hs 634
-    wdump FD.GrinInitial $ printGrin x
+    wdump FD.GrinInitial $ do
+        putErrLn "v-- Initial Grin"
+        printGrin x
+        putErrLn "^-- Initial Grin"
hunk ./Main.hs 639
-    wdump FD.GrinNormalized $ printGrin x
+    wdump FD.GrinNormalized $ do
+        putErrLn "v-- Normalized Grin"
+        printGrin x
+        putErrLn "^-- Normalized Grin"