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 = 0;
   9   };
  10   union(){
  11     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  12     $nspots = 1;
  13   };
  14   union(){
  15     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  16     $nspots = 2;
  17   };
  18   union(){
  19     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  20     $nspots = 3;
  21   };
  22   union(){
  23     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  24     $nspots = 4;
  25     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  26   };
  27 }
  28 module Base_1xOne(){ ////toplevel
  29 // Base  1xOne       total= 1  rowsz=1  nrows=1
  30   union(){
  31     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  32     $nspots = 0;
  33   };
  34   union(){
  35     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  36     $nspots = 1;
  37     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  38   };
  39   union(){
  40     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  41     $nspots = 2;
  42   };
  43   union(){
  44     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  45     $nspots = 3;
  46   };
  47   union(){
  48     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  49     $nspots = 4;
  50   };
  51 }
  52 module Base_1xThree(){ ////toplevel
  53 // Base  1xThree     total= 1  rowsz=1  nrows=1
  54   union(){
  55     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  56     $nspots = 0;
  57   };
  58   union(){
  59     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  60     $nspots = 1;
  61   };
  62   union(){
  63     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  64     $nspots = 2;
  65   };
  66   union(){
  67     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  68     $nspots = 3;
  69     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  70   };
  71   union(){
  72     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  73     $nspots = 4;
  74   };
  75 }
  76 module Base_1xTwo(){ ////toplevel
  77 // Base  1xTwo       total= 1  rowsz=1  nrows=1
  78   union(){
  79     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  80     $nspots = 0;
  81   };
  82   union(){
  83     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  84     $nspots = 1;
  85   };
  86   union(){
  87     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  88     $nspots = 2;
  89     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  90   };
  91   union(){
  92     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  93     $nspots = 3;
  94   };
  95   union(){
  96     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  97     $nspots = 4;
  98   };
  99 }
 100 module Base_2xFour(){ ////toplevel
 101 // Base  2xFour      total= 2  rowsz=2  nrows=1
 102   union(){
 103     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 104     $nspots = 0;
 105   };
 106   union(){
 107     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 108     $nspots = 1;
 109   };
 110   union(){
 111     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 112     $nspots = 2;
 113   };
 114   union(){
 115     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 116     $nspots = 3;
 117   };
 118   union(){
 119     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 120     $nspots = 4;
 121     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 122     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 123   };
 124 }
 125 module Base_2xOne(){ ////toplevel
 126 // Base  2xOne       total= 2  rowsz=2  nrows=1
 127   union(){
 128     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 129     $nspots = 0;
 130   };
 131   union(){
 132     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 133     $nspots = 1;
 134     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 135     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 136   };
 137   union(){
 138     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 139     $nspots = 2;
 140   };
 141   union(){
 142     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 143     $nspots = 3;
 144   };
 145   union(){
 146     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 147     $nspots = 4;
 148   };
 149 }
 150 module Base_2xThree(){ ////toplevel
 151 // Base  2xThree     total= 2  rowsz=2  nrows=1
 152   union(){
 153     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 154     $nspots = 0;
 155   };
 156   union(){
 157     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 158     $nspots = 1;
 159   };
 160   union(){
 161     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 162     $nspots = 2;
 163   };
 164   union(){
 165     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 166     $nspots = 3;
 167     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 168     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 169   };
 170   union(){
 171     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 172     $nspots = 4;
 173   };
 174 }
 175 module Base_2xTwo(){ ////toplevel
 176 // Base  2xTwo       total= 2  rowsz=2  nrows=1
 177   union(){
 178     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 179     $nspots = 0;
 180   };
 181   union(){
 182     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 183     $nspots = 1;
 184   };
 185   union(){
 186     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 187     $nspots = 2;
 188     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 189     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 190   };
 191   union(){
 192     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 193     $nspots = 3;
 194   };
 195   union(){
 196     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 197     $nspots = 4;
 198   };
 199 }
 200 module Base_3xFour(){ ////toplevel
 201 // Base  3xFour      total= 3  rowsz=2  nrows=2
 202   union(){
 203     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 204     $nspots = 0;
 205   };
 206   union(){
 207     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 208     $nspots = 1;
 209   };
 210   union(){
 211     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 212     $nspots = 2;
 213   };
 214   union(){
 215     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 216     $nspots = 3;
 217   };
 218   union(){
 219     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 220     $nspots = 4;
 221     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 222     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 223     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 224   };
 225 }
 226 module Base_3xOne(){ ////toplevel
 227 // Base  3xOne       total= 3  rowsz=2  nrows=2
 228   union(){
 229     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 230     $nspots = 0;
 231   };
 232   union(){
 233     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 234     $nspots = 1;
 235     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 236     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 237     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 238   };
 239   union(){
 240     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 241     $nspots = 2;
 242   };
 243   union(){
 244     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 245     $nspots = 3;
 246   };
 247   union(){
 248     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 249     $nspots = 4;
 250   };
 251 }
 252 module Base_3xThree(){ ////toplevel
 253 // Base  3xThree     total= 3  rowsz=2  nrows=2
 254   union(){
 255     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 256     $nspots = 0;
 257   };
 258   union(){
 259     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 260     $nspots = 1;
 261   };
 262   union(){
 263     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 264     $nspots = 2;
 265   };
 266   union(){
 267     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 268     $nspots = 3;
 269     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 270     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 271     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 272   };
 273   union(){
 274     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 275     $nspots = 4;
 276   };
 277 }
 278 module Base_3xTwo(){ ////toplevel
 279 // Base  3xTwo       total= 3  rowsz=2  nrows=2
 280   union(){
 281     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 282     $nspots = 0;
 283   };
 284   union(){
 285     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 286     $nspots = 1;
 287   };
 288   union(){
 289     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 290     $nspots = 2;
 291     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 292     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 293     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 294   };
 295   union(){
 296     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 297     $nspots = 3;
 298   };
 299   union(){
 300     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 301     $nspots = 4;
 302   };
 303 }
 304 module Base_Black(){ ////toplevel
 305 // Base  Black       total=18  rowsz=5  nrows=4
 306   union(){
 307     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 308     $nspots = 0;
 309   };
 310   union(){
 311     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 312     $nspots = 1;
 313     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 314     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 315     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 316     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 317     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 318     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 319     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 320     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 321     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 322     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 323     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 324     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 325     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 326     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 327     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 328     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 329     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 330     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 331   };
 332   union(){
 333     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 334     $nspots = 2;
 335   };
 336   union(){
 337     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 338     $nspots = 3;
 339   };
 340   union(){
 341     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 342     $nspots = 4;
 343   };
 344 }
 345 module Base_Blue(){ ////toplevel
 346 // Base  Blue        total=34  rowsz=6  nrows=6
 347   union(){
 348     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 349     $nspots = 0;
 350   };
 351   union(){
 352     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 353     $nspots = 1;
 354     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 355     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 356     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 357     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 358     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 359     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 360     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 361     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 362     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 363     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 364     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 365     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 366     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 367     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 368   };
 369   union(){
 370     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 371     $nspots = 2;
 372     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 373     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 374     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 375     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 376     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 377     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 378     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 379     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 380     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 381     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 382   };
 383   union(){
 384     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 385     $nspots = 3;
 386   };
 387   union(){
 388     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 389     $nspots = 4;
 390     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 391     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 392     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 393     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 394     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 395     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 396     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 397     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 398     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 399     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 400   };
 401 }
 402 module Base_Green(){ ////toplevel
 403 // Base  Green       total=38  rowsz=7  nrows=6
 404   union(){
 405     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 406     $nspots = 0;
 407   };
 408   union(){
 409     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 410     $nspots = 1;
 411     translate(token_pitch * [  -3.0,  -2.5 ]) Token_L();
 412     translate(token_pitch * [  -3.0,  -1.5 ]) Token_L();
 413     translate(token_pitch * [  -3.0,  -0.5 ]) Token_L();
 414     translate(token_pitch * [  -3.0,   0.5 ]) Token_L();
 415     translate(token_pitch * [  -3.0,   1.5 ]) Token_L();
 416     translate(token_pitch * [  -3.0,   2.5 ]) Token_L();
 417     translate(token_pitch * [  -2.0,  -2.5 ]) Token_L();
 418     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 419     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 420     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 421     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 422     translate(token_pitch * [  -2.0,   2.5 ]) Token_L();
 423     translate(token_pitch * [  -1.0,  -2.5 ]) Token_L();
 424     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 425     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 426   };
 427   union(){
 428     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 429     $nspots = 2;
 430     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 431     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 432     translate(token_pitch * [  -1.0,   2.5 ]) Token_L();
 433     translate(token_pitch * [   0.0,  -2.5 ]) Token_L();
 434     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 435     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 436     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 437     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 438     translate(token_pitch * [   0.0,   2.5 ]) Token_L();
 439     translate(token_pitch * [   1.0,  -2.5 ]) Token_L();
 440   };
 441   union(){
 442     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 443     $nspots = 3;
 444   };
 445   union(){
 446     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 447     $nspots = 4;
 448     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 449     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 450     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 451     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 452     translate(token_pitch * [   1.0,   2.5 ]) Token_L();
 453     translate(token_pitch * [   2.0,  -2.5 ]) Token_L();
 454     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 455     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 456     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 457     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 458     translate(token_pitch * [   2.0,   2.5 ]) Token_L();
 459     translate(token_pitch * [   3.0,  -2.5 ]) Token_L();
 460     translate(token_pitch * [   3.0,  -1.5 ]) Token_L();
 461   };
 462 }
 463 module Base_Orange(){ ////toplevel
 464 // Base  Orange      total=20  rowsz=5  nrows=4
 465   union(){
 466     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 467     $nspots = 0;
 468   };
 469   union(){
 470     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 471     $nspots = 1;
 472     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 473     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 474     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 475     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 476     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 477     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 478     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 479     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 480     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 481     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 482     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 483     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 484     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 485     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 486     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 487     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 488     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 489     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 490     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 491     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 492   };
 493   union(){
 494     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 495     $nspots = 2;
 496   };
 497   union(){
 498     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 499     $nspots = 3;
 500   };
 501   union(){
 502     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 503     $nspots = 4;
 504   };
 505 }
 506 module Base_Purple(){ ////toplevel
 507 // Base  Purple      total=15  rowsz=4  nrows=4
 508   union(){
 509     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 510     $nspots = 0;
 511   };
 512   union(){
 513     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 514     $nspots = 1;
 515     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 516     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 517     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 518     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 519     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 520     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 521     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 522     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 523     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 524     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 525     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 526     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 527     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 528     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 529     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 530   };
 531   union(){
 532     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 533     $nspots = 2;
 534   };
 535   union(){
 536     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 537     $nspots = 3;
 538   };
 539   union(){
 540     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 541     $nspots = 4;
 542   };
 543 }
 544 module Base_Red(){ ////toplevel
 545 // Base  Red         total=30  rowsz=6  nrows=5
 546   union(){
 547     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 548     $nspots = 0;
 549   };
 550   union(){
 551     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 552     $nspots = 1;
 553     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 554     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 555     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 556     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 557     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 558     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 559     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 560     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 561     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 562     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 563     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 564     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 565   };
 566   union(){
 567     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 568     $nspots = 2;
 569     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 570     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 571     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 572     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 573     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 574     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 575     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 576     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 577   };
 578   union(){
 579     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 580     $nspots = 3;
 581   };
 582   union(){
 583     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 584     $nspots = 4;
 585     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 586     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 587     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 588     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 589     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 590     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 591     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 592     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 593     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 594     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 595   };
 596 }
 597 module Base_White(){ ////toplevel
 598 // Base  White       total=32  rowsz=6  nrows=6
 599   union(){
 600     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 601     $nspots = 0;
 602   };
 603   union(){
 604     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 605     $nspots = 1;
 606     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 607     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 608     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 609     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 610     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 611     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 612     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 613     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 614     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 615     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 616     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 617     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 618     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 619     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 620     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 621     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 622     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 623     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 624     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 625     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 626   };
 627   union(){
 628     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 629     $nspots = 2;
 630     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 631     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 632     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 633     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 634     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 635     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 636     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 637     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 638   };
 639   union(){
 640     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 641     $nspots = 3;
 642     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 643     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 644     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 645     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 646   };
 647   union(){
 648     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 649     $nspots = 4;
 650   };
 651 }
 652 module Base_WhiteSpare(){ ////toplevel
 653 // Base  WhiteSpare  total= 3  rowsz=2  nrows=2
 654   union(){
 655     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 656     $nspots = 0;
 657   };
 658   union(){
 659     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 660     $nspots = 1;
 661     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 662   };
 663   union(){
 664     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 665     $nspots = 2;
 666     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 667   };
 668   union(){
 669     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 670     $nspots = 3;
 671     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 672   };
 673   union(){
 674     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 675     $nspots = 4;
 676   };
 677 }
 678 module Base_Yellow(){ ////toplevel
 679 // Base  Yellow      total=29  rowsz=6  nrows=5
 680   union(){
 681     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 682     $nspots = 0;
 683   };
 684   union(){
 685     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 686     $nspots = 1;
 687     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 688     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 689     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 690     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 691     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 692     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 693     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 694     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 695     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 696     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 697     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 698     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 699     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 700   };
 701   union(){
 702     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 703     $nspots = 2;
 704     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 705     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 706     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 707     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 708     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 709     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 710   };
 711   union(){
 712     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 713     $nspots = 3;
 714   };
 715   union(){
 716     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 717     $nspots = 4;
 718     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 719     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 720     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 721     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 722     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 723     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 724     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 725     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 726     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 727     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 728   };
 729 }
 730 // Base  total_count=243   total_real_count=216
 731 // Base  max_rowsz=7       max_nrows=6
 732 module All_Black(){ ////toplevel
 733 // All  Black       total=26  rowsz=6  nrows=5
 734   union(){
 735     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 736     $nspots = 0;
 737   };
 738   union(){
 739     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 740     $nspots = 1;
 741     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 742     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 743     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 744     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 745     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 746     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 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 * [  -0.5,  -2.0 ]) Token_L();
 752     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 753     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 754     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 755     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 756     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 757     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 758     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 759     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 760     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 761     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 762     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 763     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 764     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 765     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 766     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 767   };
 768   union(){
 769     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 770     $nspots = 2;
 771   };
 772   union(){
 773     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 774     $nspots = 3;
 775   };
 776   union(){
 777     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 778     $nspots = 4;
 779   };
 780 }
 781 module All_Blue(){ ////toplevel
 782 // All  Blue        total=52  rowsz=8  nrows=7
 783   union(){
 784     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 785     $nspots = 0;
 786   };
 787   union(){
 788     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 789     $nspots = 1;
 790     translate(token_pitch * [  -3.5,  -3.0 ]) Token_L();
 791     translate(token_pitch * [  -3.5,  -2.0 ]) Token_L();
 792     translate(token_pitch * [  -3.5,  -1.0 ]) Token_L();
 793     translate(token_pitch * [  -3.5,   0.0 ]) Token_L();
 794     translate(token_pitch * [  -3.5,   1.0 ]) Token_L();
 795     translate(token_pitch * [  -3.5,   2.0 ]) Token_L();
 796     translate(token_pitch * [  -3.5,   3.0 ]) Token_L();
 797     translate(token_pitch * [  -2.5,  -3.0 ]) Token_L();
 798     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 799     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 800     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 801     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 802     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 803     translate(token_pitch * [  -2.5,   3.0 ]) Token_L();
 804     translate(token_pitch * [  -1.5,  -3.0 ]) Token_L();
 805     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 806     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 807     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 808     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 809     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 810     translate(token_pitch * [  -1.5,   3.0 ]) Token_L();
 811     translate(token_pitch * [  -0.5,  -3.0 ]) Token_L();
 812   };
 813   union(){
 814     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 815     $nspots = 2;
 816     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 817     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 818     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 819     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 820     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 821     translate(token_pitch * [  -0.5,   3.0 ]) Token_L();
 822     translate(token_pitch * [   0.5,  -3.0 ]) Token_L();
 823     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 824     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 825     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 826     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 827     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 828     translate(token_pitch * [   0.5,   3.0 ]) Token_L();
 829     translate(token_pitch * [   1.5,  -3.0 ]) Token_L();
 830     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 831   };
 832   union(){
 833     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 834     $nspots = 3;
 835   };
 836   union(){
 837     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 838     $nspots = 4;
 839     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 840     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 841     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 842     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 843     translate(token_pitch * [   1.5,   3.0 ]) Token_L();
 844     translate(token_pitch * [   2.5,  -3.0 ]) Token_L();
 845     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 846     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 847     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 848     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 849     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 850     translate(token_pitch * [   2.5,   3.0 ]) Token_L();
 851     translate(token_pitch * [   3.5,  -3.0 ]) Token_L();
 852     translate(token_pitch * [   3.5,  -2.0 ]) Token_L();
 853     translate(token_pitch * [   3.5,  -1.0 ]) Token_L();
 854   };
 855 }
 856 module All_Green(){ ////toplevel
 857 // All  Green       total=58  rowsz=8  nrows=8
 858   union(){
 859     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 860     $nspots = 0;
 861   };
 862   union(){
 863     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 864     $nspots = 1;
 865     translate(token_pitch * [  -3.5,  -3.5 ]) Token_L();
 866     translate(token_pitch * [  -3.5,  -2.5 ]) Token_L();
 867     translate(token_pitch * [  -3.5,  -1.5 ]) Token_L();
 868     translate(token_pitch * [  -3.5,  -0.5 ]) Token_L();
 869     translate(token_pitch * [  -3.5,   0.5 ]) Token_L();
 870     translate(token_pitch * [  -3.5,   1.5 ]) Token_L();
 871     translate(token_pitch * [  -3.5,   2.5 ]) Token_L();
 872     translate(token_pitch * [  -3.5,   3.5 ]) Token_L();
 873     translate(token_pitch * [  -2.5,  -3.5 ]) Token_L();
 874     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 875     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 876     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 877     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 878     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 879     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 880     translate(token_pitch * [  -2.5,   3.5 ]) Token_L();
 881     translate(token_pitch * [  -1.5,  -3.5 ]) Token_L();
 882     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 883     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 884     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 885     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 886     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 887     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 888     translate(token_pitch * [  -1.5,   3.5 ]) Token_L();
 889     translate(token_pitch * [  -0.5,  -3.5 ]) Token_L();
 890   };
 891   union(){
 892     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 893     $nspots = 2;
 894     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 895     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 896     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 897     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 898     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 899     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 900     translate(token_pitch * [  -0.5,   3.5 ]) Token_L();
 901     translate(token_pitch * [   0.5,  -3.5 ]) Token_L();
 902     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 903     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 904     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 905     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 906     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 907     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 908     translate(token_pitch * [   0.5,   3.5 ]) Token_L();
 909   };
 910   union(){
 911     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 912     $nspots = 3;
 913   };
 914   union(){
 915     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 916     $nspots = 4;
 917     translate(token_pitch * [   1.5,  -3.5 ]) Token_L();
 918     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 919     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 920     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 921     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 922     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 923     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 924     translate(token_pitch * [   1.5,   3.5 ]) Token_L();
 925     translate(token_pitch * [   2.5,  -3.5 ]) Token_L();
 926     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 927     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 928     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 929     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 930     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 931     translate(token_pitch * [   2.5,   2.5 ]) Token_L();
 932     translate(token_pitch * [   2.5,   3.5 ]) Token_L();
 933     translate(token_pitch * [   3.5,  -3.5 ]) Token_L();
 934     translate(token_pitch * [   3.5,  -2.5 ]) Token_L();
 935   };
 936 }
 937 module All_Loco(){ ////toplevel
 938 // All  Loco        total=25  rowsz=5  nrows=5
 939   union(){
 940     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 941     $nspots = 0;
 942     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 943     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 944     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 945     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 946     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 947     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 948     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 949     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 950     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
 951     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
 952     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 953     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 954     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 955     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 956     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 957     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 958     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 959     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 960     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 961     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 962     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 963     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 964     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 965     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
 966     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
 967   };
 968   union(){
 969     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 970     $nspots = 1;
 971   };
 972   union(){
 973     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 974     $nspots = 2;
 975   };
 976   union(){
 977     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 978     $nspots = 3;
 979   };
 980   union(){
 981     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 982     $nspots = 4;
 983   };
 984 }
 985 module All_Orange(){ ////toplevel
 986 // All  Orange      total=32  rowsz=6  nrows=6
 987   union(){
 988     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 989     $nspots = 0;
 990   };
 991   union(){
 992     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 993     $nspots = 1;
 994     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 995     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 996     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 997     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 998     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 999     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
1000     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
1001     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1002     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1003     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1004     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1005     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
1006     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
1007     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1008     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1009     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1010     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1011     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
1012     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
1013     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1014     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1015     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1016     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1017     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
1018     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
1019     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1020     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1021     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1022     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1023     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
1024     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
1025     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
1026   };
1027   union(){
1028     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1029     $nspots = 2;
1030   };
1031   union(){
1032     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1033     $nspots = 3;
1034   };
1035   union(){
1036     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1037     $nspots = 4;
1038   };
1039 }
1040 module All_Orange6(){ ////toplevel
1041 // All  Orange6     total=20  rowsz=5  nrows=4
1042   union(){
1043     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1044     $nspots = 0;
1045     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1046     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1047     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1048     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1049     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1050     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1051     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1052     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1053     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1054     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1055     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1056     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1057     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1058     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1059     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1060     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1061     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1062     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1063     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1064     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1065   };
1066   union(){
1067     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1068     $nspots = 1;
1069   };
1070   union(){
1071     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1072     $nspots = 2;
1073   };
1074   union(){
1075     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1076     $nspots = 3;
1077   };
1078   union(){
1079     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1080     $nspots = 4;
1081   };
1082 }
1083 module All_Purple(){ ////toplevel
1084 // All  Purple      total=23  rowsz=5  nrows=5
1085   union(){
1086     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1087     $nspots = 0;
1088   };
1089   union(){
1090     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1091     $nspots = 1;
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 * [  -1.0,  -2.0 ]) Token_L();
1098     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1099     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1100     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1101     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1102     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1103     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1104     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1105     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1106     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1107     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1108     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1109     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1110     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1111     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1112     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1113     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1114     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1115   };
1116   union(){
1117     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1118     $nspots = 2;
1119   };
1120   union(){
1121     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1122     $nspots = 3;
1123   };
1124   union(){
1125     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1126     $nspots = 4;
1127   };
1128 }
1129 module All_Red(){ ////toplevel
1130 // All  Red         total=46  rowsz=7  nrows=7
1131   union(){
1132     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1133     $nspots = 0;
1134   };
1135   union(){
1136     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1137     $nspots = 1;
1138     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1139     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1140     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1141     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1142     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1143     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1144     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1145     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1146     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1147     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1148     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1149     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1150     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1151     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1152     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1153     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1154     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1155     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1156   };
1157   union(){
1158     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1159     $nspots = 2;
1160     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1161     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1162     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1163     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1164     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1165     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1166     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1167     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1168     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1169     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1170     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1171     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1172     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1173   };
1174   union(){
1175     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1176     $nspots = 3;
1177   };
1178   union(){
1179     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1180     $nspots = 4;
1181     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1182     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1183     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1184     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1185     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1186     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1187     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1188     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1189     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1190     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1191     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1192     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1193     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1194     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1195     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
1196   };
1197 }
1198 module All_White(){ ////toplevel
1199 // All  White       total=43  rowsz=7  nrows=7
1200   union(){
1201     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1202     $nspots = 0;
1203   };
1204   union(){
1205     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1206     $nspots = 1;
1207     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1208     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1209     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1210     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1211     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1212     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1213     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1214     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1215     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1216     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1217     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1218     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1219     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1220     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1221     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1222     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1223     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1224     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1225     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1226     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1227     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1228     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1229     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1230     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1231     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1232     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1233   };
1234   union(){
1235     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1236     $nspots = 2;
1237     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1238     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1239     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1240     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1241     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1242     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1243     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1244     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1245     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1246     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1247     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1248   };
1249   union(){
1250     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1251     $nspots = 3;
1252     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1253     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1254     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1255     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1256     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1257     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1258   };
1259   union(){
1260     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1261     $nspots = 4;
1262   };
1263 }
1264 module All_WhiteSpare(){ ////toplevel
1265 // All  WhiteSpare  total= 3  rowsz=2  nrows=2
1266   union(){
1267     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1268     $nspots = 0;
1269   };
1270   union(){
1271     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1272     $nspots = 1;
1273     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1274   };
1275   union(){
1276     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1277     $nspots = 2;
1278     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1279   };
1280   union(){
1281     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1282     $nspots = 3;
1283     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1284   };
1285   union(){
1286     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1287     $nspots = 4;
1288   };
1289 }
1290 module All_Yellow(){ ////toplevel
1291 // All  Yellow      total=45  rowsz=7  nrows=7
1292   union(){
1293     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1294     $nspots = 0;
1295   };
1296   union(){
1297     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1298     $nspots = 1;
1299     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1300     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1301     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1302     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1303     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1304     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1305     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1306     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1307     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1308     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1309     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1310     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1311     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1312     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1313     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1314     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1315     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1316     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1317     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1318   };
1319   union(){
1320     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1321     $nspots = 2;
1322     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1323     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1324     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1325     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1326     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1327     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1328     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1329     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1330     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1331     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1332     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1333   };
1334   union(){
1335     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1336     $nspots = 3;
1337   };
1338   union(){
1339     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1340     $nspots = 4;
1341     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1342     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1343     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1344     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1345     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1346     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1347     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1348     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1349     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1350     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1351     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1352     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1353     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1354     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1355     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1356   };
1357 }
1358 // All  total_count=373   total_real_count=350
1359 // All  max_rowsz=8       max_nrows=8
1360 module Witches_Black(){ ////toplevel
1361 // Witches  Black       total= 8  rowsz=3  nrows=3
1362   union(){
1363     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1364     $nspots = 0;
1365   };
1366   union(){
1367     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1368     $nspots = 1;
1369     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1370     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1371     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1372     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1373     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1374     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1375     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1376     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1377   };
1378   union(){
1379     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1380     $nspots = 2;
1381   };
1382   union(){
1383     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1384     $nspots = 3;
1385   };
1386   union(){
1387     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1388     $nspots = 4;
1389   };
1390 }
1391 module Witches_Blue(){ ////toplevel
1392 // Witches  Blue        total=18  rowsz=5  nrows=4
1393   union(){
1394     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1395     $nspots = 0;
1396   };
1397   union(){
1398     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1399     $nspots = 1;
1400     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1401     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1402     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1403     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1404     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1405     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1406     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1407     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1408   };
1409   union(){
1410     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1411     $nspots = 2;
1412     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1413     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1414     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1415     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1416     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1417   };
1418   union(){
1419     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1420     $nspots = 3;
1421   };
1422   union(){
1423     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1424     $nspots = 4;
1425     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1426     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1427     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1428     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1429     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1430   };
1431 }
1432 module Witches_Green(){ ////toplevel
1433 // Witches  Green       total=20  rowsz=5  nrows=4
1434   union(){
1435     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1436     $nspots = 0;
1437   };
1438   union(){
1439     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1440     $nspots = 1;
1441     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1442     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1443     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1444     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1445     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1446     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1447     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1448     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1449     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1450     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1451   };
1452   union(){
1453     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1454     $nspots = 2;
1455     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1456     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1457     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1458     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1459     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1460   };
1461   union(){
1462     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1463     $nspots = 3;
1464   };
1465   union(){
1466     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1467     $nspots = 4;
1468     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1469     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1470     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1471     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1472     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1473   };
1474 }
1475 module Witches_Loco(){ ////toplevel
1476 // Witches  Loco        total=25  rowsz=5  nrows=5
1477   union(){
1478     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1479     $nspots = 0;
1480     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1481     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1482     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1483     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1484     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1485     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1486     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1487     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1488     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1489     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1490     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1491     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1492     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1493     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1494     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1495     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1496     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1497     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1498     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1499     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1500     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1501     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1502     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1503     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1504     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1505   };
1506   union(){
1507     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1508     $nspots = 1;
1509   };
1510   union(){
1511     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1512     $nspots = 2;
1513   };
1514   union(){
1515     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1516     $nspots = 3;
1517   };
1518   union(){
1519     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1520     $nspots = 4;
1521   };
1522 }
1523 module Witches_Orange(){ ////toplevel
1524 // Witches  Orange      total=12  rowsz=4  nrows=3
1525   union(){
1526     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1527     $nspots = 0;
1528   };
1529   union(){
1530     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1531     $nspots = 1;
1532     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1533     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1534     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1535     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1536     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1537     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1538     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1539     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1540     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1541     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1542     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1543     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
1544   };
1545   union(){
1546     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1547     $nspots = 2;
1548   };
1549   union(){
1550     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1551     $nspots = 3;
1552   };
1553   union(){
1554     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1555     $nspots = 4;
1556   };
1557 }
1558 module Witches_Orange6(){ ////toplevel
1559 // Witches  Orange6     total=20  rowsz=5  nrows=4
1560   union(){
1561     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1562     $nspots = 0;
1563     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1564     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1565     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1566     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1567     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1568     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1569     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1570     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1571     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1572     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1573     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1574     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1575     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1576     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1577     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1578     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1579     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1580     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1581     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1582     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1583   };
1584   union(){
1585     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1586     $nspots = 1;
1587   };
1588   union(){
1589     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1590     $nspots = 2;
1591   };
1592   union(){
1593     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1594     $nspots = 3;
1595   };
1596   union(){
1597     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1598     $nspots = 4;
1599   };
1600 }
1601 module Witches_Purple(){ ////toplevel
1602 // Witches  Purple      total= 8  rowsz=3  nrows=3
1603   union(){
1604     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1605     $nspots = 0;
1606   };
1607   union(){
1608     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1609     $nspots = 1;
1610     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1611     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1612     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1613     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1614     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1615     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1616     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1617     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1618   };
1619   union(){
1620     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1621     $nspots = 2;
1622   };
1623   union(){
1624     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1625     $nspots = 3;
1626   };
1627   union(){
1628     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1629     $nspots = 4;
1630   };
1631 }
1632 module Witches_Red(){ ////toplevel
1633 // Witches  Red         total=16  rowsz=4  nrows=4
1634   union(){
1635     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1636     $nspots = 0;
1637   };
1638   union(){
1639     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1640     $nspots = 1;
1641     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1642     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1643     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1644     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1645     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1646     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1647   };
1648   union(){
1649     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1650     $nspots = 2;
1651     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1652     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1653     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1654     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1655     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1656   };
1657   union(){
1658     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1659     $nspots = 3;
1660   };
1661   union(){
1662     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1663     $nspots = 4;
1664     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1665     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1666     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1667     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1668     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1669   };
1670 }
1671 module Witches_White(){ ////toplevel
1672 // Witches  White       total=11  rowsz=4  nrows=3
1673   union(){
1674     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1675     $nspots = 0;
1676   };
1677   union(){
1678     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1679     $nspots = 1;
1680     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1681     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1682     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1683     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1684     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1685     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1686   };
1687   union(){
1688     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1689     $nspots = 2;
1690     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1691     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1692     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1693   };
1694   union(){
1695     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1696     $nspots = 3;
1697     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1698     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1699   };
1700   union(){
1701     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1702     $nspots = 4;
1703   };
1704 }
1705 module Witches_Yellow(){ ////toplevel
1706 // Witches  Yellow      total=16  rowsz=4  nrows=4
1707   union(){
1708     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1709     $nspots = 0;
1710   };
1711   union(){
1712     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1713     $nspots = 1;
1714     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1715     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1716     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1717     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1718     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1719     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1720   };
1721   union(){
1722     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1723     $nspots = 2;
1724     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1725     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1726     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1727     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1728     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1729   };
1730   union(){
1731     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1732     $nspots = 3;
1733   };
1734   union(){
1735     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1736     $nspots = 4;
1737     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1738     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1739     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1740     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1741     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1742   };
1743 }
1744 // Witches  total_count=154   total_real_count=134
1745 // Witches  max_rowsz=5       max_nrows=5