c[2] + thehd_bl,
c[3] + thehd_br ];
+m4_dnl R_EDGE(c,ix)
+m4_dnl c is from Rectangle_corners and
+m4_dnl ix is a corner number
+m4_dnl expands to two comma-separated corners:
+m4_dnl that denoted by ix, and the next one anticlockwise
+m4_define(`R_EDGE',`$1[$2],$1[(($2)+1)%4]')
+
module Tile02(){ ////toplevel
sz = [100,170];
c0 = -sz;
union(){
TileBase(c[0], c[2]);
Posts(posts);
- RoundEdge(c[0], c[1]);
- RoundEdge(c[3], c[0]);
- InterlockEdge(c[2], c[3], 0);
+ RoundEdge(R_EDGE(c,0));
+ RoundEdge(R_EDGE(c,3));
+ InterlockEdge(R_EDGE(c,2), 0);
}
- InterlockEdge(c[1], c[2], 1);
+ InterlockEdge(R_EDGE(c,1), 1);
RoundCornerCut(rcs);
}
RoundCornerAdd(rcs);
difference(){
union(){
TileBase(c[0], c[2]);
- RoundEdge(c[2], c[3]);
- RoundEdge(c[3], c[0]);
+ RoundEdge(R_EDGE(c,2));
+ RoundEdge(R_EDGE(c,3));
Posts(posts);
}
- InterlockEdge(c[0], c[1], 1);
+ InterlockEdge(R_EDGE(c,0), 1);
RoundCornerCut(rcs);
}
RoundCornerAdd(rcs);