quacks-ingredients: toplevels for test

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/quacks-ingredients.scad b/quacks-ingredients.scad
index 71a3bd60359b20b86aa9115e0be1a1c8bc11cf43..e54aa1f884190dc414aaf82859d64ab03bc59a67 100644 (file)
--- a/quacks-ingredients.scad
+++ b/quacks-ingredients.scad
@@ -88,10 +88,33 @@ module Token_L5(){
     Token_Spots();
 }
 
-module Demo(){
+module Demo(){ ////toplevel
   color("red") { Token_L3(); }
   color("white") { Token_L1(); Token_L5(); }
   color("black") { Token_L2(); Token_L4(); }
 }
 
-Demo();
+module Tests(){
+  for ($nspots = [1,2,3,4]) {
+    translate(($nspots - 2) * (token_dia + 3) * [1,0])
+      children();
+  }
+}
+
+module Test_L1(){ ////toplevel
+  Tests() Token_L1();
+}
+module Test_L2(){ ////toplevel
+  Tests() Token_L2();
+}
+module Test_L3(){ ////toplevel
+  Tests() Token_L3();
+}
+module Test_L4(){ ////toplevel
+  Tests() Token_L4();
+}
+module Test_L5(){ ////toplevel
+  Tests() Token_L5();
+}
+
+//Demo();