add initial day12 solution

author: Akshay <[email protected]> 2020-12-12 06:10:35 +0000
committer: Akshay <[email protected]> 2020-12-12 06:10:35 +0000
commit: 15e54117f32d225f6a89320c0d80f45e55cc43bd (patch)
tree: 641569ae5b85bf7e6d6bf32beee217361ae7ecf0
parent: 42523f2455fb30181efc29e3a47799283b05fa80 (diff)
6 files changed, 800 insertions, 45 deletions
diff --git a/aoc.cabal b/aoc.cabal
index cd5d039..dfd102e 100644
--- a/aoc.cabal
+++ b/aoc.cabal
@@ -87,3 +87,9 @@ executable Day11
  build-depends:       base, aoc, containers
  default-language:    Haskell2010
  hs-source-dirs:      execs
+executable Day12
+  main-is:             Day12.hs
+  build-depends:       base, aoc, containers
+  default-language:    Haskell2010
+  hs-source-dirs:      execs
diff --git a/execs/Day12.hs b/execs/Day12.hs
new file mode 100644
index 0000000..72e0124
--- /dev/null
+++ b/execs/Day12.hs
@@ -0,0 +1,39 @@
+module Main where
+parseLine s = (head s, read (tail s) :: Float)
+moves ls = sum $ map (round . abs) [fx, fy]
+    where (fx, fy, _) = foldl fn (0.0, 0.0, 0.0) ls
+          fn (x, y, rot) ('N', v) = (x, y + v, rot)
+          fn (x, y, rot) ('E', v) = (x + v, y, rot)
+          fn (x, y, rot) ('W', v) = (x - v, y, rot)
+          fn (x, y, rot) ('S', v) = (x, y - v, rot)
+          fn (x, y, rot) ('R', v) = (x, y, rot - v)
+          fn (x, y, rot) ('L', v) = (x, y, rot + v)
+          fn (x, y, rot) ('F', v) = (nx, ny, rot)
+              where nx = x + v * cos (pi * rot / 180)
+                    ny = y + v*sin (pi * rot / 180)
+rotate (x, y) t = (nx, ny)
+    where nx = x*cos(pi*t/180) - y*sin(pi*t/180)
+          ny = x*sin(pi*t/180) + y*cos(pi*t/180)
+waypoint (sx, sy) ls = sum $ map (round . abs) [fx, fy]
+    where (fx, fy, _, _) = foldl fn (0.0, 0.0, sx, sy) ls
+          fn (x, y, wx, wy) ('N', v) = (x, y, wx, wy+v)
+          fn (x, y, wx, wy) ('E', v) = (x, y, wx+v, wy)
+          fn (x, y, wx, wy) ('W', v) = (x, y, wx-v, wy)
+          fn (x, y, wx, wy) ('S', v) = (x, y, wx, wy-v)
+          fn (x, y, wx, wy) ('R', v) = (x, y, nwx, nwy)
+              where p = negate v
+                    (nwx, nwy) = rotate (wx, wy) p
+          fn (x, y, wx, wy) ('L', v) = (x, y, nwx, nwy)
+              where (nwx, nwy) = rotate (wx, wy) v
+          fn (x, y, wx, wy) ('F', v) = (x+v*wx, y+v*wy, wx, wy)
+main :: IO ()
+main = do
+    n <- map parseLine . lines <$> readFile "input/12"
+    print $ moves n
+    print $ waypoint (10.0, 1.0) n
diff --git a/input/04sample b/input/04sample
deleted file mode 100644
index 81712b3..0000000
--- a/input/04sample
+++ /dev/null
@@ -1,26 +0,0 @@
-eyr:1972 cid:100
-hcl:#18171d ecl:amb hgt:170 pid:186cm iyr:2018 byr:1926
-iyr:2019
-hcl:#602927 eyr:1967 hgt:170cm
-ecl:grn pid:012533040 byr:1946
-hcl:dab227 iyr:2012
-ecl:brn hgt:182cm pid:021572410 eyr:2020 byr:1992 cid:277
-hgt:59cm ecl:zzz
-eyr:2038 hcl:74454a iyr:2023
-pid:3556412378 byr:2007
-pid:087499704 hgt:74in ecl:grn iyr:2012 eyr:2030 byr:1980
-hcl:#623a2f
-eyr:2029 ecl:blu cid:129 byr:1989
-iyr:2014 pid:896056539 hcl:#a97842 hgt:165cm
-hcl:#888785
-hgt:164cm byr:2001 iyr:2015 cid:88
-pid:545766238 ecl:hzl
-eyr:2022
-iyr:2010 hgt:158cm hcl:#b6652a ecl:blu byr:1944 eyr:2021 pid:093154719
diff --git a/input/11sample b/input/11sample
deleted file mode 100644
index 1beaede..0000000
--- a/input/11sample
+++ /dev/null
@@ -1,10 +0,0 @@
-L.LL.LL.LL
-LLLLLLL.LL
-L.L.L..L..
-LLLL.LL.LL
-L.LL.LL.LL
-L.LLLLL.LL
-..L.L.....
-LLLLLLLLLL
-L.LLLLLL.L
-L.LLLLL.LL
diff --git a/input/11sample2 b/input/11sample2
deleted file mode 100644
index a486e35..0000000
--- a/input/11sample2
+++ /dev/null
@@ -1,9 +0,0 @@
-.......#.
-...#.....
-.#.......
-.........
-..#L....#
-....#....
-.........
-#........
-...#.....
diff --git a/input/12 b/input/12
new file mode 100644
index 0000000..d7bc269
--- /dev/null
+++ b/input/12
@@ -0,0 +1,755 @@
+F93
+R90
+F81
+E3
+F80
+R90
+W4
+R90
+F64
+N1
+R90
+W4
+F11
+W1
+L180
+F28
+R90
+W4
+L180
+F95
+N3
+F71
+L90
+W1
+F1
+E2
+L90
+F85
+W3
+L90
+F28
+E3
+N5
+F47
+S2
+R90
+N2
+L90
+W4
+L180
+W3
+F51
+F77
+L90
+W5
+N5
+W3
+S5
+W5
+R180
+N1
+W3
+S5
+F36
+W1
+F34
+N4
+F40
+E2
+S3
+R90
+W5
+S2
+N4
+R90
+S2
+L90
+N4
+L90
+S2
+E1
+F2
+N4
+F65
+N1
+F46
+R180
+F60
+N4
+F45
+R90
+S3
+L90
+F70
+W4
+L270
+N4
+F49
+E3
+F52
+R180
+F5
+E5
+R90
+F43
+L90
+S4
+F54
+N1
+F7
+S2
+F91
+S4
+N3
+E3
+S4
+L180
+F15
+S2
+F90
+W5
+S2
+F80
+N4
+L90
+R90
+N4
+E2
+R180
+E5
+F62
+L90
+N5
+F77
+N5
+F75
+E2
+L90
+S4
+F55
+E1
+N5
+F57
+R90
+F6
+L90
+N3
+E5
+L180
+N2
+L270
+N5
+F8
+E2
+F88
+E3
+N3
+E4
+R90
+N1
+W5
+R90
+N4
+E3
+S3
+R90
+N1
+E2
+F4
+N4
+R90
+N3
+W5
+L180
+E1
+F2
+N4
+W5
+F80
+S4
+F7
+L180
+F96
+L90
+F16
+L90
+E4
+F78
+W2
+R90
+S3
+F29
+W4
+R90
+E4
+F39
+N1
+F48
+E4
+L180
+E1
+R180
+E2
+R90
+N3
+R180
+W2
+N5
+W5
+E3
+F25
+E1
+L180
+N5
+F44
+L90
+N4
+W4
+L90
+F72
+L90
+S1
+E5
+N5
+R90
+N1
+W3
+S5
+R90
+W1
+F14
+L90
+W2
+R90
+W3
+F76
+S5
+W5
+F93
+W4
+R90
+F57
+E3
+R90
+S3
+W1
+R90
+S3
+F8
+R90
+N2
+F46
+W4
+S1
+L90
+E4
+W5
+L90
+W2
+F69
+N5
+W5
+F80
+N3
+E4
+L90
+E4
+F25
+S3
+R180
+F77
+R90
+W2
+F19
+E4
+L180
+W2
+F37
+S2
+F68
+L90
+E2
+F66
+S1
+R90
+F66
+E2
+L180
+F97
+N3
+W4
+F43
+S4
+R180
+N1
+R270
+E3
+N2
+N3
+F65
+L90
+S2
+L90
+N3
+L90
+S3
+F23
+L270
+W3
+S5
+E2
+R90
+S1
+F85
+N3
+R90
+W4
+F58
+E1
+L90
+N3
+L90
+E2
+S1
+F14
+E2
+N5
+W1
+N3
+E1
+L90
+E3
+F43
+E3
+N3
+F21
+E4
+F53
+E2
+L180
+E4
+F20
+E2
+N2
+E5
+L90
+N4
+W3
+N4
+S2
+L90
+W3
+F96
+L90
+S3
+R90
+N1
+E3
+S5
+L270
+F41
+N5
+W5
+S1
+W5
+R90
+F79
+W3
+L90
+E3
+F22
+N1
+L90
+E2
+L90
+R90
+F20
+L90
+W3
+R90
+W2
+L180
+W4
+F57
+R180
+N3
+L90
+F36
+L90
+E2
+R90
+N2
+E3
+N1
+W4
+W4
+N3
+E5
+F54
+R180
+F98
+W1
+R90
+F21
+S1
+L90
+S2
+L90
+S2
+F90
+E4
+S2
+R90
+N5
+F25
+N4
+W3
+N2
+F27
+S3
+E3
+N3
+F15
+L180
+S4
+F62
+W2
+L180
+E2
+N2
+L90
+R90
+F97
+R90
+S1
+R90
+E2
+F16
+W2
+E1
+F89
+W1
+L180
+S3
+W2
+S3
+E1
+F92
+F30
+N1
+E2
+S1
+F76
+E1
+S5
+W5
+F28
+W4
+L90
+F44
+E4
+N5
+F25
+R90
+F59
+S4
+F58
+S2
+F19
+W5
+S4
+E5
+N3
+F37
+E1
+L90
+F40
+E5
+F56
+S2
+W5
+F73
+N5
+F2
+L90
+F18
+E2
+N5
+L90
+F56
+R90
+F18
+W1
+S5
+E1
+N1
+L90
+W2
+E4
+N4
+E1
+W4
+N4
+L90
+N3
+R90
+W5
+S5
+F2
+R180
+F96
+R90
+W3
+F26
+L90
+S4
+E2
+F43
+S2
+R90
+F61
+W5
+F93
+R90
+F95
+L90
+E4
+R90
+N4
+F47
+R90
+W5
+L90
+F42
+L90
+W5
+F87
+R90
+N1
+N2
+E4
+F64
+S5
+L270
+F86
+S4
+W3
+S1
+L90
+F72
+R270
+W1
+F17
+S1
+E2
+R90
+W1
+N1
+F42
+N5
+L90
+F87
+F66
+L90
+N2
+W2
+L90
+S5
+F7
+R90
+N4
+L270
+F2
+W1
+N4
+F94
+W5
+R180
+S4
+F15
+E4
+F76
+N1
+E2
+F68
+S3
+F50
+R270
+E5
+F77
+R90
+S3
+E2
+N3
+S4
+F39
+S1
+E5
+S3
+L90
+E4
+S2
+W3
+F54
+R90
+F44
+L90
+W3
+F59
+R90
+N3
+F37
+E1
+F75
+R90
+F31
+W3
+F70
+S5
+L90
+E1
+F67
+W4
+L90
+S1
+W5
+S1
+S4
+W2
+E2
+S3
+R90
+S2
+E5
+L90
+F43
+R90
+E1
+S5
+F42
+L90
+W1
+N2
+E1
+L180
+S4
+W1
+L90
+F81
+E1
+R180
+N5
+R180
+N5
+L180
+F65
+R90
+F64
+W4
+S4
+R90
+F70
+E1
+S1
+F50
+E2
+S4
+E4
+N2
+S1
+R90
+E4
+R90
+F70
+R90
+N4
+F71
+R180
+F80
+S3
+L90
+N5
+L180
+F11
+N1
+R90
+W2
+N1
+R90
+W4
+R90
+F67
+W3
+R90
+W5
+L90
+E4
+F90
+L90
+N4
+L180
+F48
+R90
+W2
+F94
+R90
+N4
+L90
+W2
+F2
+L90
+W1
+E5
+S2
+W5
+S5
+E2
+N3
+W5
+N1
+F98
+S3
+W3
+L90
+S3
+W4
+R90
+W1
+F64
+N5
+R90
+S5
+W5
+F84
+S1
+E3
+L90
+S3
+E5
+F6
+N4
+W1
+R90
+E4
+F14
+N1
+R90
+F31
+L90
+F24
+F4
+N4
+F54
+S3
+R270
+F98
+E1
+L180
+F2
+E4
+F70
+W1
+R180
+N5
+F23
author	Akshay <[email protected]>	2020-12-12 06:10:35 +0000
committer	Akshay <[email protected]>	2020-12-12 06:10:35 +0000
commit	15e54117f32d225f6a89320c0d80f45e55cc43bd (patch)
tree	641569ae5b85bf7e6d6bf32beee217361ae7ecf0
parent	42523f2455fb30181efc29e3a47799283b05fa80 (diff)

