From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 20 Apr 2025 17:58:30 +0000 (+0100)
Subject: toolbox-inserts: wip inner bevel
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=d0fbcf84f17326ba95aaaebb9710de4b593736c7;p=reprap-play.git

toolbox-inserts: wip inner bevel

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index af6b1fb..b88e2fd 100644
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -26,6 +26,16 @@ module DriverHandlePositive() { ////toplevel
 module WallMinkowskiSphere(wall=well_surround_wall) { ////toplevel
   sphere($fn=8, r=wall/2);
 }
+module WallMinkowskiInner(wall=well_surround_wall) { ////toplevel
+  translate([0,0, -wall/2]) rotate_extrude($fn=8){
+    difference(){
+      rectfromto([0,0], wall/2 * [1,1]);
+
+      translate(wall/2 * [1,0])
+	circle($fn=8, r= wall/2);
+    }
+  }
+}
 
 module WellSurround(half_height, wall=well_surround_wall) {
   // WellSurround(half_height) {
@@ -59,7 +69,7 @@ module WellSurround(half_height, wall=well_surround_wall) {
 	  projection(cut=true)
 	  children(0);
 
-	WallMinkowskiSphere(wall);
+	WallMinkowskiInner(wall);
       }
 	
       /*      hull(){