X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=advent02.hs;fp=advent02.hs;h=99df10c23390948b8ff3adaf72c3493a3796f041;hb=f5a48c6a7560298b0eebcd7c47d7edc0506bddb2;hp=25b78c82c3108f98434a7e34fc36526ce9df91fb;hpb=b1d663fdda2262036e9580b326e7e1b1d058b8d8;p=advent-of-code-16.git

diff --git a/advent02.hs b/advent02.hs
index 25b78c8..99df10c 100644
--- a/advent02.hs
+++ b/advent02.hs
@@ -4,11 +4,11 @@ import Data.Array.IArray
 type Position = (Int, Int)
 type Keyboard = Array Position Char
 
-kb1 = [['x', 'x', 'x', 'x', 'x'], 
-       ['x', '1', '2', '3', 'x'], 
-       ['x', '4', '5', '6', 'x'],
-       ['x', '7', '8', '9', 'x'],
-       ['x', 'x', 'x', 'x', 'x']]
+kb1 = ["xxxxx", 
+       "x123x", 
+       "x456x",
+       "x789x",
+       "xxxxx"]
 
 kb2 = ["xxxxxxx",
        "xxx1xxx",