diff --git a/aoc.cabal b/aoc.cabal index cd5d039..dfd102e 100644 --- a/aoc.cabal +++ b/aoc.cabal
@@ -87,3 +87,9 @@ executable Day11
87	build-depends: base, aoc, containers	87	build-depends: base, aoc, containers
88	default-language: Haskell2010	88	default-language: Haskell2010
89	hs-source-dirs: execs	89	hs-source-dirs: execs
		90
		91	executable Day12
		92	main-is: Day12.hs
		93	build-depends: base, aoc, containers
		94	default-language: Haskell2010
		95	hs-source-dirs: execs


diff --git a/execs/Day12.hs b/execs/Day12.hs new file mode 100644 index 0000000..72e0124 --- /dev/null +++ b/execs/Day12.hs
@@ -0,0 +1,39 @@
		1	module Main where
		2
		3	parseLine s = (head s, read (tail s) :: Float)
		4
		5	moves ls = sum $ map (round . abs) [fx, fy]
		6	where (fx, fy, _) = foldl fn (0.0, 0.0, 0.0) ls
		7	fn (x, y, rot) ('N', v) = (x, y + v, rot)
		8	fn (x, y, rot) ('E', v) = (x + v, y, rot)
		9	fn (x, y, rot) ('W', v) = (x - v, y, rot)
		10	fn (x, y, rot) ('S', v) = (x, y - v, rot)
		11	fn (x, y, rot) ('R', v) = (x, y, rot - v)
		12	fn (x, y, rot) ('L', v) = (x, y, rot + v)
		13	fn (x, y, rot) ('F', v) = (nx, ny, rot)
		14	where nx = x + v * cos (pi * rot / 180)
		15	ny = y + vsin (pi rot / 180)
		16
		17	rotate (x, y) t = (nx, ny)
		18	where nx = xcos(pit/180) - ysin(pit/180)
		19	ny = xsin(pit/180) + ycos(pit/180)
		20
		21	waypoint (sx, sy) ls = sum $ map (round . abs) [fx, fy]
		22	where (fx, fy, _, _) = foldl fn (0.0, 0.0, sx, sy) ls
		23	fn (x, y, wx, wy) ('N', v) = (x, y, wx, wy+v)
		24	fn (x, y, wx, wy) ('E', v) = (x, y, wx+v, wy)
		25	fn (x, y, wx, wy) ('W', v) = (x, y, wx-v, wy)
		26	fn (x, y, wx, wy) ('S', v) = (x, y, wx, wy-v)
		27	fn (x, y, wx, wy) ('R', v) = (x, y, nwx, nwy)
		28	where p = negate v
		29	(nwx, nwy) = rotate (wx, wy) p
		30	fn (x, y, wx, wy) ('L', v) = (x, y, nwx, nwy)
		31	where (nwx, nwy) = rotate (wx, wy) v
		32	fn (x, y, wx, wy) ('F', v) = (x+vwx, y+vwy, wx, wy)
		33
		34
		35	main :: IO ()
		36	main = do
		37	n <- map parseLine . lines <$> readFile "input/12"
		38	print $ moves n
		39	print $ waypoint (10.0, 1.0) n


