Use lighter boundary in collapsed vis

mnvr · mnvr · commit c26c3e3e6a0d · 2023-12-12T05:23:30.000+05:30
diff --git a/10.vis.hs b/10.vis.hs
@@ -174,6 +174,7 @@ collapse Grid { gm, gny, gnx } = Grid { gm = cm, gny = cny, gnx = cnx }
     isNotBoundary (y, x) = y > 2 && y < gny - 3 && x > 2 && x < gnx - 3
     g (y, x) m = g' (fromJust $ M.lookup (y+1, x+1) m)
     g' '?' = inside
+    g' '#' = '.'
     g' ch = ch
 
 inside :: Char
