day11: minor show instance update

2022-12-11 19:03:28 +01:00 · 2022-12-11 19:03:28 +01:00 · 0d644e8fc0
parent 2721636c9e
commit 0d644e8fc0
1 changed files with 3 additions and 2 deletions
--- a/2022/day11/day11.hs
+++ b/2022/day11/day11.hs
@ -27,10 +27,11 @@ instance Show Monkey where
    show (c 1) ++
    ", 2 -> " ++
    show (c 2) ++
-    "\n  Test: <<function>>" ++
+    "\n  Test: divisible by " ++
+    show d ++
    "\n   If true: throw to monkey " ++
    show e ++
-    "\n    If false: throw to monkey " ++
+    "\n   If false: throw to monkey " ++
    show f ++ "\nThis monkey has inspected " ++ show g ++ " items.\n"

 main :: IO ()