diff --git a/input/04sample b/input/04sample deleted file mode 100644 index 81712b3..0000000 --- a/input/04sample +++ /dev/null
@@ -1,26 +0,0 @@
1	eyr:1972 cid:100
2	hcl:#18171d ecl:amb hgt:170 pid:186cm iyr:2018 byr:1926
3
4	iyr:2019
5	hcl:#602927 eyr:1967 hgt:170cm
6	ecl:grn pid:012533040 byr:1946
7
8	hcl:dab227 iyr:2012
9	ecl:brn hgt:182cm pid:021572410 eyr:2020 byr:1992 cid:277
10
11	hgt:59cm ecl:zzz
12	eyr:2038 hcl:74454a iyr:2023
13	pid:3556412378 byr:2007
14
15	pid:087499704 hgt:74in ecl:grn iyr:2012 eyr:2030 byr:1980
16	hcl:#623a2f
17
18	eyr:2029 ecl:blu cid:129 byr:1989
19	iyr:2014 pid:896056539 hcl:#a97842 hgt:165cm
20
21	hcl:#888785
22	hgt:164cm byr:2001 iyr:2015 cid:88
23	pid:545766238 ecl:hzl
24	eyr:2022
25
26	iyr:2010 hgt:158cm hcl:#b6652a ecl:blu byr:1944 eyr:2021 pid:093154719


