scaffold-clamp-cleat: sort out toplevels

[reprap-play.git] / hole-repair-20191117.scad

diff --git a/hole-repair-20191117.scad b/hole-repair-20191117.scad
index 5f33f47eecd0f73559545f90977ef062017b6948..0138c6741254a7e400bd6e1e57ba4b3666385d0e 100644 (file)
--- a/hole-repair-20191117.scad
+++ b/hole-repair-20191117.scad
@@ -1,31 +1,24 @@
 // -*- C -*-
 
 post_dia = 23.0;
+post_height = 20;
 
 th = 4;
 
-nom_hole = 22;
+nom_hole = 25;
 min_r = 15 + nom_hole/2;
-maj_r = 30 + nom_hole/2;
+maj_r = 15 + nom_hole/2;
 
-//$fa=1;
-//$fs=1;
+postwall_th = 2;
+
+$fa=1;
+$fs=1;
 
 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);
-      }
-    }
-    square([r, th]);
-  }
+  polygon([ [0,    0],
+           [r,    0],
+           [r-th, th],
+           [0,    th] ]);
 }
 
 module Body(){
@@ -37,4 +30,20 @@ module Body(){
   }
 }
 
-Body();
+module Post(){
+  difference(){
+    translate([0,0,-1])
+      cylinder(r= post_dia/2, h= post_height+1);
+    translate([0,0,-2])
+      cylinder(r= post_dia/2 - postwall_th, h= post_height+3);
+  }
+}
+
+module Cover(){
+  rotate([0,180,0]) Body();
+  Post();
+}
+
+//Body();
+//Post();
+Cover();