steamer-handle-clip.scad

   1 // -*- C -*-
   2
   3 include <funcs.scad>
   4 include <utils.scad>
   5
   6 width = 20;
   7 cup = 2.5;
   8 jaw = 32.36 - 2.00;
   9
  10 a = cup;
  11 b = width/2;
  12 alpha = atan2(a, b);
  13 c = vectorlen2d([a, b]);
  14 r = a / (1 - cos(2*alpha));
  15 C = [0, a-r];
  16
  17 module Thing() {
  18   intersection(){
  19     hull(){
  20       translate(C)
  21         circle(r=r);
  22       translate([0, -jaw])
  23         square(center=true, [width, 10]);
  24     }
  25     rectfromto([ -width/2, -jaw ],
  26                [  width/2,  20  ]);
  27   }
  28 }
  29
  30 Thing();