quacks-ingredients-counts.scad

   1 //  autogenerated - do not edit
   2 //   update script is quacks-ingredients-updates-levels
   3 //   source is quacks-ingredients-counts
   4 module Base_1xFour(){ ////toplevel
   5 // Base  1xFour      total= 1  rowsz=1  nrows=1
   6   union(){
   7     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
   8     $nspots = 1;
   9   };
  10   union(){
  11     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  12     $nspots = 2;
  13   };
  14   union(){
  15     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  16     $nspots = 3;
  17   };
  18   union(){
  19     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  20     $nspots = 4;
  21     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  22   };
  23 }
  24 module Base_1xOne(){ ////toplevel
  25 // Base  1xOne       total= 1  rowsz=1  nrows=1
  26   union(){
  27     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  28     $nspots = 1;
  29     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  30   };
  31   union(){
  32     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  33     $nspots = 2;
  34   };
  35   union(){
  36     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  37     $nspots = 3;
  38   };
  39   union(){
  40     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  41     $nspots = 4;
  42   };
  43 }
  44 module Base_1xThree(){ ////toplevel
  45 // Base  1xThree     total= 1  rowsz=1  nrows=1
  46   union(){
  47     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  48     $nspots = 1;
  49   };
  50   union(){
  51     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  52     $nspots = 2;
  53   };
  54   union(){
  55     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  56     $nspots = 3;
  57     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  58   };
  59   union(){
  60     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  61     $nspots = 4;
  62   };
  63 }
  64 module Base_1xTwo(){ ////toplevel
  65 // Base  1xTwo       total= 1  rowsz=1  nrows=1
  66   union(){
  67     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  68     $nspots = 1;
  69   };
  70   union(){
  71     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  72     $nspots = 2;
  73     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  74   };
  75   union(){
  76     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  77     $nspots = 3;
  78   };
  79   union(){
  80     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  81     $nspots = 4;
  82   };
  83 }
  84 module Base_2xFour(){ ////toplevel
  85 // Base  2xFour      total= 2  rowsz=2  nrows=1
  86   union(){
  87     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
  88     $nspots = 1;
  89   };
  90   union(){
  91     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
  92     $nspots = 2;
  93   };
  94   union(){
  95     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
  96     $nspots = 3;
  97   };
  98   union(){
  99     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 100     $nspots = 4;
 101     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 102     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 103   };
 104 }
 105 module Base_2xOne(){ ////toplevel
 106 // Base  2xOne       total= 2  rowsz=2  nrows=1
 107   union(){
 108     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 109     $nspots = 1;
 110     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 111     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 112   };
 113   union(){
 114     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 115     $nspots = 2;
 116   };
 117   union(){
 118     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 119     $nspots = 3;
 120   };
 121   union(){
 122     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 123     $nspots = 4;
 124   };
 125 }
 126 module Base_2xThree(){ ////toplevel
 127 // Base  2xThree     total= 2  rowsz=2  nrows=1
 128   union(){
 129     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 130     $nspots = 1;
 131   };
 132   union(){
 133     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 134     $nspots = 2;
 135   };
 136   union(){
 137     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 138     $nspots = 3;
 139     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 140     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 141   };
 142   union(){
 143     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 144     $nspots = 4;
 145   };
 146 }
 147 module Base_2xTwo(){ ////toplevel
 148 // Base  2xTwo       total= 2  rowsz=2  nrows=1
 149   union(){
 150     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 151     $nspots = 1;
 152   };
 153   union(){
 154     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 155     $nspots = 2;
 156     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 157     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 158   };
 159   union(){
 160     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 161     $nspots = 3;
 162   };
 163   union(){
 164     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 165     $nspots = 4;
 166   };
 167 }
 168 module Base_3xFour(){ ////toplevel
 169 // Base  3xFour      total= 3  rowsz=2  nrows=2
 170   union(){
 171     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 172     $nspots = 1;
 173   };
 174   union(){
 175     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 176     $nspots = 2;
 177   };
 178   union(){
 179     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 180     $nspots = 3;
 181   };
 182   union(){
 183     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 184     $nspots = 4;
 185     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 186     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 187     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 188   };
 189 }
 190 module Base_3xOne(){ ////toplevel
 191 // Base  3xOne       total= 3  rowsz=2  nrows=2
 192   union(){
 193     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 194     $nspots = 1;
 195     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 196     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 197     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 198   };
 199   union(){
 200     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 201     $nspots = 2;
 202   };
 203   union(){
 204     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 205     $nspots = 3;
 206   };
 207   union(){
 208     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 209     $nspots = 4;
 210   };
 211 }
 212 module Base_3xThree(){ ////toplevel
 213 // Base  3xThree     total= 3  rowsz=2  nrows=2
 214   union(){
 215     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 216     $nspots = 1;
 217   };
 218   union(){
 219     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 220     $nspots = 2;
 221   };
 222   union(){
 223     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 224     $nspots = 3;
 225     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 226     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 227     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 228   };
 229   union(){
 230     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 231     $nspots = 4;
 232   };
 233 }
 234 module Base_3xTwo(){ ////toplevel
 235 // Base  3xTwo       total= 3  rowsz=2  nrows=2
 236   union(){
 237     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 238     $nspots = 1;
 239   };
 240   union(){
 241     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 242     $nspots = 2;
 243     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 244     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 245     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 246   };
 247   union(){
 248     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 249     $nspots = 3;
 250   };
 251   union(){
 252     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 253     $nspots = 4;
 254   };
 255 }
 256 module Base_Black(){ ////toplevel
 257 // Base  Black       total=18  rowsz=5  nrows=4
 258   union(){
 259     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 260     $nspots = 1;
 261     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 262     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 263     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 264     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 265     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 266     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 267     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 268     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 269     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 270     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 271     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 272     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 273     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 274     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 275     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 276     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 277     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 278     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 279   };
 280   union(){
 281     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 282     $nspots = 2;
 283   };
 284   union(){
 285     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 286     $nspots = 3;
 287   };
 288   union(){
 289     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 290     $nspots = 4;
 291   };
 292 }
 293 module Base_Blue(){ ////toplevel
 294 // Base  Blue        total=34  rowsz=6  nrows=6
 295   union(){
 296     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 297     $nspots = 1;
 298     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 299     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 300     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 301     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 302     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 303     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 304     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 305     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 306     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 307     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 308     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 309     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 310     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 311     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 312   };
 313   union(){
 314     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 315     $nspots = 2;
 316     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 317     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 318     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 319     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 320     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 321     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 322     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 323     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 324     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 325     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 326   };
 327   union(){
 328     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 329     $nspots = 3;
 330   };
 331   union(){
 332     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 333     $nspots = 4;
 334     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 335     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 336     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 337     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 338     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 339     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 340     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 341     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 342     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 343     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 344   };
 345 }
 346 module Base_Green(){ ////toplevel
 347 // Base  Green       total=38  rowsz=7  nrows=6
 348   union(){
 349     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 350     $nspots = 1;
 351     translate(token_pitch * [  -3.0,  -2.5 ]) Token_L();
 352     translate(token_pitch * [  -3.0,  -1.5 ]) Token_L();
 353     translate(token_pitch * [  -3.0,  -0.5 ]) Token_L();
 354     translate(token_pitch * [  -3.0,   0.5 ]) Token_L();
 355     translate(token_pitch * [  -3.0,   1.5 ]) Token_L();
 356     translate(token_pitch * [  -3.0,   2.5 ]) Token_L();
 357     translate(token_pitch * [  -2.0,  -2.5 ]) Token_L();
 358     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 359     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 360     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 361     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 362     translate(token_pitch * [  -2.0,   2.5 ]) Token_L();
 363     translate(token_pitch * [  -1.0,  -2.5 ]) Token_L();
 364     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 365     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 366   };
 367   union(){
 368     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 369     $nspots = 2;
 370     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 371     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 372     translate(token_pitch * [  -1.0,   2.5 ]) Token_L();
 373     translate(token_pitch * [   0.0,  -2.5 ]) Token_L();
 374     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 375     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 376     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 377     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 378     translate(token_pitch * [   0.0,   2.5 ]) Token_L();
 379     translate(token_pitch * [   1.0,  -2.5 ]) Token_L();
 380   };
 381   union(){
 382     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 383     $nspots = 3;
 384   };
 385   union(){
 386     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 387     $nspots = 4;
 388     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 389     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 390     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 391     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 392     translate(token_pitch * [   1.0,   2.5 ]) Token_L();
 393     translate(token_pitch * [   2.0,  -2.5 ]) Token_L();
 394     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 395     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 396     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 397     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 398     translate(token_pitch * [   2.0,   2.5 ]) Token_L();
 399     translate(token_pitch * [   3.0,  -2.5 ]) Token_L();
 400     translate(token_pitch * [   3.0,  -1.5 ]) Token_L();
 401   };
 402 }
 403 module Base_Orange(){ ////toplevel
 404 // Base  Orange      total=20  rowsz=5  nrows=4
 405   union(){
 406     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 407     $nspots = 1;
 408     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 409     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 410     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 411     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 412     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 413     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 414     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 415     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 416     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 417     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 418     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 419     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 420     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 421     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 422     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 423     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 424     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 425     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 426     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 427     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 428   };
 429   union(){
 430     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 431     $nspots = 2;
 432   };
 433   union(){
 434     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 435     $nspots = 3;
 436   };
 437   union(){
 438     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 439     $nspots = 4;
 440   };
 441 }
 442 module Base_Purple(){ ////toplevel
 443 // Base  Purple      total=15  rowsz=4  nrows=4
 444   union(){
 445     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 446     $nspots = 1;
 447     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 448     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 449     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 450     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 451     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 452     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 453     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 454     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 455     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 456     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 457     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 458     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 459     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 460     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 461     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 462   };
 463   union(){
 464     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 465     $nspots = 2;
 466   };
 467   union(){
 468     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 469     $nspots = 3;
 470   };
 471   union(){
 472     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 473     $nspots = 4;
 474   };
 475 }
 476 module Base_Red(){ ////toplevel
 477 // Base  Red         total=30  rowsz=6  nrows=5
 478   union(){
 479     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 480     $nspots = 1;
 481     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 482     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 483     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 484     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 485     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 486     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 487     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 488     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 489     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 490     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 491     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 492     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 493   };
 494   union(){
 495     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 496     $nspots = 2;
 497     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 498     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 499     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 500     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 501     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 502     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 503     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 504     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 505   };
 506   union(){
 507     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 508     $nspots = 3;
 509   };
 510   union(){
 511     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 512     $nspots = 4;
 513     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 514     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 515     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 516     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 517     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 518     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 519     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 520     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 521     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 522     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 523   };
 524 }
 525 module Base_White(){ ////toplevel
 526 // Base  White       total=32  rowsz=6  nrows=6
 527   union(){
 528     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 529     $nspots = 1;
 530     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 531     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 532     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 533     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 534     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 535     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 536     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 537     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 538     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 539     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 540     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 541     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 542     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 543     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 544     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 545     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 546     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 547     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 548     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 549     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 550   };
 551   union(){
 552     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 553     $nspots = 2;
 554     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 555     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 556     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 557     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 558     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 559     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 560     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 561     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 562   };
 563   union(){
 564     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 565     $nspots = 3;
 566     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 567     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 568     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 569     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 570   };
 571   union(){
 572     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 573     $nspots = 4;
 574   };
 575 }
 576 module Base_Yellow(){ ////toplevel
 577 // Base  Yellow      total=29  rowsz=6  nrows=5
 578   union(){
 579     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 580     $nspots = 1;
 581     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 582     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 583     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 584     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 585     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 586     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 587     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 588     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 589     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 590     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 591     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 592     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 593     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 594   };
 595   union(){
 596     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 597     $nspots = 2;
 598     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 599     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 600     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 601     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 602     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 603     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 604   };
 605   union(){
 606     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 607     $nspots = 3;
 608   };
 609   union(){
 610     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 611     $nspots = 4;
 612     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 613     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 614     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 615     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 616     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 617     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 618     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 619     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 620     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 621     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 622   };
 623 }
 624 // Base  total_count=240   total_real_count=216
 625 // Base  max_rowsz=7       max_nrows=6
 626 module All_Black(){ ////toplevel
 627 // All  Black       total=26  rowsz=6  nrows=5
 628   union(){
 629     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 630     $nspots = 1;
 631     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 632     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 633     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 634     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 635     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 636     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 637     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 638     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 639     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 640     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 641     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 642     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 643     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 644     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 645     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 646     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 647     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 648     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 649     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 650     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 651     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 652     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 653     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 654     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 655     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 656     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 657   };
 658   union(){
 659     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 660     $nspots = 2;
 661   };
 662   union(){
 663     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 664     $nspots = 3;
 665   };
 666   union(){
 667     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 668     $nspots = 4;
 669   };
 670 }
 671 module All_Blue(){ ////toplevel
 672 // All  Blue        total=52  rowsz=8  nrows=7
 673   union(){
 674     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 675     $nspots = 1;
 676     translate(token_pitch * [  -3.5,  -3.0 ]) Token_L();
 677     translate(token_pitch * [  -3.5,  -2.0 ]) Token_L();
 678     translate(token_pitch * [  -3.5,  -1.0 ]) Token_L();
 679     translate(token_pitch * [  -3.5,   0.0 ]) Token_L();
 680     translate(token_pitch * [  -3.5,   1.0 ]) Token_L();
 681     translate(token_pitch * [  -3.5,   2.0 ]) Token_L();
 682     translate(token_pitch * [  -3.5,   3.0 ]) Token_L();
 683     translate(token_pitch * [  -2.5,  -3.0 ]) Token_L();
 684     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 685     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 686     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 687     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 688     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 689     translate(token_pitch * [  -2.5,   3.0 ]) Token_L();
 690     translate(token_pitch * [  -1.5,  -3.0 ]) Token_L();
 691     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 692     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 693     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 694     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 695     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 696     translate(token_pitch * [  -1.5,   3.0 ]) Token_L();
 697     translate(token_pitch * [  -0.5,  -3.0 ]) Token_L();
 698   };
 699   union(){
 700     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 701     $nspots = 2;
 702     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 703     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 704     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 705     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 706     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 707     translate(token_pitch * [  -0.5,   3.0 ]) Token_L();
 708     translate(token_pitch * [   0.5,  -3.0 ]) Token_L();
 709     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 710     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 711     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 712     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 713     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 714     translate(token_pitch * [   0.5,   3.0 ]) Token_L();
 715     translate(token_pitch * [   1.5,  -3.0 ]) Token_L();
 716     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 717   };
 718   union(){
 719     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 720     $nspots = 3;
 721   };
 722   union(){
 723     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 724     $nspots = 4;
 725     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 726     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 727     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 728     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 729     translate(token_pitch * [   1.5,   3.0 ]) Token_L();
 730     translate(token_pitch * [   2.5,  -3.0 ]) Token_L();
 731     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 732     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 733     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 734     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 735     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 736     translate(token_pitch * [   2.5,   3.0 ]) Token_L();
 737     translate(token_pitch * [   3.5,  -3.0 ]) Token_L();
 738     translate(token_pitch * [   3.5,  -2.0 ]) Token_L();
 739     translate(token_pitch * [   3.5,  -1.0 ]) Token_L();
 740   };
 741 }
 742 module All_Green(){ ////toplevel
 743 // All  Green       total=58  rowsz=8  nrows=8
 744   union(){
 745     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 746     $nspots = 1;
 747     translate(token_pitch * [  -3.5,  -3.5 ]) Token_L();
 748     translate(token_pitch * [  -3.5,  -2.5 ]) Token_L();
 749     translate(token_pitch * [  -3.5,  -1.5 ]) Token_L();
 750     translate(token_pitch * [  -3.5,  -0.5 ]) Token_L();
 751     translate(token_pitch * [  -3.5,   0.5 ]) Token_L();
 752     translate(token_pitch * [  -3.5,   1.5 ]) Token_L();
 753     translate(token_pitch * [  -3.5,   2.5 ]) Token_L();
 754     translate(token_pitch * [  -3.5,   3.5 ]) Token_L();
 755     translate(token_pitch * [  -2.5,  -3.5 ]) Token_L();
 756     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 757     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 758     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 759     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 760     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 761     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 762     translate(token_pitch * [  -2.5,   3.5 ]) Token_L();
 763     translate(token_pitch * [  -1.5,  -3.5 ]) Token_L();
 764     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 765     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 766     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 767     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 768     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 769     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 770     translate(token_pitch * [  -1.5,   3.5 ]) Token_L();
 771     translate(token_pitch * [  -0.5,  -3.5 ]) Token_L();
 772   };
 773   union(){
 774     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 775     $nspots = 2;
 776     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 777     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 778     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 779     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 780     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 781     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 782     translate(token_pitch * [  -0.5,   3.5 ]) Token_L();
 783     translate(token_pitch * [   0.5,  -3.5 ]) Token_L();
 784     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 785     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 786     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 787     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 788     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 789     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 790     translate(token_pitch * [   0.5,   3.5 ]) Token_L();
 791   };
 792   union(){
 793     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 794     $nspots = 3;
 795   };
 796   union(){
 797     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 798     $nspots = 4;
 799     translate(token_pitch * [   1.5,  -3.5 ]) Token_L();
 800     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 801     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 802     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 803     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 804     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 805     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 806     translate(token_pitch * [   1.5,   3.5 ]) Token_L();
 807     translate(token_pitch * [   2.5,  -3.5 ]) Token_L();
 808     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 809     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 810     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 811     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 812     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 813     translate(token_pitch * [   2.5,   2.5 ]) Token_L();
 814     translate(token_pitch * [   2.5,   3.5 ]) Token_L();
 815     translate(token_pitch * [   3.5,  -3.5 ]) Token_L();
 816     translate(token_pitch * [   3.5,  -2.5 ]) Token_L();
 817   };
 818 }
 819 module All_Orange(){ ////toplevel
 820 // All  Orange      total=32  rowsz=6  nrows=6
 821   union(){
 822     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 823     $nspots = 1;
 824     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 825     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 826     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 827     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 828     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 829     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 830     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 831     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 832     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 833     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 834     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 835     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 836     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 837     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 838     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 839     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 840     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 841     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 842     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 843     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 844     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 845     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 846     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 847     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 848     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 849     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 850     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 851     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 852     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 853     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 854     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 855     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 856   };
 857   union(){
 858     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 859     $nspots = 2;
 860   };
 861   union(){
 862     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 863     $nspots = 3;
 864   };
 865   union(){
 866     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 867     $nspots = 4;
 868   };
 869 }
 870 module All_Purple(){ ////toplevel
 871 // All  Purple      total=23  rowsz=5  nrows=5
 872   union(){
 873     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 874     $nspots = 1;
 875     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 876     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 877     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 878     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 879     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 880     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 881     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 882     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 883     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
 884     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
 885     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 886     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 887     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 888     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 889     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 890     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 891     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 892     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 893     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 894     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 895     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 896     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 897     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 898   };
 899   union(){
 900     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 901     $nspots = 2;
 902   };
 903   union(){
 904     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 905     $nspots = 3;
 906   };
 907   union(){
 908     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 909     $nspots = 4;
 910   };
 911 }
 912 module All_Red(){ ////toplevel
 913 // All  Red         total=46  rowsz=7  nrows=7
 914   union(){
 915     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 916     $nspots = 1;
 917     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
 918     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
 919     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
 920     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
 921     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
 922     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
 923     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
 924     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
 925     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 926     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 927     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 928     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 929     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 930     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
 931     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
 932     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 933     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 934     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 935   };
 936   union(){
 937     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 938     $nspots = 2;
 939     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
 940     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
 941     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
 942     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
 943     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 944     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 945     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 946     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 947     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 948     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
 949     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
 950     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 951     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 952   };
 953   union(){
 954     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 955     $nspots = 3;
 956   };
 957   union(){
 958     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 959     $nspots = 4;
 960     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 961     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 962     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 963     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
 964     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
 965     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 966     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 967     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 968     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
 969     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
 970     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
 971     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
 972     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
 973     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
 974     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
 975   };
 976 }
 977 module All_White(){ ////toplevel
 978 // All  White       total=43  rowsz=7  nrows=7
 979   union(){
 980     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 981     $nspots = 1;
 982     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
 983     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
 984     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
 985     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
 986     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
 987     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
 988     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
 989     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
 990     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 991     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 992     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 993     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 994     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 995     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
 996     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
 997     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 998     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 999     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1000     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1001     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1002     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1003     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1004     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1005     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1006     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1007     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1008   };
1009   union(){
1010     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1011     $nspots = 2;
1012     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1013     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1014     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1015     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1016     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1017     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1018     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1019     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1020     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1021     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1022     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1023   };
1024   union(){
1025     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1026     $nspots = 3;
1027     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1028     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1029     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1030     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1031     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1032     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1033   };
1034   union(){
1035     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1036     $nspots = 4;
1037   };
1038 }
1039 module All_Yellow(){ ////toplevel
1040 // All  Yellow      total=45  rowsz=7  nrows=7
1041   union(){
1042     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1043     $nspots = 1;
1044     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1045     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1046     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1047     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1048     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1049     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1050     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1051     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1052     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1053     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1054     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1055     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1056     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1057     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1058     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1059     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1060     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1061     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1062     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1063   };
1064   union(){
1065     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1066     $nspots = 2;
1067     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1068     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1069     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1070     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1071     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1072     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1073     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1074     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1075     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1076     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1077     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1078   };
1079   union(){
1080     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1081     $nspots = 3;
1082   };
1083   union(){
1084     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1085     $nspots = 4;
1086     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1087     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1088     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1089     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1090     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1091     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1092     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1093     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1094     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1095     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1096     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1097     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1098     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1099     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1100     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1101   };
1102 }
1103 // All  total_count=325   total_real_count=325
1104 // All  max_rowsz=8       max_nrows=8
1105 module Witches_Black(){ ////toplevel
1106 // Witches  Black       total= 8  rowsz=3  nrows=3
1107   union(){
1108     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1109     $nspots = 1;
1110     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1111     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1112     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1113     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1114     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1115     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1116     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1117     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1118   };
1119   union(){
1120     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1121     $nspots = 2;
1122   };
1123   union(){
1124     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1125     $nspots = 3;
1126   };
1127   union(){
1128     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1129     $nspots = 4;
1130   };
1131 }
1132 module Witches_Blue(){ ////toplevel
1133 // Witches  Blue        total=18  rowsz=5  nrows=4
1134   union(){
1135     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1136     $nspots = 1;
1137     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1138     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1139     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1140     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1141     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1142     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1143     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1144     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1145   };
1146   union(){
1147     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1148     $nspots = 2;
1149     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1150     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1151     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1152     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1153     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1154   };
1155   union(){
1156     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1157     $nspots = 3;
1158   };
1159   union(){
1160     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1161     $nspots = 4;
1162     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1163     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1164     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1165     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1166     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1167   };
1168 }
1169 module Witches_Green(){ ////toplevel
1170 // Witches  Green       total=20  rowsz=5  nrows=4
1171   union(){
1172     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1173     $nspots = 1;
1174     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1175     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1176     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1177     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1178     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1179     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1180     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1181     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1182     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1183     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1184   };
1185   union(){
1186     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1187     $nspots = 2;
1188     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1189     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1190     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1191     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1192     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1193   };
1194   union(){
1195     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1196     $nspots = 3;
1197   };
1198   union(){
1199     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1200     $nspots = 4;
1201     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1202     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1203     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1204     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1205     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1206   };
1207 }
1208 module Witches_Orange(){ ////toplevel
1209 // Witches  Orange      total=12  rowsz=4  nrows=3
1210   union(){
1211     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1212     $nspots = 1;
1213     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1214     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1215     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1216     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1217     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1218     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1219     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1220     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1221     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1222     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1223     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1224     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
1225   };
1226   union(){
1227     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1228     $nspots = 2;
1229   };
1230   union(){
1231     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1232     $nspots = 3;
1233   };
1234   union(){
1235     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1236     $nspots = 4;
1237   };
1238 }
1239 module Witches_Purple(){ ////toplevel
1240 // Witches  Purple      total= 8  rowsz=3  nrows=3
1241   union(){
1242     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1243     $nspots = 1;
1244     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1245     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1246     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1247     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1248     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1249     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1250     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1251     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1252   };
1253   union(){
1254     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1255     $nspots = 2;
1256   };
1257   union(){
1258     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1259     $nspots = 3;
1260   };
1261   union(){
1262     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1263     $nspots = 4;
1264   };
1265 }
1266 module Witches_Red(){ ////toplevel
1267 // Witches  Red         total=16  rowsz=4  nrows=4
1268   union(){
1269     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1270     $nspots = 1;
1271     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1272     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1273     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1274     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1275     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1276     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1277   };
1278   union(){
1279     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1280     $nspots = 2;
1281     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1282     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1283     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1284     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1285     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1286   };
1287   union(){
1288     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1289     $nspots = 3;
1290   };
1291   union(){
1292     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1293     $nspots = 4;
1294     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1295     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1296     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1297     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1298     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1299   };
1300 }
1301 module Witches_White(){ ////toplevel
1302 // Witches  White       total=11  rowsz=4  nrows=3
1303   union(){
1304     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1305     $nspots = 1;
1306     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1307     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1308     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1309     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1310     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1311     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1312   };
1313   union(){
1314     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1315     $nspots = 2;
1316     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1317     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1318     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1319   };
1320   union(){
1321     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1322     $nspots = 3;
1323     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1324     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1325   };
1326   union(){
1327     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1328     $nspots = 4;
1329   };
1330 }
1331 module Witches_Yellow(){ ////toplevel
1332 // Witches  Yellow      total=16  rowsz=4  nrows=4
1333   union(){
1334     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1335     $nspots = 1;
1336     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1337     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1338     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1339     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1340     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1341     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1342   };
1343   union(){
1344     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1345     $nspots = 2;
1346     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1347     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1348     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1349     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1350     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1351   };
1352   union(){
1353     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1354     $nspots = 3;
1355   };
1356   union(){
1357     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1358     $nspots = 4;
1359     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1360     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1361     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1362     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1363     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1364   };
1365 }
1366 // Witches  total_count=109   total_real_count=109
1367 // Witches  max_rowsz=5       max_nrows=4