From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 17 Nov 2019 22:02:06 +0000 (+0000)
Subject: hole-repair-20191117: wip
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=f70c7876829d5382f9fd81e332c8dfa00485c140;p=reprap-play.git

hole-repair-20191117: wip

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

diff --git a/hole-repair-20191117.scad b/hole-repair-20191117.scad
new file mode 100644
index 0000000..90b1369
--- /dev/null
+++ b/hole-repair-20191117.scad
@@ -0,0 +1,28 @@
+// -*- C -*-
+
+post_dia = 23.0;
+
+th = 4;
+
+nom_hole = 22;
+min_r = 15 + nom_hole/2;
+maj_r = 22 + nom_hole/2;
+
+module Profile(r) {
+  prof_r = th/(1-cos(45));
+  prof_R = r - prof_r * cos(45);
+
+  intersection(){
+    hull(){
+      translate([0, th-prof_r]){
+	translate([1,0])
+	  square(center=true, 2*[1,prof_r]);
+	translate([prof_R, 0])
+	  circle(prof_r, $fa=1,$fs=1);
+      }
+    }
+    square([r, th]);
+  }
+}
+
+Profile(maj_r);