sewing-table: some comments (nfc)

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

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 1c0842d734b1c6df0a4134de1fa555723e911c4d..3b628e4b681bd7456ecc93699db15e9c150c8574 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -143,6 +143,8 @@ module RoundEdge(left_cnr, right_cnr) {
 }
 
 module RoundCornerCut(ci) {
+  // ci should be [this_cnr, right_cnr]
+  // where right_cnr is to the right (ie, anticlockwise)
   this_cnr = ci[0];
   right_cnr = ci[1];
   offr= round_cnr_rad - round_edge_rad;
@@ -258,6 +260,7 @@ module TestPiece1(){ ////toplevel
            [   0, 0]
            ];
   corners = TestPiece_holes2corners(holes);
+  rcs = [corners[0], corners[1]];
   difference(){
     union(){
       TileBase(corners[0], corners[2]);
@@ -266,9 +269,9 @@ module TestPiece1(){ ////toplevel
       RoundEdge(corners[3], corners[0]);
     }
     InterlockEdge(corners[1], corners[2], 1, nlobes=1);
-    RoundCornerCut(corners[0], corners[1]);
+    RoundCornerCut(rcs);
   }
-  RoundCornerAdd(corners[0], corners[1]);
+  RoundCornerAdd(rcs);
 }
 
 module TestPiece2(){ ////toplevel
@@ -291,6 +294,8 @@ module TestDemo(){ ////toplevel
 }
   
 function Rectangle_corners(c0, sz) =
+  // returns the corners of a rectangle from c0 to c0+sz
+  // if sz is positive, the corners are anticlockwise starting with c0
   [ c0 + [ 0,     0     ],
     c0 + [ sz[0], 0     ],
     c0 + [ sz[0], sz[1] ],