sewing-table: introduce a concat (nfc)

[reprap-play.git] / sewing-table.scad.m4

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index c84f359d68dd04053420b34ff85904b9ce2203f9..32d69b6978ed785b0792d70368fed428d630c6af 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -47,7 +47,7 @@ module Post(){
 
 module Posts(posts) {
   for (p= posts) {
-    translate([p[0], p[1], 0])
+    translate(concat(p, [0]))
       Post();
   }
 }
@@ -57,9 +57,9 @@ module TileBase(botleft_post, topright_post){
   size = topright_post - botleft_post + thehd * 2;
   difference(){
     mirror([0,0,1])
-      translate([botleft[0], botleft[1], 0])
-      cube([size[0], size[1], tile_th]);
-    translate( [ botleft_post[0], botleft_post[1], -tile_th ]
+      translate(concat(botleft, [0]))
+      cube(concat(size, [tile_th]));
+    translate( concat(botleft_post, [-tile_th])
               + 0.5 * [ post_dia, post_dia, 0 ] )
       Commitid_BestCount_M( topright_post-botleft_post
                            + [0, thehd[1] ]
@@ -84,7 +84,7 @@ m4_define(`INREFFRAME',`
 m4_dnl  INREFFRAME(left_post, right_post, morevars)
 m4_dnl    INREFFRAME_EDGE { body; }
 m4_define(`INREFFRAME_EDGE',`
-  translate([-thehd[0], -thehd[1], -round_edge_rad])
+  translate(concat(-thehd, [-round_edge_rad]))
 ')
 
 module RoundEdge(left_post, right_post) {