From ee60b10540f16fdd87c389ad102d6a5a0aa0e578 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 25 Oct 2020 22:26:54 +0000
Subject: [PATCH] steamer-handle-clip: edits from v1

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 steamer-handle-clip.scad | 25 ++++++++++++++-----------
 1 file changed, 14 insertions(+), 11 deletions(-)

diff --git a/steamer-handle-clip.scad b/steamer-handle-clip.scad
index 718ca84..dff7fc3 100644
--- a/steamer-handle-clip.scad
+++ b/steamer-handle-clip.scad
@@ -16,25 +16,26 @@ c = vectorlen2d([a, b]);
 r = a / (1 - cos(2*alpha));
 C = [0, a-r];
 
-module Baseline() {
+module HalfBaseline() {
   intersection(){
-    hull(){
-      translate(C)
-	circle(r=r);
-      translate([0, -jaw])
-	square(center=true, [width, 10]);
-    }
-    rectfromto([ -width/2, -jaw ],
-	       [  width/2,  20  ]);
+    translate(C + [0, jaw/2])
+      circle(r=r);
+    rectfromto([ -width/2, -1, ],
+	       [  width/2, jaw ]);
   }
 }
 
+module Baseline(){
+  HalfBaseline();
+  mirror([0,1]) HalfBaseline();
+}
+
 module Plan(){
   difference(){
     offset(delta=th) Baseline();
     Baseline();
-    rectfromto([-width, -jaw],
-	       [0, 0]);
+    rectfromto([-width, -jaw/2],
+	       [0,       jaw/2]);
   }
 }
 
@@ -42,4 +43,6 @@ module Thing(){
   linextr(0,l) Plan();
 }
 
+//HalfPlan();
+//Plan();
 Thing();
-- 
2.30.2