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_WhiteSpare(){ ////toplevel
 577 // Base  WhiteSpare  total= 3  rowsz=2  nrows=2
 578   union(){
 579     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 580     $nspots = 1;
 581     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 582   };
 583   union(){
 584     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 585     $nspots = 2;
 586     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 587   };
 588   union(){
 589     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 590     $nspots = 3;
 591     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 592   };
 593   union(){
 594     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 595     $nspots = 4;
 596   };
 597 }
 598 module Base_Yellow(){ ////toplevel
 599 // Base  Yellow      total=29  rowsz=6  nrows=5
 600   union(){
 601     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 602     $nspots = 1;
 603     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 604     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 605     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 606     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 607     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 608     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 609     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 610     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 611     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 612     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 613     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 614     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 615     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 616   };
 617   union(){
 618     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 619     $nspots = 2;
 620     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 621     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 622     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 623     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 624     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 625     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 626   };
 627   union(){
 628     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 629     $nspots = 3;
 630   };
 631   union(){
 632     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 633     $nspots = 4;
 634     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 635     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 636     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 637     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 638     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 639     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 640     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 641     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 642     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 643     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 644   };
 645 }
 646 // Base  total_count=243   total_real_count=216
 647 // Base  max_rowsz=7       max_nrows=6
 648 module All_Black(){ ////toplevel
 649 // All  Black       total=26  rowsz=6  nrows=5
 650   union(){
 651     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 652     $nspots = 1;
 653     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 654     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 655     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 656     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 657     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 658     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 659     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 660     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 661     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 662     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 663     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 664     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 665     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 666     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 667     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 668     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 669     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 670     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 671     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 672     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 673     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 674     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 675     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 676     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 677     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 678     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 679   };
 680   union(){
 681     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 682     $nspots = 2;
 683   };
 684   union(){
 685     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 686     $nspots = 3;
 687   };
 688   union(){
 689     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 690     $nspots = 4;
 691   };
 692 }
 693 module All_Blue(){ ////toplevel
 694 // All  Blue        total=52  rowsz=8  nrows=7
 695   union(){
 696     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 697     $nspots = 1;
 698     translate(token_pitch * [  -3.5,  -3.0 ]) Token_L();
 699     translate(token_pitch * [  -3.5,  -2.0 ]) Token_L();
 700     translate(token_pitch * [  -3.5,  -1.0 ]) Token_L();
 701     translate(token_pitch * [  -3.5,   0.0 ]) Token_L();
 702     translate(token_pitch * [  -3.5,   1.0 ]) Token_L();
 703     translate(token_pitch * [  -3.5,   2.0 ]) Token_L();
 704     translate(token_pitch * [  -3.5,   3.0 ]) Token_L();
 705     translate(token_pitch * [  -2.5,  -3.0 ]) Token_L();
 706     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 707     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 708     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 709     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 710     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 711     translate(token_pitch * [  -2.5,   3.0 ]) Token_L();
 712     translate(token_pitch * [  -1.5,  -3.0 ]) Token_L();
 713     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 714     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 715     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 716     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 717     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 718     translate(token_pitch * [  -1.5,   3.0 ]) Token_L();
 719     translate(token_pitch * [  -0.5,  -3.0 ]) Token_L();
 720   };
 721   union(){
 722     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 723     $nspots = 2;
 724     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 725     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 726     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 727     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 728     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 729     translate(token_pitch * [  -0.5,   3.0 ]) Token_L();
 730     translate(token_pitch * [   0.5,  -3.0 ]) Token_L();
 731     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 732     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 733     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 734     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 735     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 736     translate(token_pitch * [   0.5,   3.0 ]) Token_L();
 737     translate(token_pitch * [   1.5,  -3.0 ]) Token_L();
 738     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 739   };
 740   union(){
 741     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 742     $nspots = 3;
 743   };
 744   union(){
 745     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 746     $nspots = 4;
 747     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 748     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 749     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 750     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 751     translate(token_pitch * [   1.5,   3.0 ]) Token_L();
 752     translate(token_pitch * [   2.5,  -3.0 ]) Token_L();
 753     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 754     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 755     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 756     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 757     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 758     translate(token_pitch * [   2.5,   3.0 ]) Token_L();
 759     translate(token_pitch * [   3.5,  -3.0 ]) Token_L();
 760     translate(token_pitch * [   3.5,  -2.0 ]) Token_L();
 761     translate(token_pitch * [   3.5,  -1.0 ]) Token_L();
 762   };
 763 }
 764 module All_Green(){ ////toplevel
 765 // All  Green       total=58  rowsz=8  nrows=8
 766   union(){
 767     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 768     $nspots = 1;
 769     translate(token_pitch * [  -3.5,  -3.5 ]) Token_L();
 770     translate(token_pitch * [  -3.5,  -2.5 ]) Token_L();
 771     translate(token_pitch * [  -3.5,  -1.5 ]) Token_L();
 772     translate(token_pitch * [  -3.5,  -0.5 ]) Token_L();
 773     translate(token_pitch * [  -3.5,   0.5 ]) Token_L();
 774     translate(token_pitch * [  -3.5,   1.5 ]) Token_L();
 775     translate(token_pitch * [  -3.5,   2.5 ]) Token_L();
 776     translate(token_pitch * [  -3.5,   3.5 ]) Token_L();
 777     translate(token_pitch * [  -2.5,  -3.5 ]) Token_L();
 778     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 779     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 780     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 781     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 782     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 783     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 784     translate(token_pitch * [  -2.5,   3.5 ]) Token_L();
 785     translate(token_pitch * [  -1.5,  -3.5 ]) Token_L();
 786     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 787     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 788     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 789     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 790     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 791     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 792     translate(token_pitch * [  -1.5,   3.5 ]) Token_L();
 793     translate(token_pitch * [  -0.5,  -3.5 ]) Token_L();
 794   };
 795   union(){
 796     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 797     $nspots = 2;
 798     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 799     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 800     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 801     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 802     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 803     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 804     translate(token_pitch * [  -0.5,   3.5 ]) Token_L();
 805     translate(token_pitch * [   0.5,  -3.5 ]) Token_L();
 806     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 807     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 808     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 809     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 810     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 811     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 812     translate(token_pitch * [   0.5,   3.5 ]) Token_L();
 813   };
 814   union(){
 815     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 816     $nspots = 3;
 817   };
 818   union(){
 819     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 820     $nspots = 4;
 821     translate(token_pitch * [   1.5,  -3.5 ]) Token_L();
 822     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 823     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 824     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 825     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 826     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 827     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 828     translate(token_pitch * [   1.5,   3.5 ]) Token_L();
 829     translate(token_pitch * [   2.5,  -3.5 ]) Token_L();
 830     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 831     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 832     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 833     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 834     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 835     translate(token_pitch * [   2.5,   2.5 ]) Token_L();
 836     translate(token_pitch * [   2.5,   3.5 ]) Token_L();
 837     translate(token_pitch * [   3.5,  -3.5 ]) Token_L();
 838     translate(token_pitch * [   3.5,  -2.5 ]) Token_L();
 839   };
 840 }
 841 module All_Orange(){ ////toplevel
 842 // All  Orange      total=32  rowsz=6  nrows=6
 843   union(){
 844     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 845     $nspots = 1;
 846     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 847     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 848     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 849     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 850     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 851     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 852     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 853     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 854     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 855     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 856     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 857     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 858     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 859     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 860     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 861     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 862     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 863     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 864     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 865     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 866     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 867     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 868     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 869     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 870     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 871     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 872     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 873     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 874     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 875     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 876     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 877     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 878   };
 879   union(){
 880     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 881     $nspots = 2;
 882   };
 883   union(){
 884     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 885     $nspots = 3;
 886   };
 887   union(){
 888     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 889     $nspots = 4;
 890   };
 891 }
 892 module All_Purple(){ ////toplevel
 893 // All  Purple      total=23  rowsz=5  nrows=5
 894   union(){
 895     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 896     $nspots = 1;
 897     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 898     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 899     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 900     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 901     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 902     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 903     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 904     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 905     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
 906     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
 907     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 908     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 909     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 910     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 911     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 912     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 913     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 914     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 915     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 916     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 917     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 918     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 919     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 920   };
 921   union(){
 922     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 923     $nspots = 2;
 924   };
 925   union(){
 926     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 927     $nspots = 3;
 928   };
 929   union(){
 930     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 931     $nspots = 4;
 932   };
 933 }
 934 module All_Red(){ ////toplevel
 935 // All  Red         total=46  rowsz=7  nrows=7
 936   union(){
 937     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 938     $nspots = 1;
 939     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
 940     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
 941     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
 942     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
 943     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
 944     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
 945     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
 946     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
 947     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 948     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 949     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 950     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 951     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 952     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
 953     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
 954     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 955     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 956     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 957   };
 958   union(){
 959     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 960     $nspots = 2;
 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 * [   0.0,  -3.0 ]) Token_L();
 965     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 966     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 967     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 968     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 969     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 970     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
 971     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
 972     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 973     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 974   };
 975   union(){
 976     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 977     $nspots = 3;
 978   };
 979   union(){
 980     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
 981     $nspots = 4;
 982     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 983     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 984     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 985     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
 986     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
 987     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 988     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 989     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 990     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
 991     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
 992     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
 993     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
 994     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
 995     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
 996     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
 997   };
 998 }
 999 module All_White(){ ////toplevel
1000 // All  White       total=43  rowsz=7  nrows=7
1001   union(){
1002     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1003     $nspots = 1;
1004     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1005     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1006     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1007     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1008     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1009     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1010     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1011     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1012     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1013     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1014     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1015     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1016     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1017     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1018     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1019     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1020     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1021     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1022     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1023     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1024     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1025     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1026     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1027     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1028     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1029     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1030   };
1031   union(){
1032     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1033     $nspots = 2;
1034     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1035     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1036     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1037     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1038     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1039     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1040     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1041     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1042     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1043     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1044     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1045   };
1046   union(){
1047     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1048     $nspots = 3;
1049     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1050     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1051     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1052     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1053     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1054     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1055   };
1056   union(){
1057     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1058     $nspots = 4;
1059   };
1060 }
1061 module All_WhiteSpare(){ ////toplevel
1062 // All  WhiteSpare  total= 3  rowsz=2  nrows=2
1063   union(){
1064     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1065     $nspots = 1;
1066     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1067   };
1068   union(){
1069     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1070     $nspots = 2;
1071     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1072   };
1073   union(){
1074     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1075     $nspots = 3;
1076     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1077   };
1078   union(){
1079     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1080     $nspots = 4;
1081   };
1082 }
1083 module All_Yellow(){ ////toplevel
1084 // All  Yellow      total=45  rowsz=7  nrows=7
1085   union(){
1086     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1087     $nspots = 1;
1088     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1089     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1090     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1091     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1092     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1093     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1094     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1095     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1096     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1097     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1098     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1099     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1100     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1101     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1102     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1103     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1104     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1105     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1106     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1107   };
1108   union(){
1109     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1110     $nspots = 2;
1111     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1112     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1113     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1114     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1115     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1116     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1117     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1118     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1119     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1120     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1121     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1122   };
1123   union(){
1124     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1125     $nspots = 3;
1126   };
1127   union(){
1128     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1129     $nspots = 4;
1130     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1131     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1132     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1133     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1134     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1135     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1136     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1137     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1138     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1139     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1140     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1141     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1142     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1143     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1144     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1145   };
1146 }
1147 // All  total_count=328   total_real_count=325
1148 // All  max_rowsz=8       max_nrows=8
1149 module Witches_Black(){ ////toplevel
1150 // Witches  Black       total= 8  rowsz=3  nrows=3
1151   union(){
1152     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1153     $nspots = 1;
1154     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1155     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1156     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1157     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1158     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1159     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1160     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1161     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1162   };
1163   union(){
1164     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1165     $nspots = 2;
1166   };
1167   union(){
1168     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1169     $nspots = 3;
1170   };
1171   union(){
1172     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1173     $nspots = 4;
1174   };
1175 }
1176 module Witches_Blue(){ ////toplevel
1177 // Witches  Blue        total=18  rowsz=5  nrows=4
1178   union(){
1179     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1180     $nspots = 1;
1181     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1182     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1183     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1184     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1185     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1186     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1187     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1188     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1189   };
1190   union(){
1191     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1192     $nspots = 2;
1193     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1194     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1195     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1196     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1197     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1198   };
1199   union(){
1200     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1201     $nspots = 3;
1202   };
1203   union(){
1204     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1205     $nspots = 4;
1206     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1207     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1208     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1209     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1210     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1211   };
1212 }
1213 module Witches_Green(){ ////toplevel
1214 // Witches  Green       total=20  rowsz=5  nrows=4
1215   union(){
1216     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1217     $nspots = 1;
1218     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1219     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1220     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1221     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1222     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1223     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1224     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1225     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1226     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1227     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1228   };
1229   union(){
1230     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1231     $nspots = 2;
1232     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1233     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1234     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1235     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1236     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1237   };
1238   union(){
1239     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1240     $nspots = 3;
1241   };
1242   union(){
1243     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1244     $nspots = 4;
1245     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1246     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1247     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1248     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1249     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1250   };
1251 }
1252 module Witches_Orange(){ ////toplevel
1253 // Witches  Orange      total=12  rowsz=4  nrows=3
1254   union(){
1255     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1256     $nspots = 1;
1257     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1258     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1259     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1260     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1261     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1262     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1263     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1264     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1265     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1266     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1267     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1268     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
1269   };
1270   union(){
1271     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1272     $nspots = 2;
1273   };
1274   union(){
1275     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1276     $nspots = 3;
1277   };
1278   union(){
1279     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1280     $nspots = 4;
1281   };
1282 }
1283 module Witches_Purple(){ ////toplevel
1284 // Witches  Purple      total= 8  rowsz=3  nrows=3
1285   union(){
1286     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1287     $nspots = 1;
1288     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1289     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1290     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1291     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1292     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1293     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1294     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1295     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1296   };
1297   union(){
1298     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1299     $nspots = 2;
1300   };
1301   union(){
1302     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1303     $nspots = 3;
1304   };
1305   union(){
1306     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1307     $nspots = 4;
1308   };
1309 }
1310 module Witches_Red(){ ////toplevel
1311 // Witches  Red         total=16  rowsz=4  nrows=4
1312   union(){
1313     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1314     $nspots = 1;
1315     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1316     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1317     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1318     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1319     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1320     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1321   };
1322   union(){
1323     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1324     $nspots = 2;
1325     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1326     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1327     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1328     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1329     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1330   };
1331   union(){
1332     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1333     $nspots = 3;
1334   };
1335   union(){
1336     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1337     $nspots = 4;
1338     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1339     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1340     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1341     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1342     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1343   };
1344 }
1345 module Witches_White(){ ////toplevel
1346 // Witches  White       total=11  rowsz=4  nrows=3
1347   union(){
1348     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1349     $nspots = 1;
1350     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1351     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1352     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1353     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1354     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1355     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1356   };
1357   union(){
1358     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1359     $nspots = 2;
1360     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1361     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1362     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1363   };
1364   union(){
1365     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1366     $nspots = 3;
1367     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1368     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1369   };
1370   union(){
1371     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1372     $nspots = 4;
1373   };
1374 }
1375 module Witches_Yellow(){ ////toplevel
1376 // Witches  Yellow      total=16  rowsz=4  nrows=4
1377   union(){
1378     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1379     $nspots = 1;
1380     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1381     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1382     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1383     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1384     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1385     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1386   };
1387   union(){
1388     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1389     $nspots = 2;
1390     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1391     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1392     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1393     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1394     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1395   };
1396   union(){
1397     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1398     $nspots = 3;
1399   };
1400   union(){
1401     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1402     $nspots = 4;
1403     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1404     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1405     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1406     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1407     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1408   };
1409 }
1410 // Witches  total_count=109   total_real_count=109
1411 // Witches  max_rowsz=5       max_nrows=4