Mercurial > rlm
diff src/rlm/routing.clj @ 0:78a630e650d2
initial import
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 18 Oct 2011 00:57:08 -0700 |
parents | |
children |
line wrap: on
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/src/rlm/routing.clj Tue Oct 18 00:57:08 2011 -0700 1.3 @@ -0,0 +1,70 @@ 1.4 +(ns rlm.routing) 1.5 + 1.6 +(def nums 1.7 + [[6395 3356 3 ] 1.8 + [6395 3356 3 ] 1.9 + [1224 22335 11537 10578 3 ] 1.10 + [6461 3356 3 ] 1.11 + [2497 3356 3 ] 1.12 + [4513 3356 3 ] 1.13 + [3549 174 16631 3 3 3 ] 1.14 + [8001 1784 10578 3 ] 1.15 + [4513 3356 3 ] 1.16 + [4513 3356 3 ] 1.17 + [4513 3356 3 ] 1.18 + [11537 10578 3 ] 1.19 + [4181 174 174 174 16631 3 3 3 ] 1.20 + [5459 2649 174 174 174 16631 3 3 3 ] 1.21 + [5459 2649 174 174 174 16631 3 3 3 ] 1.22 + [4181 174 174 174 16631 3 3 3 ] 1.23 + [3277 8482 29281 702 701 3356 3 ] 1.24 + [6079 10578 3 ] 1.25 + [6079 10578 3 ] 1.26 + [2914 174 16631 3 3 3 ] 1.27 + [10764 11537 10578 3 ] 1.28 + [8434 3257 3356 3 ] 1.29 + [1668 3356 3 ] 1.30 + [3561 3356 3 ] 1.31 + [174 16631 3 3 3 ] 1.32 + [174 16631 3 3 3 ] 1.33 + [14608 19029 3356 3 ] 1.34 + [2497 3356 3 ] 1.35 + [3356 3 ] 1.36 + [5056 1239 3356 3 ] 1.37 + [7911 3356 3 ] 1.38 + [6453 3356 3 ] 1.39 + [3356 3 ] 1.40 + [9942 16631 174 174 174 16631 3 3 3 ] 1.41 + [3257 3356 3 ] 1.42 + [6939 3356 3 ] 1.43 + [6539 174 16631 3 3 3 ] 1.44 + [6939 3356 3 ] 1.45 + [3292 3356 3 ] 1.46 + [2828 174 16631 3 3 3 ] 1.47 + [6453 3356 3 ] 1.48 + [11608 6461 3356 3 ] 1.49 + [8075 174 16631 3 3 3 ] 1.50 + [2914 174 16631 3 3 3 ] 1.51 + [293 11537 10578 3 ] 1.52 + [3333 3356 3 ] 1.53 + [6395 3356 3 ] 1.54 + [11537 10578 3 ] 1.55 + [7911 3356 3 ] 1.56 + [2905 701 3356 3 ] 1.57 + [852 174 16631 3 3 3 ] 1.58 + [286 209 3356 3 ] 1.59 + [12956 174 16631 3 3 3 ] 1.60 + [3303 3356 3 ] 1.61 + [1299 3356 3 ] 1.62 + [852 174 16631 3 3 3 ] 1.63 + [3356 3 ] 1.64 + [267 2914 174 16631 3 3 3 ] 1.65 + [2493 3602 174 16631 3 3 3 ] 1.66 + [5511 3356 3 ] 1.67 + [1221 4637 3356 3 ] 1.68 + [7018 3356 3 ] 1.69 + [1239 3356 3 ]]) 1.70 + 1.71 +(set (map first (map (partial take-last 2) nums) )) 1.72 + 1.73 +;; returns #{3 10578 3356}