projects
/
advent-of-code-16.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Tidied kb1 definition
[advent-of-code-16.git]
/
advent02.hs
diff --git
a/advent02.hs
b/advent02.hs
index 25b78c82c3108f98434a7e34fc36526ce9df91fb..99df10c23390948b8ff3adaf72c3493a3796f041 100644
(file)
--- a/
advent02.hs
+++ b/
advent02.hs
@@
-4,11
+4,11
@@
import Data.Array.IArray
type Position = (Int, Int)
type Keyboard = Array Position Char
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",
kb2 = ["xxxxxxx",
"xxx1xxx",