From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 3 Jun 2017 18:55:43 +0000 (+0100)
Subject: sewing-table: RoundCorner: Introduce selector (nfc)
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=4cc0ab71cd7a173e0580140d444bd48dac34fce2;ds=sidebyside

sewing-table: RoundCorner: Introduce selector (nfc)
---

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index 27fb69c..3e317e0 100644
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -237,6 +237,11 @@ module RoundEdge(left_cnr, right_cnr) {
   }
 }
 
+module RoundCorner_selector(ci, adj) {
+  r = round_cnr_rad - round_edge_rad;
+  cube(r*2 + adj, center=true);
+}
+
 module RoundCornerCut(ci) {
   // ci should be [this_cnr, right_cnr, left_cnr]
   // where right_cnr is to the right (ie, anticlockwise)
@@ -246,7 +251,7 @@ module RoundCornerCut(ci) {
   offr= round_cnr_rad - round_edge_rad;
   INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
     difference(){
-      cube(offr*2 - 0.1, center=true);
+      RoundCorner_selector(ci, -0.1);
       translate([offr, offr, 0])
 	cylinder(center=true, h=20, r= offr);
     }
@@ -260,7 +265,7 @@ module RoundCornerAdd(ci) {
   bigr = round_cnr_rad - round_edge_rad;
   INREFFRAME(this_cnr, right_cnr) INREFFRAME_EDGE {
     intersection(){
-      cube(bigr*2 + 0.1, center=true);
+      RoundCorner_selector(ci, +0.1);
       translate([bigr, bigr, 0])
 	rotate_extrude(convexity=10, $fn=50)
 	translate([bigr, 0])