From d0fbcf84f17326ba95aaaebb9710de4b593736c7 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 20 Apr 2025 18:58:30 +0100
Subject: [PATCH] toolbox-inserts: wip inner bevel

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 toolbox-inserts.scad | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

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(){
-- 
2.30.2