diff --git a/input/11sample b/input/11sample deleted file mode 100644 index 1beaede..0000000 --- a/input/11sample +++ /dev/null
@@ -1,10 +0,0 @@
1	L.LL.LL.LL
2	LLLLLLL.LL
3	L.L.L..L..
4	LLLL.LL.LL
5	L.LL.LL.LL
6	L.LLLLL.LL
7	..L.L.....
8	LLLLLLLLLL
9	L.LLLLLL.L
10	L.LLLLL.LL


diff --git a/input/11sample2 b/input/11sample2 deleted file mode 100644 index a486e35..0000000 --- a/input/11sample2 +++ /dev/null
@@ -1,9 +0,0 @@
1	.......#.
2	...#.....
3	.#.......
4	.........
5	..#L....#
6	....#....
7	.........
8	#........
9	...#.....


diff --git a/input/12 b/input/12 new file mode 100644 index 0000000..d7bc269 --- /dev/null +++ b/input/12
@@ -0,0 +1,755 @@
		1	F93
		2	R90
		3	F81
		4	E3
		5	F80
		6	R90
		7	W4
		8	R90
		9	F64
		10	N1
		11	R90
		12	W4
		13	F11
		14	W1
		15	L180
		16	F28
		17	R90
		18	W4
		19	L180
		20	F95
		21	N3
		22	F71
		23	L90
		24	W1
		25	F1
		26	E2
		27	L90
		28	F85
		29	W3
		30	L90
		31	F28
		32	E3
		33	N5
		34	F47
		35	S2
		36	R90
		37	N2
		38	L90
		39	W4
		40	L180
		41	W3
		42	F51
		43	F77
		44	L90
		45	W5
		46	N5
		47	W3
		48	S5
		49	W5
		50	R180
		51	N1
		52	W3
		53	S5
		54	F36
		55	W1
		56	F34
		57	N4
		58	F40
		59	E2
		60	S3
		61	R90
		62	W5
		63	S2
		64	N4
		65	R90
		66	S2
		67	L90
		68	N4
		69	L90
		70	S2
		71	E1
		72	F2
		73	N4
		74	F65
		75	N1
		76	F46
		77	R180
		78	F60
		79	N4
		80	F45
		81	R90
		82	S3
		83	L90
		84	F70
		85	W4
		86	L270
		87	N4
		88	F49
		89	E3
		90	F52
		91	R180
		92	F5
		93	E5
		94	R90
		95	F43
		96	L90
		97	S4
		98	F54
		99	N1
		100	F7
		101	S2
		102	F91
		103	S4
		104	N3
		105	E3
		106	S4
		107	L180
		108	F15
		109	S2
		110	F90
		111	W5
		112	S2
		113	F80
		114	N4
		115	L90
		116	R90
		117	N4
		118	E2
		119	R180
		120	E5
		121	F62
		122	L90
		123	N5
		124	F77
		125	N5
		126	F75
		127	E2
		128	L90
		129	S4
		130	F55
		131	E1
		132	N5
		133	F57
		134	R90
		135	F6
		136	L90
		137	N3
		138	E5
		139	L180
		140	N2
		141	L270
		142	N5
		143	F8
		144	E2
		145	F88
		146	E3
		147	N3
		148	E4
		149	R90
		150	N1
		151	W5
		152	R90
		153	N4
		154	E3
		155	S3
		156	R90
		157	N1
		158	E2
		159	F4
		160	N4
		161	R90
		162	N3
		163	W5
		164	L180
		165	E1
		166	F2
		167	N4
		168	W5
		169	F80
		170	S4
		171	F7
		172	L180
		173	F96
		174	L90
		175	F16
		176	L90
		177	E4
		178	F78
		179	W2
		180	R90
		181	S3
		182	F29
		183	W4
		184	R90
		185	E4
		186	F39
		187	N1
		188	F48
		189	E4
		190	L180
		191	E1
		192	R180
		193	E2
		194	R90
		195	N3
		196	R180
		197	W2
		198	N5
		199	W5
		200	E3
		201	F25
		202	E1
		203	L180
		204	N5
		205	F44
		206	L90
		207	N4
		208	W4
		209	L90
		210	F72
		211	L90
		212	S1
		213	E5
		214	N5
		215	R90
		216	N1
		217	W3
		218	S5
		219	R90
		220	W1
		221	F14
		222	L90
		223	W2
		224	R90
		225	W3
		226	F76
		227	S5
		228	W5
		229	F93
		230	W4
		231	R90
		232	F57
		233	E3
		234	R90
		235	S3
		236	W1
		237	R90
		238	S3
		239	F8
		240	R90
		241	N2
		242	F46
		243	W4
		244	S1
		245	L90
		246	E4
		247	W5
		248	L90
		249	W2
		250	F69
		251	N5
		252	W5
		253	F80
		254	N3
		255	E4
		256	L90
		257	E4
		258	F25
		259	S3
		260	R180
		261	F77
		262	R90
		263	W2
		264	F19
		265	E4
		266	L180
		267	W2
		268	F37
		269	S2
		270	F68
		271	L90
		272	E2
		273	F66
		274	S1
		275	R90
		276	F66
		277	E2
		278	L180
		279	F97
		280	N3
		281	W4
		282	F43
		283	S4
		284	R180
		285	N1
		286	R270
		287	E3
		288	N2
		289	N3
		290	F65
		291	L90
		292	S2
		293	L90
		294	N3
		295	L90
		296	S3
		297	F23
		298	L270
		299	W3
		300	S5
		301	E2
		302	R90
		303	S1
		304	F85
		305	N3
		306	R90
		307	W4
		308	F58
		309	E1
		310	L90
		311	N3
		312	L90
		313	E2
		314	S1
		315	F14
		316	E2
		317	N5
		318	W1
		319	N3
		320	E1
		321	L90
		322	E3
		323	F43
		324	E3
		325	N3
		326	F21
		327	E4
		328	F53
		329	E2
		330	L180
		331	E4
		332	F20
		333	E2
		334	N2
		335	E5
		336	L90
		337	N4
		338	W3
		339	N4
		340	S2
		341	L90
		342	W3
		343	F96
		344	L90
		345	S3
		346	R90
		347	N1
		348	E3
		349	S5
		350	L270
		351	F41
		352	N5
		353	W5
		354	S1
		355	W5
		356	R90
		357	F79
		358	W3
		359	L90
		360	E3
		361	F22
		362	N1
		363	L90
		364	E2
		365	L90
		366	R90
		367	F20
		368	L90
		369	W3
		370	R90
		371	W2
		372	L180
		373	W4
		374	F57
		375	R180
		376	N3
		377	L90
		378	F36
		379	L90
		380	E2
		381	R90
		382	N2
		383	E3
		384	N1
		385	W4
		386	W4
		387	N3
		388	E5
		389	F54
		390	R180
		391	F98
		392	W1
		393	R90
		394	F21
		395	S1
		396	L90
		397	S2
		398	L90
		399	S2
		400	F90
		401	E4
		402	S2
		403	R90
		404	N5
		405	F25
		406	N4
		407	W3
		408	N2
		409	F27
		410	S3
		411	E3
		412	N3
		413	F15
		414	L180
		415	S4
		416	F62
		417	W2
		418	L180
		419	E2
		420	N2
		421	L90
		422	R90
		423	F97
		424	R90
		425	S1
		426	R90
		427	E2
		428	F16
		429	W2
		430	E1
		431	F89
		432	W1
		433	L180
		434	S3
		435	W2
		436	S3
		437	E1
		438	F92
		439	F30
		440	N1
		441	E2
		442	S1
		443	F76
		444	E1
		445	S5
		446	W5
		447	F28
		448	W4
		449	L90
		450	F44
		451	E4
		452	N5
		453	F25
		454	R90
		455	F59
		456	S4
		457	F58
		458	S2
		459	F19
		460	W5
		461	S4
		462	E5
		463	N3
		464	F37
		465	E1
		466	L90
		467	F40
		468	E5
		469	F56
		470	S2
		471	W5
		472	F73
		473	N5
		474	F2
		475	L90
		476	F18
		477	E2
		478	N5
		479	L90
		480	F56
		481	R90
		482	F18
		483	W1
		484	S5
		485	E1
		486	N1
		487	L90
		488	W2
		489	E4
		490	N4
		491	E1
		492	W4
		493	N4
		494	L90
		495	N3
		496	R90
		497	W5
		498	S5
		499	F2
		500	R180
		501	F96
		502	R90
		503	W3
		504	F26
		505	L90
		506	S4
		507	E2
		508	F43
		509	S2
		510	R90
		511	F61
		512	W5
		513	F93
		514	R90
		515	F95
		516	L90
		517	E4
		518	R90
		519	N4
		520	F47
		521	R90
		522	W5
		523	L90
		524	F42
		525	L90
		526	W5
		527	F87
		528	R90
		529	N1
		530	N2
		531	E4
		532	F64
		533	S5
		534	L270
		535	F86
		536	S4
		537	W3
		538	S1
		539	L90
		540	F72
		541	R270
		542	W1
		543	F17
		544	S1
		545	E2
		546	R90
		547	W1
		548	N1
		549	F42
		550	N5
		551	L90
		552	F87
		553	F66
		554	L90
		555	N2
		556	W2
		557	L90
		558	S5
		559	F7
		560	R90
		561	N4
		562	L270
		563	F2
		564	W1
		565	N4
		566	F94
		567	W5
		568	R180
		569	S4
		570	F15
		571	E4
		572	F76
		573	N1
		574	E2
		575	F68
		576	S3
		577	F50
		578	R270
		579	E5
		580	F77
		581	R90
		582	S3
		583	E2
		584	N3
		585	S4
		586	F39
		587	S1
		588	E5
		589	S3
		590	L90
		591	E4
		592	S2
		593	W3
		594	F54
		595	R90
		596	F44
		597	L90
		598	W3
		599	F59
		600	R90
		601	N3
		602	F37
		603	E1
		604	F75
		605	R90
		606	F31
		607	W3
		608	F70
		609	S5
		610	L90
		611	E1
		612	F67
		613	W4
		614	L90
		615	S1
		616	W5
		617	S1
		618	S4
		619	W2
		620	E2
		621	S3
		622	R90
		623	S2
		624	E5
		625	L90
		626	F43
		627	R90
		628	E1
		629	S5
		630	F42
		631	L90
		632	W1
		633	N2
		634	E1
		635	L180
		636	S4
		637	W1
		638	L90
		639	F81
		640	E1
		641	R180
		642	N5
		643	R180
		644	N5
		645	L180
		646	F65
		647	R90
		648	F64
		649	W4
		650	S4
		651	R90
		652	F70
		653	E1
		654	S1
		655	F50
		656	E2
		657	S4
		658	E4
		659	N2
		660	S1
		661	R90
		662	E4
		663	R90
		664	F70
		665	R90
		666	N4
		667	F71
		668	R180
		669	F80
		670	S3
		671	L90
		672	N5
		673	L180
		674	F11
		675	N1
		676	R90
		677	W2
		678	N1
		679	R90
		680	W4
		681	R90
		682	F67
		683	W3
		684	R90
		685	W5
		686	L90
		687	E4
		688	F90
		689	L90
		690	N4
		691	L180
		692	F48
		693	R90
		694	W2
		695	F94
		696	R90
		697	N4
		698	L90
		699	W2
		700	F2
		701	L90
		702	W1
		703	E5
		704	S2
		705	W5
		706	S5
		707	E2
		708	N3
		709	W5
		710	N1
		711	F98
		712	S3
		713	W3
		714	L90
		715	S3
		716	W4
		717	R90
		718	W1
		719	F64
		720	N5
		721	R90
		722	S5
		723	W5
		724	F84
		725	S1
		726	E3
		727	L90
		728	S3
		729	E5
		730	F6
		731	N4
		732	W1
		733	R90
		734	E4
		735	F14
		736	N1
		737	R90
		738	F31
		739	L90
		740	F24
		741	F4
		742	N4
		743	F54
		744	S3
		745	R270
		746	F98
		747	E1
		748	L180
		749	F2
		750	E4
		751	F70
		752	W1
		753	R180
		754	N5
		755	F23