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
index 90b13697a87733edab47532a034e36ce3ed45baa..173fe830a84879e0a6e71bb9b0591f7e4bb945a9 100644 (file)
--- a/hole-repair-20191117.scad
+++ b/hole-repair-20191117.scad
@@ -8,6 +8,9 @@ nom_hole = 22;
 min_r = 15 + nom_hole/2;
 maj_r = 22 + nom_hole/2;
 
+//$fa=1;
+//$fs=1;
+
 module Profile(r) {
   prof_r = th/(1-cos(45));
   prof_R = r - prof_r * cos(45);
@@ -18,11 +21,20 @@ module Profile(r) {
        translate([1,0])
          square(center=true, 2*[1,prof_r]);
        translate([prof_R, 0])
-         circle(prof_r, $fa=1,$fs=1);
+         circle(prof_r);
       }
     }
     square([r, th]);
   }
 }
 
-Profile(maj_r);
+module Body(){
+  hull(){
+    for (x= [-1,+1] * (maj_r-min_r))
+      translate([x,0,0])
+       rotate_extrude()
+       Profile(min_r);
+  }
+}
+
+Body();