fix the SCAD prog for one input

uwplse · Feb 26, 2020 · a7038a2 · a7038a2
1 parent b668347
commit a7038a2
Showing 1 changed file with 3 additions and 54 deletions.
diff --git a/data/aec-table2-orig-scad-progs/CassetteStorage.scad b/data/aec-table2-orig-scad-progs/CassetteStorage.scad
@@ -1,64 +1,13 @@
 difference() {
     translate([-57, -3, 3]) {
         scale([117, 75, 175]) {
-
             cube();
         }
     }
-
-    union (){
-        translate([-51, -5, 6]) {
+    for (i=[0:9]) {
+        translate([-51, -5, 16 * i + 6]) {
             scale([105, 60 , 13])
-
                 cube();
         }
-        translate([-51, -5, 22]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-        translate([-51, -5, 38]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-
-        translate([-51, -5, 54]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-        translate([-51, -5, 70]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-        translate([-51, -5, 86]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-        translate([-51, -5, 102]) {
-            scale([105, 60 , 13])
-
-                 cube();
-        }
-        translate([-51, -5, 118]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-        translate([-51, -5, 134]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-
-        translate([-51, -5, 150]) {
-            scale([105, 60 , 13])
-
-                cube();
-        }
-
     }
-}
+ }