steamer-handle-clip: wip

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

diff --git a/steamer-handle-clip.scad b/steamer-handle-clip.scad
new file mode 100644 (file)
index 0000000..0351a96
--- /dev/null
+++ b/steamer-handle-clip.scad
@@ -0,0 +1,23 @@
+// -*- C -*-
+
+include <funcs.scad>
+
+width = 20;
+cup = 2.5;
+jaw = 32.36 - 2.00;
+
+a = cup;
+b = width/2;
+alpha = atan2(a, b);
+c = vectorlen2d([a, b]);
+r = c / (2*tan(2*alpha));
+C = [0, a-r];
+
+module Thing() {
+  translate(C)
+    circle(r=r);
+//  translate([0, -20])
+//    square(center=true, [width, 40]);
+}
+
+Thing();