World AB-2
node# North East South West
1 nil 2 5 nil
2 nil 3 nil 1
3 nil 4 7 2
4 nil nil 8 3
5 1 6 nil nil
6 nil 7 11 5
7 3 8 nil 6
8 4 nil 13 7
9 nil 10 14 nil
10 nil nil 15 9
11 6 12 17 nil
12 nil 13 18 11
13 8 nil nil 12
14 9 15 27 nil
15 10 16 nil 14
16 nil 17 21 15
17 11 nil nil 16
18 12 19 25 nil
19 nil nil 26 18
20 nil 21 29 nil
21 16 nil 22 20
22 21 23 nil nil
23 nil nil 30 22
24 nil 25 31 nil
25 18 26 nil 24
26 19 nil nil 25
27 14 28 33 nil
28 nil 29 34 27
29 20 30 nil 28
30 23 31 36 29
31 24 32 37 30
32 nil nil 38 31
33 27 34 nil nil
34 28 35 nil 33
35 nil 36 nil 34
36 30 37 nil 35
37 31 38 nil 36
38 32 nil nil 37
(node# (north east south west))
(setf *envt*
'(
(1 (nil 2 5 nil))
(2 (nil 3 nil 1))
(3 (nil 4 7 2))
(4 (nil nil 8 3))
(5 (1 6 nil nil))
(6 (nil 7 11 5))
(7 (3 8 nil 6))
(8 (4 nil 13 7))
(9 (nil 10 14 nil))
(10 (nil nil 15 9))
(11 (6 12 17 nil))
(12 (nil 13 18 11))
(13 (8 nil nil 12))
(14 (9 15 27 nil))
(15 (10 16 nil 14))
(16 (nil 17 21 15))
(17 (11 nil nil 16))
(18 (12 19 25 nil))
(19 (nil nil 26 18))
(20 (nil 21 29 nil))
(21 (16 nil 22 20))
(22 (21 23 nil nil))
(23 (nil nil 30 22))
(24 (nil 25 31 nil))
(25 (18 26 nil 24))
(26 (19 nil nil 25))
(27 (14 28 33 nil))
(28 (nil 29 34 27))
(29 (20 30 nil 28))
(30 (23 31 36 29))
(31 (24 32 37 30))
(32 (nil nil 38 31))
(33 (27 34 nil nil))
(34 (28 35 nil 33))
(35 (nil 36 nil 34))
(36 (30 37 nil 35))
(37 (31 38 nil 36))
(38 (32 nil nil 37))
))